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

theorem :: REAL_2'89_1
  (a + a + a)/3 = a;
