POJ 2516 Minimum Cost 最小费用流

题目：

给出n*kk的矩阵，格子a[i][k]表示第i个客户需要第k种货物a[i][k]单位。

给出m*kk的矩阵，格子b[j][k]表示第j个供应商可以提供第k种货物b[j][k]单位。

再给出k个n*m的矩阵，格子c[k][i][j]表示第k种货物由j供应商提供给客户i的话，每单位运费为c[k][i][j]。

问最小费用。

分析：

　　刚开始时，虽然考虑到每种货物其实是不相关的，但是想到在跑费用流时应该没多大影响，所以直接建图，跑最小费用流，TLE了。。。

　　后来对于每种货物单独来考虑，即建图之后跑一次最小费用流，进行k次求费用流之后，判断总流是否等于需求的货物数量。这样建图，节点数明显减少了很多，实际效果非常明显。

#include <set>

#include <map>

#include <list>

#include <cmath>

#include <queue>

#include <stack>

#include <string>

#include <vector>

#include <cstdio>

#include <cstring>

#include <iostream>

#include <algorithm>

using namespace std;

typedef long long ll;

typedef unsigned long long ull;

#define debug puts("here")

#define rep(i,n) for(int i=0;i<n;i++)

#define rep1(i,n) for(int i=1;i<=n;i++)

#define REP(i,a,b) for(int i=a;i<=b;i++)

#define foreach(i,vec) for(unsigned i=0;i<vec.size();i++)

#define pb push_back

#define RD(n) scanf("%d",&n)

#define RD2(x,y) scanf("%d%d",&x,&y)

#define RD3(x,y,z) scanf("%d%d%d",&x,&y,&z)

#define RD4(x,y,z,w) scanf("%d%d%d%d",&x,&y,&z,&w)

#define All(vec) vec.begin(),vec.end()

#define MP make_pair

#define PII pair<int,int>

#define PQ priority_queue

#define cmax(x,y) x = max(x,y)

#define cmin(x,y) x = min(x,y)

#define Clear(x) memset(x,0,sizeof(x))

/*

#pragma comment(linker, "/STACK:1024000000,1024000000")

int size = 256 << 20; // 256MB

char *p = (char*)malloc(size) + size;

__asm__("movl %0, %%esp\n" :: "r"(p) );

*/

char IN;

inline void Int(int &x){

    while(!isdigit(IN=getchar()));

    x = IN-'0';

    while(isdigit(IN=getchar()))

        x = x*10+IN-'0';

}

/******** program ********************/

const int MAXN = 205;

const int MAXM = 100005;

const int INF = 1e9;

const int X = 52;

int pre[MAXN],dis[MAXN];

int po[MAXN],tol;

bool use[MAXN];

int q[MAXM],head,tail;

int n,m,vs,vt,ans;

int a[X][X],b[X][X],c[X][X][X];

int kk,flow;

struct node{

    int y,f,cost,next;

}edge[MAXM];

void Add(int x,int y,int f,int cost){

    edge[++tol].y = y;

    edge[tol].f = f;

    edge[tol].cost = cost;

    edge[tol].next = po[x];

    po[x] = tol;

}

void add(int x,int y,int f,int cost){

    Add(x,y,f,cost);

    Add(y,x,0,-cost);

}

bool spfa(){

    memset(use,false,sizeof(use));

    rep1(i,vt)

        dis[i] = INF;

    dis[vs] = 0;

    head = tail = 0;

    q[tail++] = vs;

    pre[vs] = 0;

    while(head<tail){

        int x = q[head++];

        use[x] = false;

        for(int i=po[x];i;i=edge[i].next){

            int y = edge[i].y;

            if(edge[i].f>0&&edge[i].cost+dis[x]<dis[y]){

                dis[y] = dis[x]+edge[i].cost;

                pre[y] = i;

                if(!use[y]){

                    use[y] = true;

                    q[tail++] = y;

                }

            }

        }

    }

    if(dis[vt]==INF)

        return false;

    int aug = INF;

    for(int i=pre[vt];i;i=pre[edge[i^1].y])

        aug = min(aug,edge[i].f);

    for(int i=pre[vt];i;i=pre[edge[i^1].y]){

        edge[i].f -= aug;

        edge[i^1].f += aug;

    }

    ans += dis[vt]*aug;

    return true;

}

inline void fareFlow(int k){

    Clear(po);

    tol = 1;

    vs = MAXN-3;

    vt = vs+1;

    rep1(i,n)if(a[i][k])

        add( vs,i,a[i][k],0 );

    rep1(j,m)if(b[j][k]){

        add( j+n,vt,b[j][k],0 );

        rep1(i,n)

            add(i,j+n,b[j][k],c[k][i][j]);

    }

    while(spfa())

        ;

    for(int i=po[vt];i;i=edge[i].next)

        if(edge[i].f>0)

            flow += edge[i].f;

}

int main(){

#ifndef ONLINE_JUDGE

    freopen("sum.in","r",stdin);

    //freopen("sum.out","w",stdout);

#endif

    while(true){

        Int(n);Int(m);Int(kk);

        if(!n&&!m&&!kk)return 0;

        int tot = 0;

        rep1(i,n)

            rep1(k,kk){

                Int(a[i][k]);

                tot += a[i][k];

            }

        rep1(j,m)

            rep1(k,kk)

                Int(b[j][k]);

        rep1(k,kk)

            rep1(i,n)

                rep1(j,m)

                    Int(c[k][i][j]);

        flow = 0;

        ans = 0;

        rep1(k,kk)

            fareFlow(k);

        printf("%d\n",tot==flow?ans:-1);

    }

    return 0;

}