最大权闭合子图的求法 :
源点向正权连边,原图容量为INF,负权点向汇点连边,权值为绝对值。 最大权闭合子图的值 = 正权和 - 最小割(最大流)
题意:n个工程,m个公司,第二行给出m个公司向政府缴纳的税款(正权),k个公司,接下来k行表示工程的起始点,工程由哪个公司负责以及工程的补贴(负权)。求政府获得的最大利润是多少。
套用一下就得到答案了。
#include<bits/stdc++.h>
using namespace std;
const int N=11234;
const int M=1123456;
const int INF=0x3f3f3f3f;
int n,m;
struct node
{
int u,v,next,cap;
} eage[M];
int source,sink;
int cur[N],dep[N],gap[N];
int head[N];
int deg[N];
int top;
int S[N];
int a[N],b[N],c[N],d[N],s[N];
void Add(int u,int v,int w)
{
eage[top].u=u;
eage[top].v=v;
eage[top].cap=w;
eage[top].next=head[u];
head[u]=top++;
eage[top].u=v;
eage[top].v=u;
eage[top].cap=0;
eage[top].next=head[v];
head[v]=top++;
}
void BFS()
{
queue<int>q;
memset(dep,-1,sizeof(dep));
memset(gap,0,sizeof(gap));
gap[0]=1;
dep[sink]=0;
q.push(sink);
while(!q.empty())
{
int u=q.front();
q.pop();
for(int i=head[u]; i!=-1; i=eage[i].next)
{
int v=eage[i].v;
if(dep[v]==-1)
{
q.push(v);
dep[v]=dep[u]+1;
gap[dep[v]]++;
}
}
}
}
int Sap()
{
BFS();
memcpy(cur,head,sizeof(head));
int tot=0;
int u=source;
int ans=0;
while(dep[source]<n)
{
if(u==sink)
{
int Min=INF;
int inser;
for(int i=0; i<=tot-1; i++)
{
if(Min>eage[S[i]].cap)
{
Min=eage[S[i]].cap;
inser=i;
}
}
for(int i=0; i<=tot-1; i++)
{
eage[S[i]].cap-=Min;
eage[S[i]^1].cap+=Min;
}
ans+=Min;
tot=inser;
u=eage[S[tot]].u;
}
if(u!=sink&&gap[dep[u]-1]==0)
break;
int v;
int i;
for(i=cur[u]; i!=-1; i=eage[i].next)
{
v=eage[i].v;
if(eage[i].cap&&dep[v]+1==dep[u])
{
break;
}
}
if(i!=-1)
{
cur[u]=i;
S[tot++]=i;
u=v;
continue;
}
int Min=n;
for(int i=head[u]; i!=-1; i=eage[i].next)
{
int v=eage[i].v;
if(eage[i].cap&&dep[v]<Min)
{
Min=dep[v];
cur[u]=i;
}
}
gap[dep[u]]--;
dep[u]=Min+1;
gap[dep[u]]++;
if(u!=source)u=eage[S[--tot]].u;
}
return ans;
}
int main()
{
while(~scanf("%d%d",&n,&m))
{
if(n==0&&m==0)break;
memset(head,-1,sizeof(head));
top=0;
memset(s,0,sizeof(s));
source=0;
sink=m+1;
int sum=0;
for(int i=1;i<=m;i++)
{
int x;
scanf("%d",&x);
Add(source,i,x);
sum+=x;
}
int k;
scanf("%d",&k);
for(int i=1;i<=k;i++)
{
scanf("%d%d%d%d",&a[i],&b[i],&c[i],&d[i]);
s[c[i]]+=d[i];
}
for(int i=1;i<=k;i++)
{
for(int j=1;j<=k;j++)
{
if(i!=j&&c[i]!=c[j]&&b[i]==a[j])
{
Add(c[i],c[j],INF);
}
}
}
n=sink+1;
for(int i=1;i<=m;i++)
{
Add(i,sink,s[i]);
}
printf("%d\n",sum-Sap());
}
return 0;
}