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