fact: Fixpoint split_clause (l1: clause) : clause * clause := match l1 with | nil => (nil,nil) | POS p::l => (nil,l1) | NEG p::l => let (ln,lp):= split_clause l in (NEG p::ln,lp) end.
imports: ZArith List Bool Lia Morphisms Cdcl.Syntax Cdcl.Lib Cdcl.Lit Cdcl.Clause