#include <iostream>
#include <string>
#include <algorithm>
#include <cctype>
#include <cstdio>
#include <cstdlib>
#include <queue>
#include <stack>
#include <set>
#include <map>
#include <cstring>

using namespace std;

#define ll long long
#define clr(a)   memset(a,0,sizeof(a))
char maps[25][25];
int vis[25][25];
int dir[4][2] = {
        {0, 1}, {1, 0},
        {0, -1}, {-1, 0}
    };
int num,n,m;
void dfs(int x,int y,char c)
{
    if(maps[x][y]!=c||x<0||x>=n||y<0||y>=m||vis[x][y]==1)
        return ;
    vis[x][y]=1;
    num++;
    for(int i = 0; i<4;i++)
    {
        dfs(x+dir[i][0],y+dir[i][1],c);
    }
}
int main()
{
	while (cin >> n>>m&&n!=0&&m!=0)
	{
        int cnt=0;
        clr(maps);
        clr(vis);
        num=0;
        for(int i = 0;i < n; i++)
        {
            for(int j = 0; j <m ; j++)
            {
                cin>>maps[i][j];
            }
          //  getchar();
            }
        for(int i = 0;i < n; i++)
        {
            for(int j = 0; j <m ; j++)
            {
                num=0;
                dfs(i,j,maps[i][j]);
                if(num!=0)
                    cnt++;
            }
        }
        cout<<cnt<<endl;
    }
	return 0;
}