function y=abs4(x)
  if (x<0)
    y=-x;
  end 
  y=x;
end
