program message(input,output);

var m,n,i,j,k,x1,x2,x11,x22,y1,y2,y11,y22,d1,d2:longint;

g,f0,f1:array [1..100,1..100] of longint;

function max(a,b:longint):longint;

begin

if a>b then max:=a

else max:=b;

end;

begin

fillchar(f0,sizeof(f0),0);

fillchar(g,sizeof(g),0);

readln(m,n);

for i:=1 to m do

begin

for j:=1 to n do

read(g);

readln;

end;

for i:=2 to m+n-1 do

begin

fillchar(f1,sizeof(f1),0);

for x11:=1 to i-1 do

for x22:=1 to i-1 do

begin

y11:=i-x11;

y22:=i-x22;

if (x11