mirror of
https://github.com/c-cube/sidekick.git
synced 2025-12-13 06:20:55 -05:00
25 lines
533 B
OCaml
25 lines
533 B
OCaml
|
|
(** Proofs of unsatisfiability in the Quip proof format..
|
|
|
|
This targets {{: https://c-cube.github.io/quip-book/ } Quip}
|
|
as an {b experimental} proof backend.
|
|
*)
|
|
|
|
module Proof = Proof
|
|
|
|
type t = Proof.t
|
|
(** The state holding the whole proof. *)
|
|
|
|
(** What format to use to serialize the proof? *)
|
|
type out_format =
|
|
| Sexp
|
|
(** S-expressions *)
|
|
|
|
| CSexp
|
|
(** Canonical S-expressions *)
|
|
|
|
val pp_out_format : out_format Fmt.printer
|
|
|
|
val output : ?fmt:out_format -> out_channel -> t -> unit
|
|
|
|
val pp_debug : t Fmt.printer
|