function [out] = clip_negatives(in);

[M N] = size(in);

for n=1:N
    for m=1:M
        if (in(m,n) < 0.0)
            out(m,n)=0.0;
        else
            out(m,n)=in(m,n);
        end
    end
end