reserve a, b, c, d, e for Complex;

theorem :: REAL_2'13
  a + b = c + d implies a - c = d - b;
