%
% Funzione di Heaviside (rovesciata)
%
%   -----+
%             |
%             +---------------
%
function y=h0(x)
%
%  se x`e' uno scalare si puo' scrivere cosi:
%
%  if (x > 0)
%    y = 0;   
%  else
%    y = 1;
%  end 
%
%  nel caso vettoriale bisogna fare un ciclo sulle componenti di x
%
  y         = zeros(size(x)) ;
  [n,m] = size(x) ;
  for i=1:n
    for j=1:m
      if ( x(i,j) < 0 )
        y(i,j) = 1;
      end 
    end
  end
end
