program flip;
type matrice=array[1..100,1..100]of integer;
var a:matrice;f,g:text;min2,i,j,min1,q,p,m,n,s1,s2:integer;
function suma(a:matrice; n,m:integer):integer;
var s:integer;
begin
s:=0;
for i:=1 to n do
 for j:=1 to m do
  s:=s+a[i,j];
suma:=s;
end;
begin
assign(f,'flip.in');reset(f);
assign(g,'flip.out');rewrite(g);
readln(f,n,m);
for i:=1 to n  do
begin
 for j:=1 to m do
  read(f,a[i,j]);
 readln(f);
end;
min2:=maxint;
for i:=1 to n do
 begin
  s1:=0;
  for j:=1 to m do
    s1:=s1+a[i,j];
  if s1<min2 then
   begin
    min2:=s1;
    p:=i;
   end;
 end;
min1:=maxint;
for j:=1 to m do
 begin
  s2:=0;
  for i:=1 to n do
   s2:=s2+a[i,j];
  if s2<min1 then
   begin
    min1:=s2;
    q:=j;
   end;
  end;
for i:=1 to m do
 a[p,i]:=a[p,i]*(-1);
for i:=1 to n do
 a[i,q]:=a[i,q]*(-1);
write(g,suma(a,n,m));
close(f);
close(g);
end.