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

theorem :: REAL_2'17_3
  a = a - (b + -b);
