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
| #include <iostream> #include <cstdio> #include <queue> #define maxn 810 #define maxm 21 #define INF 1000000000 using namespace std;
int dx[] = { 0, 0, 0, 1, 1, 1, -1, -1, -1 }; int dy[] = { 1, -1, 0, 1, -1, 0, 1, -1, 0 };
int n, m, s, t;
int a[maxm][maxm], b[maxm][maxm], c[maxn][maxn];
inline int id(int x, int y) { return (x - 1) * m + y; }
struct Edge { int to, next, w, fi; } e[1000000]; int c1, head[maxn]; inline void add_edge(int u, int v, int w, int fi) { e[c1].to = v; e[c1].w = w; e[c1].fi = fi; e[c1].next = head[u]; head[u] = c1++; }
inline void Add_edge(int u, int v, int w, int fi) { add_edge(u, v, w, fi); add_edge(v, u, 0, -fi); }
int dis[maxn], la[maxn], fl[maxn], pre[maxn]; bool vis[maxn]; bool spfa() { fill(dis, dis + maxn, INF); dis[s] = 0; fill(vis, vis + maxn, 0); vis[s] = 1; queue<int> Q; Q.push(s); pre[t] = -1; fl[s] = INF; while (!Q.empty()) { int u = Q.front(); Q.pop(); vis[u] = 0; for (int i = head[u]; ~i; i = e[i].next) { int v = e[i].to, w = e[i].w, fi = e[i].fi; if (w > 0 && dis[v] > dis[u] + fi) { dis[v] = dis[u] + fi; pre[v] = u; fl[v] = min(fl[u], w); la[v] = i; if (vis[v]) continue; vis[v] = 1; Q.push(v); } } } return ~pre[t]; }
int mcmf(int _mf) { int mf = 0, mc = 0; while (spfa()) { mf += fl[t]; mc += dis[t] * fl[t]; int now = t; while (now != s) { e[la[now]].w -= fl[t]; e[la[now] ^ 1].w += fl[t]; now = pre[now]; } } return mf == _mf ? mc : -1; }
int main() { fill(head, head + maxn, -1); ios::sync_with_stdio(false); cin.tie(nullptr); cout.tie(nullptr);
cin >> n >> m; int s1 = 0, s2 = 0, s3 = 0; s = 0; t = 2 * n * m + 1; for (int i = 1; i <= n; ++i) { char s[maxm]; cin >> s + 1; for (int j = 1; j <= m; ++j) a[i][j] = s[j] - '0'; } for (int i = 1; i <= n; ++i) { char s[maxm]; cin >> s + 1; for (int j = 1; j <= m; ++j) b[i][j] = s[j] - '0'; } for (int i = 1; i <= n; ++i) { char s[maxm]; cin >> s + 1; for (int j = 1; j <= m; ++j) c[i][j] = s[j] - '0'; } for (int i = 1; i <= n; ++i) for (int j = 1; j <= m; ++j) { s1 += a[i][j], s2 += b[i][j], s3 += a[i][j] & b[i][j]; if (a[i][j] && b[i][j]) a[i][j] = b[i][j] = 0; else if (a[i][j] || b[i][j]) ++c[i][j]; } if (s1 != s2) return cout << "-1\n", 0; s1 -= s3; for (int i = 1; i <= n; ++i) for (int j = 1; j <= m; ++j) { Add_edge(id(i, j), id(i, j) + n * m, c[i][j] / 2, 0); if (a[i][j]) Add_edge(s, id(i, j), 1, 0); if (b[i][j]) Add_edge(id(i, j) + n * m, t, 1, 0); for (int k = 0; k < 9; ++k) { int x = i + dx[k], y = j + dy[k]; if (x < 1 || x > n || y < 1 || y > m) continue; Add_edge(id(i, j) + n * m, id(x, y), INF, 1); } } cout << mcmf(s1) << "\n"; return 0; }
|