sig
  val to_lconjunction :
    ('a, [> 'Bddapron.Env.typ ] as 'b, [> 'Bddapron.Env.typdef ] as 'c,
     'd)
    Bddapron.Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) Bddapron.Cond.O.t ->
    'Bddapron.Expr0.Bool.t ->
    ('Bddapron.Expr0.Bool.t * 'Bddapron.Expr0.Bool.t) list
  val forget :
    ('a, 'b, 'c, 'd) Bddapron.Domain0.man ->
    ('e, [> 'Bddapron.Env.typ ] as 'f, [> 'Bddapron.Env.typdef ] as 'g,
     'h)
    Bddapron.Env.O.t ->
    ('e, ('e, 'f, 'g, 'h) Bddapron.Env.O.t) Bddapron.Cond.O.t ->
    'Bddapron.Expr0.Bool.t -> 'e list -> 'Bddapron.Expr0.Bool.t
end