fact: Fixpoint find_arrows (st: state) (l : list literal) := match l with | nil => nil | f :: l => if progress_arrow f st then f::(find_arrows st l) else (find_arrows st l) end.
imports: Cdcl.PatriciaR Cdcl.KeyInt Cdcl.ReifClasses Cdcl.Lib Bool Setoid ZifyBool ZArith Uint63 Lia List Cdcl.Syntax Cdcl.Clause