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

theorem :: REAL_2'85_2
  (a - b) * c = - (b - a) * c;
