HDU4966详解

#include <stdio.h>//这是别人的题解 
#include <string.h>
#include <iostream>
#include <algorithm>
#include <math.h>//不过这道题为什么要达到所有点，不是只要有最高等级的点就行了么？ 
using namespace std;
/*
* 最小树形图
* 复杂度O(NM)
* 点下标[0,n-1] 边下标[0,m-1]
* 有向边表示：u->v 花费为cost
* 返回最小树形图的边权和，-1表示不存在最小树形图
*/
const int INF = 100000000;
const int MAXN = 1010; //点数
const int MAXM = 1010000;//边数
#define ll int



struct Edge
{
	int u,v;
	ll cost;
}edge[MAXM];  //边 

      
int pre[MAXN],id[MAXN],visit[MAXN],edgenum;


void add(int u, int v, ll cost)//加边 
{
	Edge E = {u, v, cost}; edge[edgenum++] = E;//edgenum为边数，如果从0 开始的话 
}

ll in[MAXN];
//朱刘算法 
ll zhuliu(int root,int n,int m,Edge edge[])//树根(注意是有向树，树根不能任意) 点数 边数 edge
{//edge【】是什么 
	int u,v;
	ll res=0;
	//cout<<m<<endl;
	
	while(1)
	{
		//cout<<m<<endl;
		//cout<<n<<endl;
		//for(int i=0;i<m;i++)
		//cout<<edge[i].v<<" "<<edge[i].cost<<endl;
		for(int i = 0;i < n;i++)
			in[i] = INF;
			//每个点的入度？？ 
			cout<<"*****"<<endl;
		for(int i = 0;i < m;i++){
	//	cout<<edge[i].u<<" "<<edge[i].v<<" "<<edge[i].cost<<endl;
			if(edge[i].u != edge[i].v && edge[i].cost < in[edge[i].v])
			{
				
				pre[edge[i].v] = edge[i].u;//找每个点的最小入度 
				in[edge[i].v] = edge[i].cost;
			}
		}
			for(int i = 0;i < n;i++)//特判一下 
				if(i != root && in[i] == INF)//没找到入度 
					return -1;//不存在最小树形图
			int tn = 0;
			memset(id,-1,sizeof(id));
			memset(visit,-1,sizeof(visit));
			in[root] = 0;
			
			
			for(int i = 0;i < n;i++)//毛？寻找有向环个数 
			{
				res += in[i];//res为所有入度之和 
				v = i;
				while( visit[v] != i && id[v] == -1 && v != root)//id为-1表示不在已知的环中 
				{
					visit[v] = i;
					v = pre[v];//在他之前的点都被赋值vis为i了。。？ 
				}
				//这样是找到一个环了吧 
				if( v != root && id[v] == -1 )
				{   
					for(int u = pre[v]; u != v ;u = pre[u])
						id[u] = tn;//反正是个环，就一直放过去好了，第tn个环 
					id[v] = tn++;//环的个数加一 
				}
			}
			//cout<<tn<<endl;
			
			
			
			if(tn == 0)break;//没有有向环
			
			for(int i = 0;i < n;i++)
				if(id[i] == -1)
					id[i] = tn++;//环数即点数 ，除自环外的点 
			//for(int i=0;i<n;i++)
			//cout<<id[i]<<endl;		
			for(int i=0;i<m;i++)
			//cout<<edge[i].u<<" "<<edge[i].v<<" "<<edge[i].cost<<endl;	
			cout<<" ***"<<endl;	
			for(int i = 0;i < m;)//缩点 ,建立新图 
			{
				v = edge[i].v;
				cout<<i<<" "<<edge[i].u<<" "<<edge[i].v<<endl;
				edge[i].u = id[edge[i].u];//是一个环中 
				edge[i].v = id[edge[i].v];
				if(edge[i].u != edge[i].v)
					edge[i++].cost -= in[v];
				else
					swap(edge[i],edge[--m]);//减边，而且把edge[i]放到后面。。。太绝了 
			}
			
			n = tn;//改n值就行了 
			root = id[root];
			//cout<<tn<<endl;
	}
	return res; //-1为不存在最小树形图
}
void init()
{
	edgenum = 0;
}
#define N 55
int n, m, a[N], sum[N];
int Hash(int i, int j) //用这个来建图。。。 
{
	return sum[i-1]+j;
}
int main()
{
	int i, j, c, l1, d, l2, cost;
	while(scanf("%d %d",&n,&m), n+m)
	{
		init();
		sum[0] = 0;
		for(i = 1; i <= n; i++)scanf("%d",&a[i]), a[i]++, sum[i] = sum[i-1]+a[i];
		for(i = 1; i <= n; i++)//加所有的等级数 
			add(0, Hash(i,1), 0);//建所有点的图到level0 
		for(i = 1; i <= n; i++)
			for(j = 2; j <= a[i]; j++)//建所有点的图为0,高级到低级为0 
				add(Hash(i,j), Hash(i,j-1), 0);
		while(m--)
		{
			scanf("%d %d %d %d %d",&c, &l1, &d, &l2, &cost);
			l1++; l2++;
			add(Hash(c,l1), Hash(d,l2), cost);//改cost 
		}
		//for(int i=0;i<edgenum;i++)
		//cout<<edge[i].v<<" "<<edge[i].cost<<endl;
		printf("%d\n", zhuliu(0, sum[n]+1, edgenum, edge));
	}
	return 0;
}