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

theorem :: REAL_2'2_2
  -a = -b implies a = b;
