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

theorem :: REAL_2'61_4
  a / (b / c) = a / b * c
proof
  a/(b/c)=(a*c)/b by Lm2
    .=c*a*b" by XCMPLX_0:def 9
    .=c*(a*b")
    .=c*(a/b) by XCMPLX_0:def 9;
  hence thesis;
end;
