fact: Definition flipcl F : clause := \bigcup_(s in F) [fset s^+; s^-].
imports: Relations Lia Setoid Morphisms mathcomp(all_ssreflect) CompDecModal.libs(edone bcase fset base modular_hilbert sltype rewrite_inequality fset_tac)