mirror of
https://github.com/c-cube/sidekick.git
synced 2026-01-23 18:06:41 -05:00
21 lines
661 B
OCaml
21 lines
661 B
OCaml
|
|
type 'a view = 'a Bool_intf.view
|
|
|
|
type term = Sidekick_smt.Term.t
|
|
|
|
include Bool_intf.BOOL_TERM
|
|
with type t = term
|
|
and type state = Sidekick_smt.Term.state
|
|
|
|
val and_ : state -> term -> term -> term
|
|
val or_ : state -> term -> term -> term
|
|
val not_ : state -> term -> term
|
|
val imply : state -> term -> term -> term
|
|
val imply_a : state -> term IArray.t -> term -> term
|
|
val imply_l : state -> term list -> term -> term
|
|
val eq : state -> term -> term -> term
|
|
val neq : state -> term -> term -> term
|
|
val and_a : state -> term IArray.t -> term
|
|
val and_l : state -> term list -> term
|
|
val or_a : state -> term IArray.t -> term
|
|
val or_l : state -> term list -> term
|