sig
  type ('a, 'b) t = ('b, 'a Bddapron.Expr0.t list) Bddapron.Env.value
    constraint 'b =
      ('a, [> 'a Bddapron.Env.typ ] as 'c, [> 'a Bddapron.Env.typdef ] as 'd,
       'e)
      Bddapron.Env.O.t
  val of_lexpr0 :
    ('a, [> 'a Bddapron.Env.typ ] as 'b, [> 'a Bddapron.Env.typdef ] as 'c,
     'd)
    Bddapron.Env.O.t ->
    'a Bddapron.Expr0.t list ->
    ('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) Bddapron.Expr1.O.List.t
  val get_env :
    ('a,
     ('a, [> 'a Bddapron.Env.typ ] as 'b, [> 'a Bddapron.Env.typdef ] as 'c,
      'd)
     Bddapron.Env.O.t)
    Bddapron.Expr1.O.List.t -> ('a, 'b, 'c, 'd) Bddapron.Env.O.t
  val to_lexpr0 :
    ('a,
     ('a, [> 'a Bddapron.Env.typ ], [> 'a Bddapron.Env.typdef ], 'b)
     Bddapron.Env.O.t)
    Bddapron.Expr1.O.List.t -> 'a Bddapron.Expr0.t list
  val of_lexpr :
    ('a, [> 'a Bddapron.Env.typ ] as 'b, [> 'a Bddapron.Env.typdef ] as 'c,
     'd)
    Bddapron.Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) Bddapron.Expr1.O.expr list ->
    ('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) Bddapron.Expr1.O.List.t
  val to_lexpr :
    ('a,
     ('a, [> 'a Bddapron.Env.typ ] as 'b, [> 'a Bddapron.Env.typdef ] as 'c,
      'd)
     Bddapron.Env.O.t)
    Bddapron.Expr1.O.List.t ->
    ('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) Bddapron.Expr1.O.expr list
  val extend_environment :
    ('a,
     ('a, [> 'a Bddapron.Env.typ ] as 'b, [> 'a Bddapron.Env.typdef ] as 'c,
      'd)
     Bddapron.Env.O.t)
    Bddapron.Expr1.O.List.t ->
    ('a, 'b, 'c, 'd) Bddapron.Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) Bddapron.Expr1.O.List.t
  val normalize :
    ?reduce:bool ->
    ?careset:bool ->
    ('a,
     ('a, [> 'a Bddapron.Env.typ ] as 'b, [> 'a Bddapron.Env.typdef ] as 'c,
      'd)
     Bddapron.Env.O.t)
    Bddapron.Cond.O.t *
    ('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) Bddapron.Expr1.O.List.t ->
    ('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) Bddapron.Cond.O.t *
    ('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) Bddapron.Expr1.O.List.t
  val print :
    ?first:(unit, Format.formatter, unit) Pervasives.format ->
    ?sep:(unit, Format.formatter, unit) Pervasives.format ->
    ?last:(unit, Format.formatter, unit) Pervasives.format ->
    ('a,
     ('a, [> 'a Bddapron.Env.typ ] as 'b, [> 'a Bddapron.Env.typdef ] as 'c,
      'd)
     Bddapron.Env.O.t)
    Bddapron.Cond.O.t ->
    Format.formatter ->
    ('a, ('a, 'b, 'c, 'd) Bddapron.Env.O.t) Bddapron.Expr1.O.List.t -> unit
end