% File: W1.M
function y = W1(x,f1);
y = 0;
if (abs(x) < f1)
  y = 1;
end;
end;



