fact: Definition PolyZ n k (l : seq nat) : {poly 'Z_n} := Poly (map inZp (take k l)).
imports: mathcomp(all_ssreflect all_fingroup all_field) mathcomp(ssralg finalg poly polydiv zmodp vector qpoly) more_thm rootn lcm_lbound