sig
  type ('a, 'b, 'c) t = ('b, 'c Cudd.Bdd.t) Bdd.Env.value
    constraint 'b =
      ('a, [> 'a Bdd.Env.typ ] as 'd, [> 'a Bdd.Env.typdef ] as 'e, 'c, 'f)
      Bdd.Env.O.t
  type ('a, 'b) dt = ('a, 'b, Cudd.Man.d) Bdd.Expr1.O.Bool.t
    constraint 'b =
      ('a, [> 'a Bdd.Env.typ ] as 'c, [> 'a Bdd.Env.typdef ] as 'd,
       Cudd.Man.d, 'e)
      Bdd.Env.O.t
  type ('a, 'b) vt = ('a, 'b, Cudd.Man.v) Bdd.Expr1.O.Bool.t
    constraint 'b =
      ('a, [> 'a Bdd.Env.typ ] as 'c, [> 'a Bdd.Env.typdef ] as 'd,
       Cudd.Man.v, 'e)
      Bdd.Env.O.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.Bool.t ->
    ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.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)
    Bdd.Expr1.O.Bool.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)
    Bdd.Expr1.O.Bool.t -> 'c Bdd.Expr0.Bool.t
  val of_expr :
    (('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
     Bdd.Env.O.t, [> `Bool of 'c Cudd.Bdd.t ])
    Bdd.Env.value ->
    ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.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)
    Bdd.Expr1.O.Bool.t ->
    (('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, [> `Bool of 'c Cudd.Bdd.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)
    Bdd.Expr1.O.Bool.t ->
    ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t ->
    ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
  val dtrue :
    ('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
    Bdd.Env.O.t ->
    ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
  val dfalse :
    ('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
    Bdd.Env.O.t ->
    ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
  val of_bool :
    ('a, [> 'a Bdd.Env.typ ] as 'b, [> 'a Bdd.Env.typdef ] as 'd, 'c, 'e)
    Bdd.Env.O.t ->
    bool -> ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.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) Bdd.Expr1.O.Bool.t
  val dnot :
    ('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) Bdd.Expr1.O.Bool.t
  val dand :
    ('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) Bdd.Expr1.O.Bool.t ->
    ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
  val dor :
    ('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) Bdd.Expr1.O.Bool.t ->
    ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
  val xor :
    ('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) Bdd.Expr1.O.Bool.t ->
    ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
  val nand :
    ('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) Bdd.Expr1.O.Bool.t ->
    ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
  val nor :
    ('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) Bdd.Expr1.O.Bool.t ->
    ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
  val nxor :
    ('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) Bdd.Expr1.O.Bool.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)
    Bdd.Expr1.O.Bool.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) Bdd.Expr1.O.Bool.t
  val leq :
    ('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) Bdd.Expr1.O.Bool.t ->
    ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.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) Bdd.Expr1.O.Bool.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) Bdd.Expr1.O.Bool.t
  val is_true :
    ('a,
     ('a, [> 'a Bdd.Env.typ ], [> 'a Bdd.Env.typdef ], 'c, 'b) Bdd.Env.O.t,
     'c)
    Bdd.Expr1.O.Bool.t -> bool
  val is_false :
    ('a,
     ('a, [> 'a Bdd.Env.typ ], [> 'a Bdd.Env.typdef ], 'c, 'b) Bdd.Env.O.t,
     'c)
    Bdd.Expr1.O.Bool.t -> bool
  val is_cst :
    ('a,
     ('a, [> 'a Bdd.Env.typ ], [> 'a Bdd.Env.typdef ], 'c, 'b) Bdd.Env.O.t,
     'c)
    Bdd.Expr1.O.Bool.t -> bool
  val is_eq :
    ('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) Bdd.Expr1.O.Bool.t -> bool
  val is_leq :
    ('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) Bdd.Expr1.O.Bool.t -> bool
  val is_inter_false :
    ('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) Bdd.Expr1.O.Bool.t -> bool
  val exist :
    'a list ->
    ('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) Bdd.Expr1.O.Bool.t
  val forall :
    'a list ->
    ('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) 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)
    Bdd.Expr1.O.Bool.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) Bdd.Expr1.O.Bool.t
  val restrict :
    ('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) Bdd.Expr1.O.Bool.t ->
    ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.t
  val tdrestrict :
    ('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) Bdd.Expr1.O.Bool.t ->
    ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.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)
    Bdd.Expr1.O.Bool.t ->
    ('a * 'a) list ->
    ('a, ('a, 'b, 'd, 'c, 'e) Bdd.Env.O.t, 'c) Bdd.Expr1.O.Bool.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)
    Bdd.Expr1.O.Bool.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) Bdd.Expr1.O.Bool.t
  val print :
    Format.formatter ->
    ('a,
     ('a, [> 'a Bdd.Env.typ ], [> 'a Bdd.Env.typdef ], 'c, 'b) Bdd.Env.O.t,
     'c)
    Bdd.Expr1.O.Bool.t -> unit
end