Implicit Types tx ty : tF.Notation abstrX_bigmul := (big_morph _ (abstrX_mulM _) (abstrX1 _)).Notation eval_bigmul := (big_morph _ (eval_poly_mulM _) (eval_poly1 _)).Notation bigmap_id := (big_map _ (fun _ => true) id).

Lemma ex_elim_qf (x : nat) (pqs : seq tF * seq tF) : GRing.dnf_rterm pqs -> qf (ex_elim x pqs).