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

theorem :: REAL_2'62_6
  b <> 0 implies a = a * (1 / b * b)
proof
  assume
A1: b<>0;
  thus a=a*1 .=a*(1/b*b) by A1,Lm3;
end;
