sig
  type ('a, 'b) t = ('a, 'b, 'a Bddapron.Cond.cond, Cudd.Man.v) Bdd.Cond.t
    constraint 'b =
      ('a, [> 'a Bddapron.Env.typ ] as 'c, [> 'a Bddapron.Env.typdef ] as 'd,
       'e)
      Bddapron.Env.O.t
  val make :
    symbol:'a Bdd.Env.symbol ->
    ?bddindex0:int ->
    ?bddsize:int ->
    Cudd.Man.vt ->
    ('a,
     ('a, [> 'a Bddapron.Env.typ ], [> 'a Bddapron.Env.typdef ], 'b)
     Bddapron.Env.O.t)
    Bddapron.Cond.O.t
end