a = [-ones(100,1);zeros(9900,1)];
a = reshape(a(randperm(10000)),100,100);