proposition: Lemma scale_poly_eq0 a p : (a *: p == 0) = (a == 0) || (p == 0).
proof: Proof. by rewrite -mul_polyC mulf_eq0 polyC_eq0. Qed.
imports: HB(structures) mathcomp(ssreflect ssrbool ssrfun eqtype ssrnat seq choice) mathcomp(fintype bigop finset tuple) mathcomp(div ssralg countalg binomial)