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

theorem :: REAL_2'99_2
  (a + b - c) * d = a * d + b * d - c * d;
