mirror of
https://github.com/c-cube/sidekick.git
synced 2026-01-21 16:56:41 -05:00
24 lines
354 B
OCaml
24 lines
354 B
OCaml
|
|
(** {1 Value}
|
|
|
|
Semantic value *)
|
|
|
|
type t = Base_types.value
|
|
|
|
val true_ : t
|
|
val false_ : t
|
|
val bool : bool -> t
|
|
|
|
val mk_elt : ID.t -> Ty.t -> t
|
|
|
|
val is_bool : t -> bool
|
|
val is_true : t -> bool
|
|
val is_false : t -> bool
|
|
|
|
val fresh : Term.t -> t
|
|
|
|
include Intf.EQ with type t := t
|
|
include Intf.HASH with type t := t
|
|
include Intf.PRINT with type t := t
|
|
|
|
|