a[52][52];
s;

o[2];p[2];
f(y,x){
	if(a[y][x]){
		a[y][x]=0;
		++o[y+x&1];
		f(y-1,x);
		f(y+1,x);
		f(y,x-1);
		f(y,x+1);
	}
}

main(m,n,x,y,c,q,t){
	scanf("%d%d",&n,&m);
	for(y=0;y<n;++y){
		for(x=0;x<m;++x){
			scanf(" %c",&a[y+1][x+1]);
			a[y+1][x+1]>>=6;
		}
	}
	do{
		q=0;
		for(y=0;y<n;++y){
			for(x=0;x<m;++x){
				if(a[y+1][x+1]){
					c=a[y+0][x+1]+a[y+2][x+1]+a[y+1][x+0]+a[y+1][x+2];
					if(c==1){
						q=1;s+=100;
						a[y+0][x+1]=a[y+2][x+1]=a[y+1][x+0]=a[y+1][x+2]=a[y+1][x+1]=0;
					}
				}
			}
		}
	}while(q);
	for(y=0;y<n;++y){
		for(x=0;x<m;++x){
			o[0]=o[1]=0;
			f(y+1,x+1);
			s+=100*(t=o[0]<o[1]?o[0]:o[1]);
			p[0]+=o[0]-t;p[1]+=o[1]-t;
		}
	}
	s+=8*(p[0]<p[1]?p[0]:p[1])+p[0]+p[1];
	printf("%d",s);
	return 0;
}