proposition: Lemma monic_exp p n : p \is monic -> p ^+ n \is monic.
proof: Proof. exact: rpredX. Qed.
imports: HB(structures) mathcomp(ssreflect ssrbool ssrfun eqtype ssrnat seq choice) mathcomp(fintype bigop finset tuple) mathcomp(div ssralg countalg binomial)