fact: Fixpoint eval_bformula (k:kind) (f: BForm k) : eval_kind k := match f with | BTT k => eval_TT k | BFF k => eval_FF k | BAT k i => eval_atom k i | BOP k o f1 f2 => eval_op o k (eval_bformula k (elt f1)) (eval_bformula k (elt f2)) | BITE k o c f1 f2 => eval_ite k o (eval_bformula IsBool (elt c)) (eval_bformula k (elt f1)) (eval_bformula k (elt f2)) | BPROP o f1 f2 => eval_bprop o (eval_bformula _ (elt f1)) (eval_bformula _ (elt f2)) end.
imports: Cdcl.PatriciaR Cdcl.KeyInt Cdcl.ReifClasses Cdcl.Lib Bool Setoid ZifyBool ZArith Uint63 Lia List Cdcl.Syntax Cdcl.Clause