% File: PHI.M
function y = phi(x);
y = 0;
if (x >= 0)
  y = 1;
end;
end;



