module Bint: sig .. end
type ('a, ('a, [> 'a Bdd.Env.typ ], [> 'a Bdd.Env.typdef ], 'c, 'f) Bdd.Env.O.t, 'c) t = (('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'f)
Bdd.Env.O.t, 'c Bdd.Int.t)
Bdd.Env.value
type ('a
, ('a, [> 'a Bdd.Env.typ ], [> 'a Bdd.Env.typdef ], Cudd.Man.d, 'b)
Bdd.Env.O.t, 'c) dt = ('a,
('a, [> 'a Bdd.Env.typ ] as 'd, [> 'a Bdd.Env.typdef ] as 'e, Cudd.Man.d,
'b)
Bdd.Env.O.t, Cudd.Man.d)
t
type ('a
, ('a, [> 'a Bdd.Env.typ ], [> 'a Bdd.Env.typdef ], Cudd.Man.v, 'b)
Bdd.Env.O.t, 'c) vt = ('a,
('a, [> 'a Bdd.Env.typ ] as 'd, [> 'a Bdd.Env.typdef ] as 'e, Cudd.Man.v,
'b)
Bdd.Env.O.t, Cudd.Man.v)
t
val of_expr0 : ('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t ->
'c Bdd.Expr0.Bint.t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val get_env : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t -> ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t
val to_expr0 : ('a, ('a, [> 'a Bdd.Env.typ ], [> 'a Bdd.Env.typdef ], 'c, 'b) Bdd.Env.O.t,
'c)
t -> 'c Bdd.Expr0.Bint.t
val of_expr : (('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, [> `Bint of 'c Bdd.Int.t ])
Bdd.Env.value ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val to_expr : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
(('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, [> `Bint of 'c Bdd.Int.t ]) Bdd.Env.value
val extend_environment : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val of_int : ('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t ->
[ `Bint of bool * int ] ->
int -> ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val var : ('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t ->
'a -> ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val neg : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val succ : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val pred : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val add : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val sub : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val mul : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val shift_left : int ->
('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val shift_right : int ->
('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val scale : int ->
('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val ite : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
Bdd.Expr1.O.Bool.t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val zero : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
val eq : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
val supeq : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
val sup : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
val eq_int : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
int -> ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
val supeq_int : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
int -> ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
val sup_int : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
int -> ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
val cofactor : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val restrict : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val tdrestrict : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val substitute_by_var : ?memo:Cudd.Memo.t ->
('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a * 'a) list ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val substitute : ?memo:Cudd.Memo.t ->
('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
('a * ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.expr) list ->
('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) t
val guard_of_int : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
int -> ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
Return the guard of the integer value.
val guardints : ('a,
('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
Bdd.Env.O.t, 'c)
t ->
(('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t * int) list
Return the list g -> n of guarded values.
val print : Format.formatter ->
('a, ('a, [> 'a Bdd.Env.typ ], [> 'a Bdd.Env.typdef ], 'c, 'b) Bdd.Env.O.t,
'c)
t -> unit