sig
  type 'a t = Cudd.Bdd.vt
  val of_expr : 'Expr0.expr -> 'Expr0.O.Bool.t
  val to_expr : 'Expr0.O.Bool.t -> 'Expr0.expr
  val dtrue :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t -> 'Expr0.O.Bool.t
  val dfalse :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t -> 'Expr0.O.Bool.t
  val of_bool :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t -> bool -> 'Expr0.O.Bool.t
  val var :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t -> '-> 'Expr0.O.Bool.t
  val ite :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'Expr0.O.Bool.t ->
    'Expr0.O.Bool.t -> 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t
  val dnot :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'Expr0.O.Bool.t -> 'Expr0.O.Bool.t
  val dand :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'Expr0.O.Bool.t -> 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t
  val dor :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'Expr0.O.Bool.t -> 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t
  val xor :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'Expr0.O.Bool.t -> 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t
  val nand :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'Expr0.O.Bool.t -> 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t
  val nor :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'Expr0.O.Bool.t -> 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t
  val nxor :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'Expr0.O.Bool.t -> 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t
  val leq :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'Expr0.O.Bool.t -> 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t
  val eq :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'Expr0.O.Bool.t -> 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t
  val is_true :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t -> 'Expr0.O.Bool.t -> bool
  val is_false :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t -> 'Expr0.O.Bool.t -> bool
  val is_cst :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t -> 'Expr0.O.Bool.t -> bool
  val is_leq :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'Expr0.O.Bool.t -> 'Expr0.O.Bool.t -> bool
  val is_eq :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'Expr0.O.Bool.t -> 'Expr0.O.Bool.t -> bool
  val is_and_false :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'Expr0.O.Bool.t -> 'Expr0.O.Bool.t -> bool
  val exist :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'a list -> 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t
  val forall :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'a list -> 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t
  val cofactor : 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t
  val restrict : 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t
  val tdrestrict :
    'Expr0.O.Bool.t -> 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t
  val permute :
    ?memo:Cudd.Memo.t -> 'Expr0.O.Bool.t -> int array -> 'Expr0.O.Bool.t
  val varmap : 'Expr0.O.Bool.t -> 'Expr0.O.Bool.t
  val substitute_by_var :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'Expr0.O.Bool.t -> ('a * 'a) list -> 'Expr0.O.Bool.t
  val substitute :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'Expr0.O.Bool.t -> ('a * 'Expr0.expr) list -> 'Expr0.O.Bool.t
  val print :
    ('a, [> 'Env.typ ] as 'b, [> 'Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    Format.formatter -> 'Expr0.O.Bool.t -> unit
end