fact: Definition Mk_spec R s k (M : {set 'Z_k}) := (forall x, @is_iexpm_spec R k s 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