bzoj3894 文理分科（最小割）

令S集为选文，T集为选理。则单科满意度很好建边。问题是一个集合一起选一科的贡献怎么办呢？先考虑理科，我们对每个这样的集合新建一个点x，向T建边，容量为贡献，集合中的每一个点向x建边，容量为inf，表示只要有一个人选了文就得把这个贡献割掉。一个集合的人选文的贡献同理。这样不可能出现一个人既吃到了周围人全选理的贡献，又吃到了周围人全选文的贡献。因为如果这样的话，原图一定还联通。

#include <cstdio>
#include <cstring>
#include <algorithm>
#include <queue>
using namespace std;
#define ll long long
#define inf 0x3f3f3f3f
#define N 30010
inline int read(){
    int x=0,f=1;char ch=getchar();
    while(ch<'0'||ch>'9'){if(ch=='-')f=-1;ch=getchar();}
    while(ch>='0'&&ch<='9') x=x*10+ch-'0',ch=getchar();
    return x*f;
}
int n,m,h[N],num=1,cur[N],lev[N],T=30002,ans=0,id[110][110];
int dx[]={0,0,1,-1},dy[]={1,-1,0,0};
struct edge{
    int to,next,val;
}data[300100];
inline void add(int x,int y,int val){
    data[++num].to=y;data[num].next=h[x];h[x]=num;data[num].val=val;
    data[++num].to=x;data[num].next=h[y];h[y]=num;data[num].val=0;
}
inline bool bfs(){
    queue<int>q;memset(lev,0,sizeof(lev));
    q.push(0);lev[0]=1;
    while(!q.empty()){
        int x=q.front();q.pop();
        for(int i=h[x];i;i=data[i].next){
            int y=data[i].to;if(lev[y]||!data[i].val) continue;
            lev[y]=lev[x]+1;if(y==T) return 1;q.push(y);
        }
    }return 0;
}
inline int dinic(int x,int low){
    if(x==T) return low;int tmp=low;
    for(int &i=cur[x];i;i=data[i].next){
        int y=data[i].to;if(lev[y]!=lev[x]+1||!data[i].val) continue;
        int res=dinic(y,min(data[i].val,tmp));
        if(!res) lev[y]=0;else tmp-=res,data[i].val-=res,data[i^1].val+=res;
        if(!tmp) return low;
    }return low-tmp;
}
int main(){
//  freopen("a.in","r",stdin);
    n=read();m=read();int tot=0;
    for(int i=1;i<=n;++i)
        for(int j=1;j<=m;++j){
            id[i][j]=++tot;int x=read();ans+=x;
            add(0,id[i][j],x);
        }
    for(int i=1;i<=n;++i)
        for(int j=1;j<=m;++j){
            int x=read();ans+=x;add(id[i][j],T,x);
        }
    for(int i=1;i<=n;++i)
        for(int j=1;j<=m;++j){
            int x=read();ans+=x;add(0,id[i][j]+tot,x);
        }
    for(int i=1;i<=n;++i)
        for(int j=1;j<=m;++j){
            int x=read();ans+=x;add(id[i][j]+tot+tot,T,x);
        }
    for(int i=1;i<=n;++i)
        for(int j=1;j<=m;++j){
            for(int k=0;k<4;++k){
                int x=i+dx[k],y=j+dy[k];
                if(x<1||x>n||y<1||y>m) continue;
                add(id[i][j]+tot,id[x][y],inf);
                add(id[x][y],id[i][j]+tot+tot,inf);
            }add(id[i][j]+tot,id[i][j],inf);add(id[i][j],id[i][j]+tot+tot,inf);
        }
    while(bfs()){memcpy(cur,h,sizeof(h));ans-=dinic(0,inf);}
    printf("%d\n",ans);
    return 0;       
}