思路
如果想消灭掉一个植物,那么必须先消灭掉左右能保护这个植物的植物。这就成了最大权闭合子图的模板题了。
有两个需要注意的地方。
第一个就是,能保护当前植物的植物还有当前植物右面的所有植物。
第二个就是,在环里的植物或者是被在环里的植物所保护的植物是无法消灭的。
所以先拓扑一下,找出所有可能被消灭的植物,然后按照最大权闭合子图的做法做就行了。
代码
#include<cstdio>
#include<iostream>
#include<cstdlib>
#include<cmath>
#include<ctime>
#include<queue>
#include<cstring>
#include<vector>
#include<bitset>
using namespace std;
typedef long long ll;
#define num(x,y) y + (x - 1) * m
const int N = 100000,M = 1000000,INF = 1e9;
vector<int>E[N];
ll read() {
ll x=0,f=1;char c=getchar();
while(c<'0'||c>'9') {
if(c=='-') f=-1;
c=getchar();
}
while(c>='0'&&c<='9') {
x=x*10+c-'0';
c=getchar();
}
return x*f;
}
struct node {
int v,nxt,w;
}e[M];
int head[N],ejs = 1;
void add(int u,int v,int w) {
e[++ejs].v = v;e[ejs].w = w;e[ejs].nxt = head[u];head[u] = ejs;
e[++ejs].v = u;e[ejs].w = 0;e[ejs].nxt = head[v];head[v] = ejs;
}
int n,m,w[N],du[N];
queue<int>q;
int dep[N];
int S,T;
int bfs() {
memset(dep,0,sizeof(dep));
while(!q.empty()) q.pop();
dep[S] = 1;q.push(S);
while(!q.empty()) {
int u = q.front();q.pop();
for(int i = head[u];i;i = e[i].nxt) {
int v = e[i].v;
if(!dep[v] && e[i].w) {
q.push(v);
dep[v] = dep[u] + 1;
if(v == T) return 1;
}
}
}
return 0;
}
int cur[N];
int dfs(int u,int now) {
if(u == T) return now;
int ret = 0;
for(int &i = cur[u];i;i = e[i].nxt) {
int v = e[i].v;
if(dep[v] == dep[u] + 1 && e[i].w) {
int k = dfs(v,min(now - ret,e[i].w));
e[i].w -= k;
e[i ^ 1].w += k;
ret += k;
if(now == ret) return ret;
}
}
return ret;
}
int dinic() {
int ans = 0;
while(bfs()) {
memcpy(cur,head,sizeof(cur));
ans += dfs(S,INF);
}
return ans;
}
int main() {
n = read(),m = read();
S = n * m + 1,T = S + 1;
for(int i = 1;i <= n;++i) {
for(int j = 1;j <= m;++j) {
w[num(i,j)] = read();int k = read();
for(int z = 1;z <= k;++z) {
int x = read() + 1,y = read() + 1;
E[num(i,j)].push_back(num(x,y));
du[num(x,y)]++;
}
}
}
for(int i = 1;i <= n;++i) {
for(int j = 2;j <= m;++j) {
E[num(i,j)].push_back(num(i,j - 1));
du[num(i,j-1)]++;
}
}
for(int i = 1;i <= n * m;++i) if(!du[i]) q.push(i);
while(!q.empty()) {
int u = q.front();q.pop();
int k = E[u].size();
for(int i = 0; i < k;++i) {
int v = E[u][i];
du[v]--;
if(!du[v]) q.push(v);
}
}
int ans = 0;
for(int i = 1;i <= n * m;++i) {
if(!du[i]) {
if(w[i] >= 0) add(S,i,w[i]),ans += w[i];
else add(i,T,-w[i]);
int k = E[i].size();
for(int j = 0;j < k;++j) {
int v = E[i][j];
if(!du[v]) add(v,i,INF);
}
}
}
cout<<ans - dinic();
return 0;
}