function [I, sign] = find_largest(A)

B = abs(A);
s = sum(B, 1);
[C, I] = max(s);

if (A(1,I)<0) 
    sign = -1;
else
    sign = 1;
end