fact: Definition Qh_spec (R : finRingType) k s (h :{poly R}) (M : {set {poly %/ h}}) := (forall x, @is_iexph_spec R k s h x (x \in M)).
imports: mathcomp(all_ssreflect all_fingroup all_field) mathcomp(ssralg finalg poly polydiv zmodp vector qpoly) more_thm rootn lcm_lbound