sig
  type ('a, 'b) t = (('a, 'b) Env.t, 'b Enum.t) Env.value
  type 'a dt = ('a, Cudd.Man.d) Expr1.Benum.t
  type 'a vt = ('a, Cudd.Man.v) Expr1.Benum.t
  val of_expr0 : ('a, 'b) Env.t -> 'b Expr0.Benum.t -> ('a, 'b) Expr1.Benum.t
  val get_env : ('a, 'b) Expr1.Benum.t -> ('a, 'b) Env.t
  val to_expr0 : ('a, 'b) Expr1.Benum.t -> 'b Expr0.Benum.t
  val of_expr : ('a, 'b) Expr1.expr -> ('a, 'b) Expr1.Benum.t
  val to_expr : ('a, 'b) Expr1.Benum.t -> ('a, 'b) Expr1.expr
  val extend_environment :
    ('a, 'b) Expr1.Benum.t -> ('a, 'b) Env.t -> ('a, 'b) Expr1.Benum.t
  val var : ('a, 'b) Env.t -> 'a -> ('a, 'b) Expr1.Benum.t
  val ite :
    ('a, 'b) Expr1.Bool.t ->
    ('a, 'b) Expr1.Benum.t ->
    ('a, 'b) Expr1.Benum.t -> ('a, 'b) Expr1.Benum.t
  val eq :
    ('a, 'b) Expr1.Benum.t -> ('a, 'b) Expr1.Benum.t -> ('a, 'b) Expr1.Bool.t
  val eq_label : ('a, 'b) Expr1.Benum.t -> 'a -> ('a, 'b) Expr1.Bool.t
  val cofactor :
    ('a, 'b) Expr1.Benum.t -> ('a, 'b) Expr1.Bool.t -> ('a, 'b) Expr1.Benum.t
  val restrict :
    ('a, 'b) Expr1.Benum.t -> ('a, 'b) Expr1.Bool.t -> ('a, 'b) Expr1.Benum.t
  val tdrestrict :
    ('a, 'b) Expr1.Benum.t -> ('a, 'b) Expr1.Bool.t -> ('a, 'b) Expr1.Benum.t
  val substitute_by_var :
    ('a, 'b) Expr1.Benum.t -> ('a * 'a) list -> ('a, 'b) Expr1.Benum.t
  val substitute :
    ('a, 'b) Expr1.Benum.t ->
    ('a * ('a, 'b) Expr1.expr) list -> ('a, 'b) Expr1.Benum.t
  val guard_of_label : ('a, 'b) Expr1.Benum.t -> 'a -> ('a, 'b) Expr1.Bool.t
  val guardlabels :
    ('a, 'b) Expr1.Benum.t -> (('a, 'b) Expr1.Bool.t * 'a) list
  val print : Format.formatter -> ('a, 'b) Expr1.Benum.t -> unit
end