module Bool: sig .. end
type ('a
, ('a, [> 'a Bddapron.Env.typ ], [> 'a Bddapron.Env.typdef ], 'b)
Bddapron.Env.O.t) t = (('a,
('a, [> 'a Bddapron.Env.typ ] as 'c, [> 'a Bddapron.Env.typdef ] as 'd, 'b)
Bddapron.Env.O.t)
Bddapron.Cond.O.t,
('a, ('a, 'c, 'd, 'b) Bddapron.Env.O.t) Bddapron.Expr1.O.Bool.t)
Bdd.Cond.value
val of_expr0 : ?normalize:bool ->
?reduce:bool ->
?careset:bool ->
('a, [> 'a Bddapron.Env.typ ] as 'b, [> 'a Bddapron.Env.typdef ] as 'c, 'd)
Bddapron.Env.O.t ->
('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) Bddapron.Cond.O.t ->
'a Bddapron.Expr0.Bool.t ->
('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) t
val of_expr1 : ?normalize:bool ->
?reduce:bool ->
?careset:bool ->
('a,
('a, [> 'a Bddapron.Env.typ ] as 'b, [> 'a Bddapron.Env.typdef ] as 'c, 'd)
Bddapron.Env.O.t)
Bddapron.Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) Bddapron.Expr1.O.Bool.t ->
('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) t
val get_env : ('a,
('a, [> 'a Bddapron.Env.typ ] as 'b, [> 'a Bddapron.Env.typdef ] as 'c, 'd)
Bddapron.Env.O.t)
t -> ('a, 'b, 'c, 'd) Bddapron.Env.O.t
val get_cond : ('a,
('a, [> 'a Bddapron.Env.typ ] as 'b, [> 'a Bddapron.Env.typdef ] as 'c, 'd)
Bddapron.Env.O.t)
t ->
('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) Bddapron.Cond.O.t
val to_expr0 : ('a,
('a, [> 'a Bddapron.Env.typ ], [> 'a Bddapron.Env.typdef ], 'b)
Bddapron.Env.O.t)
t -> 'a Bddapron.Expr0.Bool.t
val to_expr1 : ('a,
('a, [> 'a Bddapron.Env.typ ] as 'b, [> 'a Bddapron.Env.typdef ] as 'c, 'd)
Bddapron.Env.O.t)
t ->
('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) Bddapron.Expr1.O.Bool.t
val of_expr : (('a,
('a, [> 'a Bddapron.Env.typ ] as 'b, [> 'a Bddapron.Env.typdef ] as 'c, 'd)
Bddapron.Env.O.t)
Bddapron.Cond.O.t,
(('a, 'b, 'c, 'd) Bddapron.Env.O.t, [> `Bool of 'a Bddapron.Expr0.Bool.t ])
Bddapron.Env.value)
Bdd.Cond.value ->
('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) t
val to_expr : ('a,
('a, [> 'a Bddapron.Env.typ ] as 'b, [> 'a Bddapron.Env.typdef ] as 'c, 'd)
Bddapron.Env.O.t)
t ->
(('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) Bddapron.Cond.O.t,
(('a, 'b, 'c, 'd) Bddapron.Env.O.t, [> `Bool of 'a Bddapron.Expr0.Bool.t ])
Bddapron.Env.value)
Bdd.Cond.value
val extend_environment : ('a,
('a, [> 'a Bddapron.Env.typ ] as 'b, [> 'a Bddapron.Env.typdef ] as 'c, 'd)
Bddapron.Env.O.t)
t ->
('a, 'b, 'c, 'd) Bddapron.Env.O.t ->
('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) t
val is_false : ('a,
('a, [> 'a Bddapron.Env.typ ], [> 'a Bddapron.Env.typdef ], 'b)
Bddapron.Env.O.t)
t -> bool
val is_true : ('a,
('a, [> 'a Bddapron.Env.typ ], [> 'a Bddapron.Env.typdef ], 'b)
Bddapron.Env.O.t)
t -> bool
val print : Format.formatter ->
('a,
('a, [> 'a Bddapron.Env.typ ], [> 'a Bddapron.Env.typdef ], 'b)
Bddapron.Env.O.t)
t -> unit