reserve x,y,z,w for ExtReal,
  r for Real;
reserve f,g for ExtReal;

theorem
  x <= y implies y-x >= 0
proof
  assume x <= y;
  then -y <= -x by Lm15;
  then -y +y <= y + -x by Th36;
  hence thesis by Th7;
end;
