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

theorem :: REAL_2'45_1
  (- a)" = -a" by Lm19;
