sig
  type ('a, 'b) t = ('b, 'a Expr0.Apron.t) Env.value
    constraint 'b =
      ('a, [> 'a Env.typ ] as 'c, [> 'a Env.typdef ] as 'd, 'e) Env.O.t
  val of_expr :
    (('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t,
     [> `Apron of 'a Expr0.Apron.t ])
    Env.value -> ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val to_expr :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Expr1.O.Apron.t ->
    (('a, 'b, 'c, 'd) Env.O.t, [> `Apron of 'a Expr0.Apron.t ]) Env.value
  val extend_environment :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Expr1.O.Apron.t ->
    ('a, 'b, 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val var :
    ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    'a -> ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val cst :
    ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Cond.O.t ->
    Expr1.apron_coeff -> ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val add :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Cond.O.t ->
    ?typ:Expr1.apron_typ ->
    ?round:Expr1.apron_round ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val mul :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Cond.O.t ->
    ?typ:Expr1.apron_typ ->
    ?round:Expr1.apron_round ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val sub :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Cond.O.t ->
    ?typ:Expr1.apron_typ ->
    ?round:Expr1.apron_round ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val div :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Cond.O.t ->
    ?typ:Expr1.apron_typ ->
    ?round:Expr1.apron_round ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val gmod :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Cond.O.t ->
    ?typ:Expr1.apron_typ ->
    ?round:Expr1.apron_round ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val negate :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Cond.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val sqrt :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Cond.O.t ->
    ?typ:Expr1.apron_typ ->
    ?round:Expr1.apron_round ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val cast :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Cond.O.t ->
    ?typ:Expr1.apron_typ ->
    ?round:Expr1.apron_round ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val ite :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Cond.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val condition :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Cond.O.t ->
    Expr1.apron_cons_typ ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t
  val supeq :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Cond.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t
  val sup :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Cond.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t
  val eq :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Cond.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t
  val cofactor :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val restrict :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val tdrestrict :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Expr1.O.Apron.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Bool.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val substitute_by_var :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Cond.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a * 'a) list -> ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val substitute :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Cond.O.t ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t ->
    ('a * ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.expr) list ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t
  val print :
    ('a, ('a, [> 'a Env.typ ] as 'b, [> 'a Env.typdef ] as 'c, 'd) Env.O.t)
    Cond.O.t ->
    Format.formatter ->
    ('a, ('a, 'b, 'c, 'd) Env.O.t) Expr1.O.Apron.t -> unit
end