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