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