theorem Th35:
  a -' b <= a
proof
  a-b <= a-0 by XREAL_1:230;
  hence thesis by XREAL_0:def 2;
end;
