module Bool: sig
.. end
type ('a, ('a, [> 'a Env.typ ], [> 'a Env.typdef ], 'b, 'c) Env.O.t, 'b)
t = (('a, [> 'a Env.typ ] as 'd, [> 'a Env.typdef ] as 'e, 'b, 'c) Env.O.t,
'b Cudd.Bdd.t)
Env.value
type ('a, ('a, [> 'a Env.typ ], [> 'a Env.typdef ], Cudd.Man.d, 'b) Env.O.t)
dt = ('a,
('a, [> 'a Env.typ ] as 'c, [> 'a Env.typdef ] as 'd, Cudd.Man.d, 'b)
Env.O.t, Cudd.Man.d)
t
type ('a, ('a, [> 'a Env.typ ], [> 'a Env.typdef ], Cudd.Man.v, 'b) Env.O.t)
vt = ('a,
('a, [> 'a Env.typ ] as 'c, [> 'a Env.typdef ] as 'd, Cudd.Man.v, 'b)
Env.O.t, Cudd.Man.v)
t
val of_expr0 : ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t ->
'd Expr0.Bool.t -> ('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val get_env : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t -> ('a, 'b, 'c, 'd, 'e) Env.O.t
val to_expr0 : ('a, ('a, [> 'a Env.typ ], [> 'a Env.typdef ], 'b, 'c) Env.O.t, 'b)
t -> 'b Expr0.Bool.t
val of_expr : (('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
[> `Bool of 'd Cudd.Bdd.t ])
Env.value -> ('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val to_expr : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
(('a, 'b, 'c, 'd, 'e) Env.O.t, [> `Bool of 'd Cudd.Bdd.t ]) Env.value
val extend_environment : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a, 'b, 'c, 'd, 'e) Env.O.t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val dtrue : ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val dfalse : ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val of_bool : ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t ->
bool -> ('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val var : ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t ->
'a -> ('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
Logical connectors
val dnot : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t -> ('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val dand : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val dor : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
not
, and
and or
(use of 'd' prefix because of conflict with OCaml
keywords)
val xor : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val nand : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val nor : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val nxor : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
Exclusive or, not and, nor or and not xor
val eq : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
Same as nxor
val leq : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
Implication
val ite : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
If-then-else
val is_true : ('a, ('a, [> 'a Env.typ ], [> 'a Env.typdef ], 'b, 'c) Env.O.t, 'b)
t -> bool
val is_false : ('a, ('a, [> 'a Env.typ ], [> 'a Env.typdef ], 'b, 'c) Env.O.t, 'b)
t -> bool
val is_cst : ('a, ('a, [> 'a Env.typ ], [> 'a Env.typdef ], 'b, 'c) Env.O.t, 'b)
t -> bool
val is_eq : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t -> bool
val is_leq : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t -> bool
val is_inter_false : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t -> bool
val exist : 'a list ->
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t -> ('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val forall : 'a list ->
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t -> ('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val cofactor : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val restrict : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val tdrestrict : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val substitute_by_var : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a * 'a) list -> ('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val substitute : ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd, 'e) Env.O.t,
'd)
t ->
('a * ('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) Expr1.O.expr) list ->
('a, ('a, 'b, 'c, 'd, 'e) Env.O.t, 'd) t
val print : Format.formatter ->
('a, ('a, [> 'a Env.typ ], [> 'a Env.typdef ], 'b, 'c) Env.O.t, 'b)
t -> unit