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

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