theorem :: REAL_2'2_1
  a + -b = 0 implies a = b;
