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