proposition: Lemma monic_algRpfactor x : algRpfactor x \is monic.
proof: Proof. by have := monic_algCpfactor x; rewrite map_monic. Qed.
imports: HB(structures) mathcomp(all_ssreflect all_fingroup all_algebra) mathcomp(all_solvable all_field) Abel(various)