proposition: Fact conj_is_multiplicative : multiplicative (fun u => LtoC (conj_subproof u)).
proof: Proof. split=> [u v|]; apply: CtoL_inj; last by rewrite !LtoC_K rmorph1. by rewrite LtoC_K 3!{1}rmorphM /= !LtoC_K. Qed.
imports: HB(structures) mathcomp(ssreflect ssrbool ssrfun ssrnat eqtype seq choice) mathcomp(div fintype path bigop finset prime order ssralg) mathcomp(poly polydiv mxpoly generic_quotient countalg) mathcomp(ssrnum closed_field ssrint archimedean rat intdiv) mathcomp(algebraics_fundamentals)