Module PulseSatUnsat.Types

for opening to get Sat and Unsat in the namespace

type nonrec unsat_info = unsat_info = {
  1. reason : unit -> string;
  2. source : string * int * int * int;
}
type 'a sat_unsat_t = 'a t =
  1. | Unsat of unsat_info
  2. | Sat of 'a
val equal_sat_unsat_t : ('a -> 'a -> bool) -> 'a sat_unsat_t -> 'a sat_unsat_t -> bool