reserve x, y, z, r, s, t for Real;

theorem
  r <= 0 implies |.r.| = -r
proof
  assume r<=0;
  then r < 0 or r = 0;
  hence thesis by Def1;
end;
