ll@H,@W,M=200,A[M][M]{},x=0;rep(i,H)rep(j,W){ll@a;A[i][j]=a;}
rep(i,H)rep(j,W)x>?=sum[k,0,W](A[i][k])+sum[k,0,H](A[k][j])-A[i][j];
rep(i,H)rep(j,i+1,H)x>?=sum[k,0,W](A[i][k])+sum[k,0,W](A[j][k]);
rep(i,W)rep(j,i+1,W)x>?=sum[k,0,H](A[k][i])+sum[k,0,H](A[k][j]);
rep(i,M)rep(j,M)x>?=sum[k,0,W](A[i][k])+sum[k,max(-i,-j),min(H-i,W-j)](A[i+k][j+k])-A[i][j];
rep(i,M)rep(j,M)x>?=sum[k,0,W](A[i][k])+sum[k,max(-i,j-W+1),min(H-i,j)](A[i+k][j-k])-A[i][j];
rep(i,M)rep(j,M)x>?=sum[k,0,H](A[k][j])+sum[k,max(-i,-j),min(H-i,W-j)](A[i+k][j+k])-A[i][j];
rep(i,M)rep(j,M)x>?=sum[k,0,H](A[k][j])+sum[k,max(-i,j-W+1),min(H-i,j)](A[i+k][j-k])-A[i][j];
rep(i,M)rep(j,M)x>?=sum[k,max(-i,-j),min(H-i,W-j)](A[i+k][j+k])+sum[k,max(-i,j-W+1),min(H-i,j)](A[i+k][j-k])-A[i][j];
wt(x);