# bzoj 2127 happiness

1 2

1 1

100 110

1

1000

1210

【样例说明】

【数据规模】

### 题解

#include <cstdio>
#include <cstring>
#include <algorithm>
#include <queue>
#define N 60010
using namespace std;
const int inf = 0x3f3f3f3f;
struct flows {
struct node {
int to, next, flow;
} e[N * 10];
int tot, st[N], dis[N], cur[N];
void init() {
tot = -1, memset(e, -1, sizeof e),
memset(st, -1, sizeof st);
}
void add(int x, int y, int z) {
e[++tot].to = y;
e[tot].flow = z;
e[tot].next = st[x];
st[x] = tot;
}
void add_edge(int x, int y, int z) {
//      printf("%d %d %d\n", x, y, z);
}
queue <int> que;
int bfs(int S, int T) {
memcpy(cur, st, sizeof st);
memset(dis, 0, sizeof dis);
while (!que.empty()) que.pop();
que.push(S);
dis[S] = 1;
while(!que.empty()) {
int now = que.front();
que.pop();
for (int i = st[now]; ~i; i = e[i].next)
if (e[i].flow && !dis[e[i].to]) {
dis[e[i].to] = dis[now] + 1;
if (e[i].to == T) return 1;
que.push(e[i].to);
}
}
return 0;
}
int finds(int now, int T, int flow) {
if (now == T)
return flow;
int f;
for (int i = cur[now]; ~i; i = e[i].next) {
cur[now] = i;
if (e[i].flow && dis[e[i].to] == dis[now] + 1 &&
(f = finds(e[i].to, T, min(flow, e[i].flow)))) {
e[i].flow -= f;
e[i^1].flow += f;
return f;
}
}
return 0;
}
int dinic(int S, int T) {
int flow = 0, x;
while(bfs(S, T)) {
while(x = finds(S, T, inf)) {
flow += x;
}
}
return flow;
}
}flow;
int n, m, a[110][110], x, all;
int ge(int x, int y) { return (x - 1) * m + y; }
main() {
scanf("%d%d", &n, &m);
int S = 0, T = n * m * 5 + 1;
flow.init();
for (int i = 1; i <= n; ++i)
for (int j = 1; j <= m; ++j)
scanf("%d", &a[i][j]);
for (int i = 1; i <= n; ++i)
for (int j = 1; j <= m; ++j) {
scanf("%d", &x), all += x;
if (a[i][j] - x < 0)
flow.add_edge(ge(i, j), T, -(a[i][j] - x));
else
flow.add_edge(S, ge(i, j), a[i][j] - x), all += a[i][j] - x;
}
for (int i = 1; i < n; ++i)
for (int j = 1; j <= m; ++j) {
scanf("%d", &x), all += x;
flow.add_edge(S, n * m + ge(i, j), x);
flow.add_edge(n * m + ge(i, j), ge(i, j), inf);
flow.add_edge(n * m + ge(i, j), ge(i + 1, j), inf);
}
for (int i = 1; i < n; ++i)
for (int j = 1; j <= m; ++j) {
scanf("%d", &x), all += x;
flow.add_edge(n * m * 2 + ge(i, j), T, x),
flow.add_edge(ge(i, j), n * m * 2 + ge(i, j), inf),
flow.add_edge(ge(i + 1, j), n * m * 2 + ge(i, j), inf);
}
for (int i = 1; i <= n; ++i)
for (int j = 1; j < m; ++j) {
scanf("%d", &x), all += x;
flow.add_edge(S, n * m * 3 + ge(i, j), x),
flow.add_edge(n * m * 3 + ge(i, j), ge(i, j), inf),
flow.add_edge(n * m * 3 + ge(i, j), ge(i, j + 1), inf);
}
for (int i = 1; i <= n; ++i)
for (int j = 1; j < m; ++j) {
scanf("%d", &x), all += x;
flow.add_edge(n * m * 4 + ge(i, j), T, x),
flow.add_edge(ge(i, j), n * m * 4 + ge(i, j), inf),
flow.add_edge(ge(i, j + 1), n * m * 4 + ge(i, j), inf);
}
printf("%d\n", all - flow.dinic(S, T));
}