fact: Definition mpoly_of_list_eff (l : seq (seqmultinom * T)) : effmpoly T := foldl (fun m mc => M.add mc.1 mc.2 m) M.empty l.
imports: ZArith NArith FMaps FMapAVL mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat seq) mathcomp(choice finfun tuple fintype ssralg bigop) CoqEAL(hrel) CoqEAL(refinements) CoqEAL(param binord binnat) CoqEAL(seqmx ) CoqEAL(ssrcomplements) mathcomp.multinomials(mpoly freeg)