poj2195

#include<iostream>
#include<limits.h>
#include<stdio.h>
#include<string.h>
#include<cmath>
#define MAX 1000
using namespace std;
struct node
{
    int x;
    int y;
}house[MAX],men[MAX];
int lh,lm;
int wij[MAX][MAX];
int lx[MAX],ly[MAX];
int match[MAX];
bool vx[MAX],vy[MAX];
int getw(node a,node b)
{
    return abs(a.x-b.x)+abs(a.y-b.y);
}
bool find(int k)
{
    int i,j;
    vx[k]=true;
    for(i=0;i<lh;i++)
    {
        if(!vy[i]&&lx[k]+ly[i]==wij[k][i])
        {
            vy[i]=true;
            if(match[i]==-1||find(match[i]))
            {
                match[i]=k;
                return true;
            }
        }
    }
    return false;
}
int ek()
{
    int i,j,k,sum=0;
    memset(lx,0,sizeof(lx));
    memset(ly,0,sizeof(ly));
    memset(match,-1,sizeof(match));
    for(i=0;i<lm;i++)
    {
        lx[i]=INT_MIN;
        for(j=0;j<lh;j++)
        {
            ly[j]=0;
            if(lx[i]<wij[i][j])
              lx[i]=wij[i][j];
        }
    }
    for(i=0;i<lm;i++)
    {
        while(1)
        {
            memset(vx,0,sizeof(vx));
            memset(vy,0,sizeof(vy));
            if(find(i))
              break;
            int inc=INT_MAX;
            for(j=0;j<lm;j++)
            {
                if(vx[j])
                {
                    for(k=0;k<lm;k++)
                    {
                        if(!vy[k])
                        {
                            if(inc>lx[j]+ly[k]-wij[j][k])
                              inc=lx[j]+ly[k]-wij[j][k];
                        }
                    }
                }
            }
            for(j=0;j<lm;j++)
            {
                if(vx[j])
                  lx[j]-=inc;
            }
            for(j=0;j<lm;j++)
            {
                if(vy[j])
                  ly[j]+=inc;
            }

        }
    }
    for(i=0;i<lm;i++)
      if(match[i]!=-1)
      sum+=wij[match[i]][i];
    return sum;
}
int main()
{
    int m,n;
    int i,j,k;
    char str[MAX];
    while(scanf("%d%d",&m,&n))
    {
        if(m==0&&n==0)break;
        lm=0;lh=0;
        for(i=0;i<m;i++)
        {
            scanf("%s",str);
            for(j=0;j<n;j++)
            {
                if(str[j]=='H')
                {
                    house[lh].x=i;
                    house[lh++].y=j;
                }
                else
                  if(str[j]=='m')
                  {
                      men[lm].x=i;
                      men[lm++].y=j;
                  }
            }
        }
        for(i=0;i<lm;i++)
          for(j=0;j<lh;j++)
          {
              wij[i][j]=-getw(men[i],house[j]);
          }
        printf("%d\n",-ek());
    }
}