HDU 3917 Road constructions(最小割---最大权闭合)

题目地址：HDU 3917

这题简直神题意。。。题目本身就很难看懂不说。。即使看懂了，也对这题意的逻辑感到无语。。。不管了。。就按照那题意上说的做吧。。。

题意：给你n个城市，m个公司，若干条可能要建设的道路，每条有向道路需要花费，还有负责建设这条道路的公司编号，如果要建设ab道路，那么负责这条道路的公司需要建设完它负责的所有道路，而且对负责道路bx（x任意）的公司同样要求，以此类推。

每个公司还要交税，问最多能收多少税。

按照题意来的话，相当于某些公司对某些公司有依赖性。最终的利润==收的税-建设道路的花费。所以是一个最大权闭合模型。

代码如下：

#include <iostream>
#include <cstdio>
#include <string>
#include <cstring>
#include <stdlib.h>
#include <math.h>
#include <ctype.h>
#include <queue>
#include <map>
#include <set>
#include <algorithm>

using namespace std;
const int INF=0x3f3f3f3f;
int head[6000], cnt, source, sink, nv, val[6000];
int d[6000], num[6000], pre[6000], cur[6000];
struct node
{
    int u, v, cap, next;
} edge[1000000];
void add(int u, int v, int cap)
{
    edge[cnt].v=v;
    edge[cnt].cap=cap;
    edge[cnt].next=head[u];
    head[u]=cnt++;

    edge[cnt].v=u;
    edge[cnt].cap=0;
    edge[cnt].next=head[v];
    head[v]=cnt++;
}
void bfs()
{
    memset(d,-1,sizeof(d));
    memset(num,0,sizeof(num));
    queue<int>q;
    q.push(sink);
    d[sink]=0;
    num[0]=1;
    while(!q.empty())
    {
        int u=q.front();
        q.pop();
        for(int i=head[u]; i!=-1; i=edge[i].next)
        {
            int v=edge[i].v;
            if(d[v]==-1)
            {
                d[v]=d[u]+1;
                num[d[v]]++;
                q.push(v);
            }
        }
    }
}
int isap()
{
    memcpy(cur,head,sizeof(cur));
    int flow=0, u=pre[source]=source, i;
    bfs();
    while(d[source]<nv)
    {
        if(u==sink)
        {
            int f=INF, pos;
            for(i=source; i!=sink; i=edge[cur[i]].v)
            {
                if(f>edge[cur[i]].cap)
                {
                    f=edge[cur[i]].cap;
                    pos=i;
                }
            }
            for(i=source; i!=sink; i=edge[cur[i]].v)
            {
                edge[cur[i]].cap-=f;
                edge[cur[i]^1].cap+=f;
            }
            flow+=f;
            u=pos;
        }
        for(i=cur[u]; i!=-1; i=edge[i].next)
        {
            if(d[edge[i].v]+1==d[u]&&edge[i].cap)
            {
                break;
            }
        }
        if(i!=-1)
        {
            cur[u]=i;
            pre[edge[i].v]=u;
            u=edge[i].v;
        }
        else
        {
            if(--num[d[u]]==0) break;
            int mind=nv;
            for(i=head[u]; i!=-1; i=edge[i].next)
            {
                if(mind>d[edge[i].v]&&edge[i].cap)
                {
                    mind=d[edge[i].v];
                    cur[u]=i;
                }
            }
            d[u]=mind+1;
            num[d[u]]++;
            u=pre[u];
        }
    }
    return flow;
}
int head1[2000], cnt1;
struct node1
{
    int u, v, c, next;
}city[1000000];
void add1(int u, int v, int c)
{
    city[cnt1].v=v;
    city[cnt1].c=c;
    city[cnt1].next=head1[u];
    head1[u]=cnt1++;
}
int main()
{
    int n, m, k, u, v, x, c, sum, i, j, kk;
    while(scanf("%d%d",&n,&m)!=EOF&&(n+m))
    {
        memset(head,-1,sizeof(head));
        memset(head1,-1,sizeof(head1));
        cnt1=0;
        cnt=0;
        source=0;
        sink=m+1;
        nv=sink+1;
        sum=0;
        for(i=1;i<=m;i++)
        {
            scanf("%d",&val[i]);
        }
        scanf("%d",&k);
        while(k--)
        {
            scanf("%d%d%d%d",&u,&v,&x,&c);
            add1(u,v,x);
            val[x]-=c;
        }
        for(i=1;i<=m;i++)
        {
            if(val[i]>0)
                {
                    add(source,i,val[i]);
                    sum+=val[i];
                }
            else
                add(i,sink,-val[i]);
        }
        for(i=1;i<=n;i++)
        {
            for(j=head1[i];j!=-1;j=city[j].next)
            {
                int v=city[j].v;
                for(kk=head1[v];kk!=-1;kk=city[kk].next)
                {
                    add(city[j].c,city[kk].c,INF);
                }
            }
        }
        int ans=sum-isap();
        printf("%d\n",ans>0?ans:0);
    }
    return 0;
}