function X = strip( X )
%STRIP strip extremly small values (< 1E-9)
%   M = strip(V) returns a matrix M with all real/imaginary parts
%   of the entries of V smaller than a absolute value of 1E-9 set 
%   to exactly zero. 
%   Useful for plotting, dangerous otherwise!
    
    eps = 1E-9;
    %X(abs(X) < eps) = 0;
    X(abs(imag(X)) < eps) = real(X(abs(imag(X)) < eps));
    X(abs(real(X)) < eps) = imag(X(abs(real(X)) < eps));
    
end

