hdu1533Going Home KM算法

//给一个n*m的图，
//m表示人，h表示房子
//问全部人走回家的最小步数
//每一个人仅仅能进一间房
//非常明显的最大带权匹配
//每一个人到每每间房的距离即为权值
//因为是求最小，仅仅要改为负权即可
#include<cstdio>
#include<cstring>
#include<iostream>
#include<queue>
#include<cmath>
using namespace std ;
const int maxn = 110 ;
const int inf  = 0x3f3f3f3f ;
int map[maxn][maxn] ;
int lx[maxn] ,ly[maxn] ;
int slack[maxn] , match[maxn] ;
int visx[maxn] , visy[maxn] ;
char str[maxn][maxn] ;
int mx[maxn] , my[maxn] ;
int hx[maxn] , hy[maxn] ;
int n , m ;
bool find(int x)
{
    visx[x] = 1 ;
    for(int i = 1;i <= n;i++)
    {
        if(visy[i])continue ;
        int tmp = lx[x] + ly[i] - map[x][i] ;
        if(tmp == 0)
        {
            visy[i] = 1 ;
            if(match[i] == -1 || find(match[i]))
            {
                match[i] = x ;
                return true ;
            }
        }
        else slack[i] = min(slack[i] , tmp) ;
    }
    return false ;
}
int KM()
{
   memset(match , -1 , sizeof(match)) ;
   memset(ly , 0 , sizeof(ly)) ;
   for(int i = 1;i <= n;i++)
   {
       lx[i] = -inf ;
       for(int j = 1;j <= n;j++)
         lx[i] = max(lx[i] , map[i][j]) ;
   }
   for(int i = 1;i <= n;i++)
   {
       for(int j = 1;j <= n;j++)
          slack[j] = inf ;
       while(1)
       {
           memset(visx , 0  ,sizeof(visx)) ;
           memset(visy , 0 , sizeof(visy)) ;
           if(find(i))break ;
           int d = inf ;
           for(int j = 1;j <= n;j++)
             if(!visy[j])
               d = min(slack[j] , d) ;
           for(int j = 1;j <= n;j++)
             if(visx[j])
               lx[j] -= d ;
            for(int j = 1;j <= n;j++)
              if(visy[j])
                 ly[j] += d ;
               else
                 slack[j] -= d ;
       }
   }
   int ans = 0 ;
   for(int j = 1;j <= n;j++)
   ans += map[match[j]][j];
   return ans ;
}
int main()
{
   // freopen("in.txt" , "r" , stdin) ;
    while(scanf("%d%d" , &n , &m) && (n+m))
    {
        int len_m = 0 , len_h = 0 ;
        for(int i = 1;i <= n;i++)
        {
            scanf("%s" , &str[i][1]) ;
            for(int j = 1;j <= m;j++)
            if(str[i][j] == 'm')
            {
                mx[++len_m] = i ;
                my[len_m] = j ;
            }
            else if(str[i][j] == 'H')
            {
                hx[++len_h] = i ;
                hy[len_h] = j ;
            }
        }
        memset(map , 0 ,sizeof(map)) ;
        for(int i = 1;i <= len_m;i++)
            for(int j = 1;j <= len_h;j++)
            map[i][j] = (int)(-abs((double)(mx[i]-hx[j])) - abs((double)(my[i]-hy[j]))) ;
        n = len_m ;
        int ans = KM() ;
        cout<<-ans<<endl;
    }
}