/*
  网格图的最小割问题
  很明显如果写最大流一定会超时，所以可以利用最大流最小割定理解决。
  我们可以感性的认识一下这个定理：
  在一条增广路中，至少有一条边是满流的，否则我们还可以接着增广
  那么切去这条边，就相当于阻断了一条增广路
  所以阻断所有增广路的最小代价就是所有增广路中的这条边，它们的和就是最大流。
  我们可以在某条边i的两侧加两个点，连一条边j，使两条边切割，这样建图的话，最小割就等于新图的最短路，
  只要多加起点和终点就可以跑最短路了。加边很麻烦要注意 
  dijkstral+堆优化 
*/
#include<iostream>
#include<cstdio>
#include<cstring>
#include<queue>
#define maxn 20010
#define inf 9999185000071099LL
#define ll long long

using namespace std;
int head[maxn],n,m,S,T,cnt;ll dis[maxn];
struct node
{
    int w,v,pre;
}e[maxn<<2];

inline void add(int u,int v,int w)
{
    e[++cnt].v=v;
    e[cnt].w=w;
    e[cnt].pre=head[u];
    head[u]=cnt;
}

int number(int i,int j)
{
    return (i-1)*(m+1)+j;
}

void Dij()
{
    priority_queue<int>q;
    for(int i=S;i<=T;i++) dis[i]=-inf;
    dis[S]=0;q.push(S);
    while(!q.empty())
    {
        int u=q.top();q.pop();
        for(int i=head[u];i;i=e[i].pre)
        {
            int v=e[i].v;
            if(dis[v]<dis[u]+(ll)e[i].w)
            {
                dis[v]=dis[u]+(ll)e[i].w;
                q.push(v);
            }
        }
    }
    cout<<-dis[T]<<endl;
}

void work()
{
    scanf("%d%d",&n,&m);
    S=0;T=(n+1)*(m+1)+1;
    for(int i=1;i<=n;i++)
      for(int j=2;j<=m;j++)
      {
          int x;scanf("%d",&x);
          add(number(i,j),number(i+1,j),-x);
          add(number(i+1,j),number(i,j),-x);
      }
    for(int i=2;i<=n;i++)
      for(int j=1;j<=m;j++)
      {
        int x;scanf("%d",&x);
        add(number(i,j),number(i,j+1),-x);
        add(number(i,j+1),number(i,j),-x);
      }
    for(int i=2;i<=m;i++) add(S,i,0);
    for(int i=2*m+2;i<=T-2;i+=(m+1)) add(S,i,0);
    for(int i=m+2;i<=T-2;i+=(m+1)) add(i,T,0);
    for(int i=n*(m+1)+2;i<=T-2;i++) add(i,T,0);
    Dij();
}

int main()
{
    freopen("flowa.in","r",stdin);
    freopen("flowa.out","w",stdout);
    int T;scanf("%d",&T);
    while(T--)
    {
        memset(head,0,sizeof(head));
        cnt=0;
        work();
    }
    return 0;
}