Farm Irrigation


Time Limit: 1 Second      Memory Limit: 32768 KB


Benny has a spacious farm land to irrigate. The farm land is a rectangle, and is divided into a lot of samll squares. Water pipes are placed in these squares. Different square has a different type of pipe. There are 11 types of pipes, which is marked from A to K, as Figure 1 shows.


Figure 1

Benny has a map of his farm, which is an array of marks denoting the distribution of water pipes over the whole farm. For example, if he has a map

ADC FJK IHE then the water pipes are distributed like


Figure 2

Several wellsprings are found in the center of some squares, so water can flow along the pipes from one square to another. If water flow crosses one square, the whole farm land in this square is irrigated and will have a good harvest in autumn.

Now Benny wants to know at least how many wellsprings should be found to have the whole farm land irrigated. Can you help him?

Note: In the above example, at least 3 wellsprings are needed, as those red points in Figure 2 show.

Input

There are several test cases! In each test case, the first line contains 2 integers M and N, then M lines follow. In each of these lines, there are N characters, in the range of 'A' to 'K', denoting the type of water pipe over the corresponding square. A negative M or N denotes the end of input, else you can assume 1 <= M, N <= 50.

Output

For each test case, output in one line the least number of wellsprings needed.

Sample Input

2 2

      DK

      HF

3 3

   ADC

   FJK

    IHE

-1 -1      Sample Output 2 3

char mp[55][55];
int used[55][55];
int N,m,sum;
struct node{
int up,down,left,right;
};
node n[11]={{1,0,1,0},{1,0,0,1},{0,1,1,0},{0,1,0,1},{1,1,0,0},{0,0,1,1},{1,0,1,1},{1,1,1,0},{0,1,1,1},{1,1,0,1},{1,1,1,1}};    //保存农田形状
int getnode(char x){
return x-'A';
}
int cango(int x,int y){
if(x<=0||x>m||y<=0||y>N)
return 0;
return 1;
}
void dfs(int x,int y){
int i,j,k,xx,yy;
for(i=0;i<4;i++){
if(i==0){   //上走
xx=x-1;
yy=y;
if(cango(xx,yy)&&!used[xx][yy]&&n[getnode(mp[xx][yy])].down&&n[getnode(mp[x][y])].up){    
used[xx][yy]=1;
dfs(xx,yy);
}
}
else if(i==1){
xx=x+1;
yy=y;
if(cango(xx,yy)&&!used[xx][yy]&&n[getnode(mp[xx][yy])].up&&n[getnode(mp[x][y])].down){
used[xx][yy]=1;
dfs(xx,yy);
}
}
else if(i==2){
xx=x;
yy=y-1;
if(cango(xx,yy)&&!used[xx][yy]&&n[getnode(mp[xx][yy])].right&&n[getnode(mp[x][y])].left){
used[xx][yy]=1;
dfs(xx,yy);
}
}
else if(i==3){
xx=x;
yy=y+1;
if(cango(xx,yy)&&!used[xx][yy]&&n[getnode(mp[xx][yy])].left&&n[getnode(mp[x][y])].right){
used[xx][yy]=1;
dfs(xx,yy);
}
}
}
}
int main(){

int i,j,k;
while(scanf("%d%d",&m,&N)&&N!=-1&&m!=-1){
sum=0;
memset(used,0,sizeof(used));
for(i=1;i<=m;i++)
for(j=1;j<=N;j++){
scanf("%1s",&mp[i][j]);
}

for(i=1;i<=m;i++)
for(j=1;j<=N;j++){
if(used[i][j]==0){
// used[i][j]=1;
sum++;
dfs(i,j);
}
}
cout<<sum<<endl;
}

return 0;
}