proposition: Lemma in_qpolyZ a p : in_qpoly (a *: p) = a *: in_qpoly p.
proof: Proof. apply/val_eqP=> /=; rewrite rmodpZ ?monic_mk_monic //. Qed.
imports: HB(structures) mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat seq choice fintype tuple) mathcomp(bigop binomial finset finfun ssralg countalg finalg poly polydiv) mathcomp(perm fingroup matrix mxalgebra mxpoly vector countalg)