现在小朋友们最喜欢的"喜羊羊与灰太狼",话说灰太狼抓羊不到，但抓兔子还是比较在行的，

而且现在的兔子还比较笨，它们只有两个窝，现在你做为狼王，面对下面这样一个网格的地形：

左上角点为(1,1),右下角点为(N,M)(上图中N=4,M=5).有以下三种类型的道路 

1:(x,y)<==>(x+1,y) 

2:(x,y)<==>(x,y+1) 

3:(x,y)<==>(x+1,y+1) 

道路上的权值表示这条路上最多能够通过的兔子数，道路是无向的. 左上角和右下角为兔子的两个窝，

开始时所有的兔子都聚集在左上角(1,1)的窝里，现在它们要跑到右下解(N,M)的窝中去，狼王开始伏击

这些兔子.当然为了保险起见，如果一条道路上最多通过的兔子数为K，狼王需要安排同样数量的K只狼，

才能完全*这条道路，你需要帮助狼王安排一个伏击方案，使得在将兔子一网打尽的前提下，参与的

狼的数量要最小。因为狼还要去找喜羊羊麻烦.

第一行为N,M.表示网格的大小，N,M均小于等于1000.

接下来分三部分

第一部分共N行，每行M-1个数，表示横向道路的权值. 

第二部分共N-1行，每行M个数，表示纵向道路的权值. 

第三部分共N-1行，每行M-1个数，表示斜向道路的权值. 

输入文件保证不超过10M

/*

  生涯第一次用dinic写网络流，先水一个最小割。

  dinic的原理：先bfs一遍将残余网络分层，然后找增广路。

*/

#include<cstdio>

#include<iostream>

#include<queue>

#define N 1000010

#define inf 1000000000

using namespace std;

int head[N],dis[N],q[N*],ans,cnt=,S,T,n,m;

struct node{

    int to,pre,f;

};node e[N*];

void add(int x,int y,int z){

    e[++cnt].to=y;e[cnt].f=z;e[cnt].pre=head[x];head[x]=cnt;

    e[++cnt].to=x;e[cnt].f=;e[cnt].pre=head[y];head[y]=cnt;

}

bool bfs(){

    for(int i=;i<=T;i++)dis[i]=inf;

    int h=,t=;

    q[]=S;dis[S]=;

    while(h<t){

        int now=q[++h];

        for(int i=head[now];i;i=e[i].pre){

            int v=e[i].to;

            if(e[i].f&&dis[now]+<dis[v]){

                dis[v]=dis[now]+;

                if(v==T)return true;

                q[++t]=v;

            }

        }

    }

    if(dis[T]=inf)return false;

    return true;

}

int dinic(int now,int f){

    if(now==T)return f;

    int rest=f;

    for(int i=head[now];i;i=e[i].pre){

        int v=e[i].to;

        if(e[i].f&&dis[v]==dis[now]+&&rest){

            int t=dinic(v,min(rest,e[i].f));

            if(!t)dis[v]=;

            e[i].f-=t;

            e[i^].f+=t;

            rest-=t;

        }

    }

    return f-rest;

}

int main(){

    scanf("%d%d",&n,&m);

    S=;T=n*m+;

    add(S,,inf);add(n*m,T,inf);

    for(int i=;i<=n;i++)

        for(int j=;j<m;j++){

            int w;scanf("%d",&w);

            int u=(i-)*m+j;

            add(u,u+,w);

            add(u+,u,w);

        }

    for(int i=;i<n;i++)

        for(int j=;j<=m;j++){

            int w;scanf("%d",&w);

            int u=(i-)*m+j;

            add(u,u+m,w);

            add(u+m,u,w);

        }

    for(int i=;i<n;i++)

        for(int j=;j<m;j++){

            int w;scanf("%d",&w);

            int u=(i-)*m+j;

            add(u,u+m+,w);

            add(u+m+,u,w);

        }

    while(bfs())ans+=dinic(S,inf);

    printf("%d",ans);

    return ;

}