bzoj1565 [NOI2009]植物大战僵尸 最大权闭合子图

Description

---

Plants vs. Zombies（PVZ）是最近十分风靡的一款小游戏。Plants（植物）和Zombies（僵尸）是游戏的主角，其
中Plants防守，而Zombies进攻。该款游戏包含多种不同的挑战系列，比如Protect Your Brain、Bowling等等。其
中最为经典的，莫过于玩家通过控制Plants来防守Zombies的进攻，或者相反地由玩家通过控制Zombies对Plants发
起进攻。
现在，我们将要考虑的问题是游戏中Zombies对Plants的进攻，请注意，本题中规则与实际游戏有所不同。游戏中
有两种角色，Plants和Zombies，每个Plant有一个攻击位置集合，它可以对这些位置进行保护；而Zombie进攻植物
的方式是走到植物所在的位置上并将其吃掉。
游戏的地图可以抽象为一个N行M列的矩阵，行从上到下用0到N–1编号，列从左到右用0到M–1编号；在地图的每个
位置上都放有一个Plant，为简单起见，我们把位于第r行第c列的植物记为Pr, c。
Plants分很多种，有攻击类、防守类和经济类等等。为了简单的描述每个Plant，定义Score和Attack如下：
Score[Pr, c]
Zombie击溃植物Pr, c可获得的能源。若Score[Pr, c]为非负整数，则表示击溃植物Pr, c可获得能源Score[Pr, c]
，若为负数表示击溃Pr, c需要付出能源 -Score[Pr, c]。
Attack[Pr, c]
植物Pr, c能够对Zombie进行攻击的位置集合。
Zombies必须从地图的右侧进入，且只能沿着水平方向进行移动。Zombies攻击植物的唯一方式就是走到该植物所在
的位置并将植物吃掉。因此Zombies的进攻总是从地图的右侧开始。也就是说，对于第r行的进攻，Zombies必须首
先攻击Pr, M-1；若需要对Pr, c（0 ≤ c < M-1）攻击，必须将Pr,M-1, Pr, M-2 … Pr, c+1先击溃，并移动到位
置(r, c)才可进行攻击。
在本题的设定中，Plants的攻击力是无穷大的，一旦Zombie进入某个Plant的攻击位置，该Zombie会被瞬间消灭，
而该Zombie没有时间进行任何攻击操作。因此，即便Zombie进入了一个Plant所在的位置，但该位置属于其他植物
的攻击位置集合，则Zombie会被瞬间消灭而所在位置的植物则安然无恙（在我们的设定中，Plant的攻击位置不包
含自身所在位置，否则你就不可能击溃它了）。
Zombies的目标是对Plants的阵地发起进攻并获得最大的能源收入。每一次，你可以选择一个可进攻的植物进行攻
击。本题的目标为，制定一套Zombies的进攻方案，选择进攻哪些植物以及进攻的顺序，从而获得最大的能源收入
。

1 ≤ N ≤ 20，1 ≤ M ≤ 30，-10000 ≤ Score ≤ 10000 。

Solution

---

把限制关系看成是有向边，那么题目要求我们选出一个最大权闭合子图。由于我并没有看出这是个最大权闭合子图因此傻傻地写了一个dag上的dp
注意到可能存在环，因此需要把边反向跑拓扑去掉环和环保护的点，这些点我们显然是不能选的

Code

---

#include <stdio.h>
#include <string.h>
#include <algorithm>
#include <vector>
#include <stack>
#include <queue>
#define rep(i,st,ed) for (int i=st;i<=ed;++i)
#define fill(x,t) memset(x,t,sizeof(x))

const int INF=0x3f3f3f3f;
const int N=605;
const int L=35;
const int E=N*N*2;

std:: stack <int> stack;
std:: queue <int> que;

struct edge {int x,y,next;} e[E];
struct mxFlow {
    struct edge {int x,y,w,next;} e[E];

    int dis[N],ls[N],cur[N],edCnt;

    void add_edge(int x,int y,int w) {
        e[++edCnt]=(edge) {x,y,w,ls[x]}; ls[x]=edCnt;
        e[++edCnt]=(edge) {y,x,0,ls[y]}; ls[y]=edCnt;
    }

    bool bfs(int st,int ed) {
        for (;!que.empty();) que.pop();
        fill(dis,0); dis[st]=1;
        que.push(st);
        for (;!que.empty();) {
            int now=que.front(); que.pop();
            for (int i=ls[now];i;i=e[i].next) {
                if (e[i].w>0&&dis[e[i].y]==0) {
                    dis[e[i].y]=dis[now]+1;
                    que.push(e[i].y);
                    if (e[i].y==ed) return true;
                }
            }
        }
        return false;
    }

    int find(int now,int ed,int mn) {
        if (now==ed||!mn) return mn;
        int ret=0;
        for (int &i=cur[now];i;i=e[i].next) {
            if (e[i].w>0&&dis[now]+1==dis[e[i].y]) {
                int d=find(e[i].y,ed,std:: min(mn-ret,e[i].w));
                e[i].w-=d; e[i^1].w+=d; ret+=d;
                if (ret==mn) break;
            }
        }
        return ret;
    }

    int dinic(int st,int ed) {
        int ret=0;
        for (;bfs(st,ed);) {
            rep(i,st,ed) cur[i]=ls[i];
            ret+=find(st,ed,INF);
        }
        return ret;
    }
} flow;

int id[L][L],v[N],d[N],bel[N];
int ls1[N],ls2[N],edCnt;

bool vis[N],rec[N];

int read() {
    int x=0,v=1; char ch=getchar();
    for (;ch<'0'||ch>'9';v=(ch=='-')?(-1):(v),ch=getchar());
    for (;ch<='9'&&ch>='0';x=x*10+ch-'0',ch=getchar());
    return x*v;
}

void add_edge(int x,int y) {
    e[++edCnt]=(edge) {x,y,ls1[x]}; ls1[x]=edCnt;
    e[++edCnt]=(edge) {y,x,ls2[y]}; ls2[y]=edCnt;
}

void top_sort(int n) {
    for (;!que.empty();) que.pop();
    rep(i,1,n) if (!d[i]) {
        que.push(i);
    }
    for (;!que.empty();) {
        int now=que.front(); que.pop(); vis[now]=1;
        for (int i=ls1[now];i;i=e[i].next) {
            if (!(--d[e[i].y])) que.push(e[i].y);
        }
    }
}

void solve(int n) {
    top_sort(n);
    flow.edCnt=1; int ans=0;
    rep(i,1,n) {
        if (!vis[i]) continue;
        if (v[i]>0) {
            flow.add_edge(0,i,v[i]);
            ans+=v[i];
        } else flow.add_edge(i,n+1,-v[i]);
        for (int j=ls2[i];j;j=e[j].next) {
            if (!vis[e[j].y]) continue;
            flow.add_edge(i,e[j].y,INF);
        }
    }
    printf("%d\n", ans-flow.dinic(0,n+1));
}

int main(void) {
    int n=read(),m=read();
    rep(i,1,n) rep(j,1,m) {
        id[i][j]=++id[0][0];
    }
    rep(i,1,n) rep(j,1,m) {
        int now=id[i][j]; v[now]=read();
        for (int w=read();w;w--) {
            int x=1+read(),y=1+read();
            add_edge(id[i][j],id[x][y]);
            d[id[x][y]]++;
        }
        if (j>1) {
            add_edge(id[i][j],id[i][j-1]);
            d[id[i][j-1]]++;
        }
    }
    solve(n*m);
    return 0;
}