theorem :: REAL_1'24
  a" * b" = (a * b)" by Lm1;
