theorem :: REAL_2'28_1
  a + c = a + b + (c - b);
