program flip;
type xy= array [1..16,1..16] of integer;
var a:xy;
    s,s1,i,j,m,n:longint;
    f,g:text;
begin
assign (f,'flip.in');
assign (g,'flip.out');
reset (f);
rewrite (g);
read (f,n,m);
s:=0;
s1:=0;
for i:=1 to n do
for j:=1 to m do
read (f,a[i,j]);

for i:=1 to n do
begin
for j:=1 to m do
s:=s+a[i,j];
if s<0 then
   for j:=1 to m do
   a[i,j]:=-a[i,j];
end;

s:=0;
for i:=1 to m do
begin
for j:=1 to n do
s:=s+a[j,i];
if s<0 then
   for j:=1 to n do
   a[j,i]:=-a[j,i];
end;

for i:=1 to n do
for j:=1 to m do
s1:=s1+a[i,j];

write (g,s1);
close (f);
close (g);
end.