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