theorem Th5:
  i2 <= i1 implies i1 - i2 in NAT
proof
  assume i2 <= i1;
  then i2 - i2 <= i1 - i2 by XREAL_1:9;
  hence thesis by Th3;
end;
