sig
type ('a, 'b) t = ('b, Cudd.Man.v Bdd.Int.t) Env.value
constraint 'b =
('a, [> 'a Env.typ ] as 'c, [> 'a Env.typdef ] as 'd, 'e) Env.O.t
val of_expr :
(('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t,
[> `Bint of 'a Expr0.Bint.t ])
Env.value -> ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val to_expr :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Expr1.O.Bint.t ->
(('a, 'b, 'c, 'd) Env.O.t, [> `Bint of 'a Expr0.Bint.t ]) Env.value
val extend_environment :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Expr1.O.Bint.t ->
('a, 'b, 'c, 'd) Env.O.t -> ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val of_int :
('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
[ `Bint of bool * int ] ->
int -> ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val var :
('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
'a -> ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val neg :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val succ :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val pred :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val add :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val sub :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val mul :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val shift_left :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
int ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val shift_right :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
int ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val scale :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
int ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val ite :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val zero :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t
val eq :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t
val supeq :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t
val sup :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t
val eq_int :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
int -> ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t
val supeq_int :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
int -> ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t
val sup_int :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
int -> ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t
val cofactor :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val restrict :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val tdrestrict :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Expr1.O.Bint.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val substitute_by_var :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a * 'a) list -> ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val substitute :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
('a * ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.expr) list ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t
val guard_of_int :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
int -> ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t
val guardints :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t ->
(('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t * int) list
val print :
('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
Cond.O.t ->
Format.formatter -> ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bint.t -> unit
end