sidekick/src/cc/resolved_expl.ml

6 lines
169 B
OCaml

open Types_
type t = { lits: Lit.t list; pr: Proof.Pterm.delayed }
let pp out (self : t) =
Fmt.fprintf out "(@[resolved-expl@ %a@])" (Util.pp_list Lit.pp) self.lits