mirror of
https://github.com/c-cube/sidekick.git
synced 2025-12-06 03:05:31 -05:00
29 lines
1.3 KiB
OCaml
29 lines
1.3 KiB
OCaml
(**************************************************************************)
|
|
(* *)
|
|
(* Cubicle *)
|
|
(* Combining model checking algorithms and SMT solvers *)
|
|
(* *)
|
|
(* Sylvain Conchon, Evelyne Contejean *)
|
|
(* Francois Bobot, Mohamed Iguernelala, Alain Mebsout *)
|
|
(* CNRS, Universite Paris-Sud 11 *)
|
|
(* *)
|
|
(* Copyright 2011. This file is distributed under the terms of the *)
|
|
(* Apache Software License version 2.0 *)
|
|
(* *)
|
|
(**************************************************************************)
|
|
|
|
val cc_active : bool ref
|
|
|
|
module type S = sig
|
|
type t
|
|
|
|
module TimerCC : Timer.S
|
|
|
|
val empty : unit -> t
|
|
val assume : cs:bool ->
|
|
Literal.LT.t -> Explanation.t -> t -> t * Term.Set.t * int
|
|
val query : Literal.LT.t -> t -> Sig.answer
|
|
val class_of : t -> Term.t -> Term.t list
|
|
end
|
|
|
|
module Make (X:Sig.X) : S
|