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