theorem :: REAL_2'88_2
  4 * a = a + a + a + a;
