theorem :: REAL_2'2_3
  a - c = b - c implies a = b;
