%questa funzione rende >=0 un vettore dato come argomento
%p9=path;
%path=(p,'c:\matlab\tesi');


function [c]=pos(u)

dim=size(u);
for i=1:1:dim,
  if u(i)<=0
    c(i)=0;
  else c(i)=u(i);
  end
end