ll h,w,d[2d3],z;char a;{rd(h,w);rep(y,h)rep(x,w)rd(a),d[x]=z=a%2*(y+x)-~min(y?d[x]:z,x?z:MD);wt(z-1);}