reserve a,b,c,d for Real;
reserve r,s for Real;

theorem
  a <= b-c implies c <= b-a
proof
  assume a <= b-c;
  then a+c <= b by Lm17;
  hence thesis by Lm16;
end;
