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

theorem :: REAL_2'47_2
  (a" * b")" = a * b
proof
  thus (a"*b")"=a""*b"" by Lm1
    .=a*b;
end;
