#include<bits/stdc++.h>
using namespace std;
int get(int l,int r,const vector<int>& sum)
{
    return sum[r]-(l ? sum[l-1] : 0);
}
struct Data
{
    int l,r,v;
};
void radix_sort(int n,vector<Data>& seg)
{
    vector<vector<int>> id(n);
    for(size_t i=0;i<seg.size();i++)
        id[seg[i].l].push_back(i);
    vector<int> tid;
    for(int i=0;i<n;i++)
        for(auto j : id[i])
            tid.push_back(j);
    for(int i=0;i<n;i++)
        id[i].clear();
    for(auto i : tid)
        id[seg[i].r].push_back(i);
    tid.clear();
    for(int i=0;i<n;i++)
        for(auto j : id[i])
            tid.push_back(j);
    vector<Data> tseg;
    for(auto i : tid)
        tseg.push_back(seg[i]);
    seg.swap(tseg);
}
const int INF=0x3f3f3f3f;
void trans(int n,vector<Data>& seg,const vector<int>& a,const vector<int>& sum)
{
    vector<int> tl(n,-1),tr(n,n+1),cnt(n);
    for(int i=0;i<n;i++)
    {
        if(i>0)tl[i]=tl[i-1],cnt[i]=cnt[i-1];
        if(a[i]==0)tl[i]=i,cnt[i]++;
    }
    for(int i=n-1;i>=0;i--)
    {
        if(i<n-1)tr[i]=tr[i+1];
        if(a[i]==0)tr[i]=i;
    }
    vector<Data> tseg;
    for(auto& [l,r,v] : seg)
    {
        if(get(l,r,cnt)>0)
        {
            tseg.push_back(Data{l,r,v});
            continue;
        }
        if(tl[l]>=0)tseg.push_back(Data{tl[l],r,v+get(tl[l],l-1,sum)});
        if(tr[r]<=n-1)tseg.push_back(Data{l,tr[r],v+get(r+1,tr[r],sum)});
    }
    radix_sort(n,tseg);
    seg.clear();
    for(size_t i=0,j=0;i<tseg.size();i=j)
    {
        while(j<tseg.size() && tseg[i].l==tseg[j].l && tseg[i].r==tseg[j].r)j++;
        int mi=INF;
        for(size_t k=i;k<j;k++)
            mi=min(mi,tseg[k].v);
        seg.push_back(Data{tseg[i].l,tseg[i].r,mi});
    }
}
int first_round(int n,const vector<Data>& seg,const vector<int>& p,const vector<int>& a)
{
    if(seg.empty())return -1;
    vector<vector<pair<int,int>>> go(n);
    for(auto& [l,r,v] : seg)
        go[l].emplace_back(r+1,v);
    vector<array<int,3>> dp(n+1,{INF,INF,INF});
    dp[0][0]=0;
    deque<pair<int,int>> que;
    for(int i=0;i<=n;i++)
    {
        if(!que.empty())
        {
            for(auto j : {0,2})
                dp[i][j]=min(dp[i][j],que.front().first);
            while(!que.empty() && que.front().second<=i)
                que.pop_front();
        }
        if(i==n)break;
        for(auto& [r,v] : go[i])
        {
            int t=min(dp[i][0],dp[i][1])+v;
            while(!que.empty() && que.back().first>=t)
                que.pop_back();
            que.emplace_back(t,r);
        }
        if(p[i]==0)dp[i+1][0]=min({dp[i+1][0],dp[i][0],dp[i][2]});
        dp[i+1][1]=min(dp[i+1][1],min({dp[i][0],dp[i][1],dp[i][2]})+a[i]);
        dp[i+1][2]=min(dp[i+1][2],dp[i][2]+a[i]);
    }
    return min(dp[n][0],dp[n][2]);
}
int solve()
{
    int n,m;
    scanf("%d%d",&n,&m);
    vector<int> p(n);
    for(int j=0;j<n;j++)
        scanf("%d",&p[j]);
    vector<vector<int>> a(m,vector<int>(n));
    for(int i=0;i<m;i++)
        for(int j=0;j<n;j++)
            scanf("%d",&a[i][j]);
    for(int j=0;j<n;j++)
        if(p[j] && a[0][j])
            return 0*printf("-1\n");
    vector<vector<int>> sum(a);
    for(int i=0;i<m;i++)
        for(int j=1;j<n;j++)
            sum[i][j]+=sum[i][j-1];
    for(int i=1;i<m;i++)
        for(int j=0;j<n;j++)
            sum[i][j]+=sum[i-1][j];
    vector<Data> seg;
    for(int j=0;j<n;j++)
        if(!a[m-1][j])
            seg.push_back(Data{j,j,get(j,j,sum[m-1])});
    for(int i=m-2;i>=0;i--)
        trans(n,seg,a[i],sum[i]);
    return 0*printf("%d\n",first_round(n,seg,p,a[0]));
}
int main()
{
    int T;
    scanf("%d",&T);
    while(T--)solve();
    return 0;
}