h,w=gets.split.map &:to_i
g={}
x=a=0,i=0
q=?.*w+$<.read+?.*w+=1
q.bytes{|c|c>97&&(g[i]=[];x[c/99]+=1;[-1,1,-w,w].map{|j|q[i+j]>?a&&g[i]<<i+j});i+=1}
m={}
g.map{|v,_|m[v]||(t={};d=->y{t[y]=1;g[y]&&g[y].map{|u|t[w=m[u]]||d[w]<1&&w||(m[m[y]=u]=y;return 90)};0};a+=d[v])}
p a+9*x.min+x.max