fact: Definition oclause_leq_elim oc : seq (oclause R) := let: Oclause eq_l neq_l lt_l le_l := oc in map (fun x => Oclause x.1%PAIR neq_l x.2%PAIR [::]) (leq_elim_aux eq_l lt_l le_l).
imports: HB(structures) mathcomp.ssreflect.ssreflect mathcomp(ssrfun ssrbool eqtype ssrnat seq div choice fintype) mathcomp(bigop order ssralg finset fingroup zmodp) mathcomp(poly ssrnum)