1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120
| #include <queue> #include <cstdio> #include <cstring> #include <iostream> #include <algorithm> using namespace std; const int MAXN = 5e2 + 5; const int MAXM = 5e7 + 5; const int INF = 0x3f3f3f3f; const int dx[5] = {0, 1, -1, 0, 0}; const int dy[5] = {0, 0, 0, 1, -1};
int n, m, st, ed, now, ans, tmp, d[MAXM], cur[MAXM]; int art[MAXN][MAXN], sci[MAXN][MAXN], sa[MAXN][MAXN], ss[MAXN][MAXN]; int tot = 1, head[MAXM], ver[MAXM], edge[MAXM], nxt[MAXM]; queue<int> q;
void AddEdge(int u, int v, int c) { ver[++tot] = v, edge[tot] = c, nxt[tot] = head[u], head[u] = tot; ver[++tot] = u, edge[tot] = 0, nxt[tot] = head[v], head[v] = tot; }
bool bfs() { memset(d, 0, sizeof(d)); while (!q.empty()) q.pop(); q.push(st), d[st] = 1, cur[st] = head[st];
while (!q.empty()) { int u = q.front(); q.pop(); for (int i = head[u]; i; i = nxt[i]) { int v = ver[i]; if (!edge[i] || d[v] != 0) continue; q.push(v); cur[v] = head[v]; d[v] = d[u] + 1; if (v == ed) return true; } }
return false;
}
int dinic(int u, int flow) {
if (u == ed) return flow; int res = flow, k, i; for (i = cur[u]; i && res; i = nxt[i]) { int v = ver[i]; if (!edge[i] || d[v] != d[u] + 1) continue; now++; k = dinic(v, min(res, edge[i])); now--; if (k == 0) d[v] = 0; edge[i] -= k, edge[i ^ 1] += k; res -= k; cur[u] = i; } return flow - res; }
int ind(int x, int y) { return (x - 1) * m + y; } int ind1(int x, int y) { return (x - 1) * m + y + n * m; } int ind2(int x, int y) { return (x - 1) * m + y + n * m * 2; }
int main() {
scanf("%d %d", &n, &m);
st = n * m * 3 + 1, ed = n * m * 3 + 2;
for (int i = 1; i <= n; i++) for (int j = 1; j <= m; j++) scanf("%d", &art[i][j]); for (int i = 1; i <= n; i++) for (int j = 1; j <= m; j++) scanf("%d", &sci[i][j]); for (int i = 1; i <= n; i++) for (int j = 1; j <= m; j++) scanf("%d", &sa[i][j]); for (int i = 1; i <= n; i++) for (int j = 1; j <= m; j++) scanf("%d", &ss[i][j]);
for (int i = 1; i <= n; i++) { for (int j = 1; j <= m; j++) { AddEdge(st, ind(i, j), art[i][j]); AddEdge(ind(i, j), ed, sci[i][j]); } }
for (int i = 1; i <= n; i++) { for (int j = 1; j <= m; j++) { AddEdge(st, ind1(i, j), sa[i][j]); AddEdge(ind2(i, j), ed, ss[i][j]); for (int k = 0; k <= 4; k++) { int nx = i + dx[k], ny = j + dy[k]; if (nx < 1 || ny < 1 || nx > n || ny > m) continue; AddEdge(ind1(i, j), ind(nx, ny), INF); AddEdge(ind(nx, ny), ind2(i, j), INF); } } }
for (int i = 1; i <= n; i++) { for (int j = 1; j <= m; j++) { ans += art[i][j] + sci[i][j] + sa[i][j] + ss[i][j]; } }
while (bfs()) { while ((tmp = dinic(st, INF))) { ans -= tmp; } }
printf("%d\n", ans);
return 0; }
|