poj2195 人进房子 KM

poj 2195  KM人进房子

题意：一个row*col的矩阵，m表示人，H表示房子，.表示空地，人数和房子数相等，如下图：

        5 5
        HH..m
        .....
        .....
        .....
        mm..H
现在要让所有的人都进入不同的房子内，问总共最少走多少步？
#include<stdio.h>
#include<string.h>
#define min(a,b)(a)<(b)?(a):(b)
#define INF 0x1f1f1f
#define maxn 105
#define clr(x)memset(x,0,sizeof(x))
int abs(int x){ return x>0?x:-x; }
int sx[maxn],sy[maxn];
int lx[maxn],ly[maxn];
int link[maxn];
int map[maxn][maxn];
int n,m;
int slack;
int find(int x)
{
    int i;
    sx[x]=1;
    for(i=1;i<=n;i++)
        if(!sy[i])
        {
            int tmp=lx[x]+ly[i]-map[x][i];
            if(tmp==0)
            {
                sy[i]=1;
                if(link[i]==0||find(link[i]))
                {
                    link[i]=x;
                    return 1;
                }
            }
            else if(tmp<slack)
                slack=tmp;
        }
    return 0;
}
int KM()
{
    int i,j,v,dmin,sum;
    for(i=1;i<=n;i++)
        for(j=1;j<=n;j++)
            map[i][j]=-map[i][j];
     
    for(i=1;i<=n;i++)
    {
        lx[i]=-INF;
        ly[i]=0;
        for(j=1;j<=n;j++)
            if(map[i][j]>lx[i])
                lx[i]=map[i][j];
    }
    for(v=1;v<=n;v++)
    {
        clr(sx);
        clr(sy);
        while(1)
        {
            slack=INF;
            if(find(v)) 
                break;
            for(i=1;i<=n;i++)
            {
                if(sx[i]) { lx[i]-=slack; sx[i]=0;  }
                if(sy[i]) { ly[i]+=slack; sy[i]=0;  }
            }
        }
    }
    sum=0;
    for(i=1;i<=n;i++)
        sum-=map[link[i]][i];
    return sum;
    
}
char a[maxn][maxn];
struct node
{
    int x,y;
}h[maxn],p[maxn];
int main()
{
    int i,j,hn,pn;
    while(scanf("%d%d",&n,&m),n&&m)
    {
        hn=pn=1;
        for(i=0;i<n;i++)
        {
            scanf("%s",a[i]);
            for(j=0;j<m;j++)
                if(a[i][j]=='H'){
                    h[hn].x=i;
                    h[hn++].y=j;
                }
                else if(a[i][j]=='m'){
                    p[pn].x=i;
                    p[pn++].y=j;
                }
        }
        for(i=1;i<pn;i++)
            for(j=1;j<hn;j++)
                map[i][j]=abs(p[i].x-h[j].x)+abs(p[i].y-h[j].y);
        n=pn-1;
        memset(link,0,sizeof(link));
        printf("%d\n",KM());
    }
    return 0;
}