sig
  type 'a leaf = 'a Apron.Abstract0.t
  type 'a t = 'a ApronDD.leaf Cudd.Mtbddc.t
  type 'a table = 'a ApronDD.leaf Cudd.Mtbddc.table
  type 'a leaf_u = 'a ApronDD.leaf Cudd.Mtbddc.unique
  type 'a global = {
    op_is_leq : ('a ApronDD.leaf_u, 'a ApronDD.leaf_u) Cudd.User.test2;
    op_join :
      ('a ApronDD.leaf_u, 'a ApronDD.leaf_u, 'a ApronDD.leaf_u) Cudd.User.op2;
    op_meet :
      ('a ApronDD.leaf_u, 'a ApronDD.leaf_u, 'a ApronDD.leaf_u) Cudd.User.op2;
    op_exist : 'a ApronDD.leaf_u Cudd.User.exist;
  }
  type 'a man = {
    apron : 'a Apron.Manager.t;
    table : 'a ApronDD.table;
    oglobal : 'a ApronDD.global option;
  }
  val make_table : 'a Apron.Manager.t -> 'a ApronDD.table
  val neutral_join : 'a Apron.Abstract0.t -> bool
  val special_is_leq :
    'a Apron.Manager.t -> 'a ApronDD.t -> 'a ApronDD.t -> bool option
  val special_join :
    'a Apron.Manager.t -> 'a ApronDD.t -> 'a ApronDD.t -> 'a ApronDD.t option
  val special_meet :
    'a Apron.Manager.t -> 'a ApronDD.t -> 'a ApronDD.t -> 'a ApronDD.t option
  val make_global :
    'a Apron.Manager.t -> 'a ApronDD.table -> 'a ApronDD.global
  val make_man : ?global:bool -> 'a Apron.Manager.t -> 'a ApronDD.man
  val make_op_join :
    'a ApronDD.man ->
    ('a ApronDD.leaf_u, 'a ApronDD.leaf_u, 'a ApronDD.leaf_u) Cudd.User.op2
  val print :
    ?print_apron:((int -> string) ->
                  Format.formatter -> 'a Apron.Abstract0.t -> unit) ->
    (Format.formatter -> Cudd.Bdd.vt -> unit) ->
    (int -> string) -> Format.formatter -> 'a ApronDD.t -> unit
  val cst :
    cudd:Cudd.Man.vt ->
    'a ApronDD.man -> 'a Apron.Abstract0.t -> 'a ApronDD.t
  val bottom :
    cudd:Cudd.Man.vt -> 'a ApronDD.man -> Apron.Dim.dimension -> 'a ApronDD.t
  val top :
    cudd:Cudd.Man.vt -> 'a ApronDD.man -> Apron.Dim.dimension -> 'a ApronDD.t
  val is_bottom : 'a ApronDD.man -> 'a ApronDD.t -> bool
  val is_top : 'a ApronDD.man -> 'a ApronDD.t -> bool
  val is_eq : 'a ApronDD.man -> 'a ApronDD.t -> 'a ApronDD.t -> bool
  val is_leq : 'a ApronDD.man -> 'a ApronDD.t -> 'a ApronDD.t -> bool
  val join : 'a ApronDD.man -> 'a ApronDD.t -> 'a ApronDD.t -> 'a ApronDD.t
  val meet : 'a ApronDD.man -> 'a ApronDD.t -> 'a ApronDD.t -> 'a ApronDD.t
  val widening :
    'a ApronDD.man -> 'a ApronDD.t -> 'a ApronDD.t -> 'a ApronDD.t
  val meet_tcons_array :
    'a ApronDD.man -> 'a ApronDD.t -> Apron.Tcons0.t array -> 'a ApronDD.t
  val forget_array :
    'a ApronDD.man -> 'a ApronDD.t -> Apron.Dim.t array -> 'a ApronDD.t
  val permute_dimensions :
    'a ApronDD.man -> 'a ApronDD.t -> Apron.Dim.perm -> 'a ApronDD.t
  val add_dimensions :
    'a ApronDD.man ->
    'a ApronDD.t -> Apron.Dim.change -> bool -> 'a ApronDD.t
  val remove_dimensions :
    'a ApronDD.man -> 'a ApronDD.t -> Apron.Dim.change -> 'a ApronDD.t
  val apply_dimchange2 :
    'a ApronDD.man ->
    'a ApronDD.t -> Apron.Dim.change2 -> bool -> 'a ApronDD.t
  type asssub = Assign | Substitute
  val asssub_texpr_array :
    ?asssub_bdd:(Cudd.Bdd.vt -> Cudd.Bdd.vt) ->
    ApronDD.asssub ->
    'a Bdd.Env.symbol ->
    'b ApronDD.man ->
    Apron.Environment.t ->
    'b ApronDD.t ->
    Apron.Dim.t array ->
    'a ApronexprDD.t array -> 'b ApronDD.t option -> 'b ApronDD.t
  val assign_texpr_array :
    'a Bdd.Env.symbol ->
    'b ApronDD.man ->
    Apron.Environment.t ->
    'b ApronDD.t ->
    Apron.Dim.t array ->
    'a ApronexprDD.t array -> 'b ApronDD.t option -> 'b ApronDD.t
  val substitute_texpr_array :
    'a Bdd.Env.symbol ->
    'b ApronDD.man ->
    Apron.Environment.t ->
    'b ApronDD.t ->
    Apron.Dim.t array ->
    'a ApronexprDD.t array -> 'b ApronDD.t option -> 'b ApronDD.t
  val exist :
    'a ApronDD.man -> supp:Cudd.Bdd.vt -> 'a ApronDD.t -> 'a ApronDD.t
  val existand :
    'a ApronDD.man ->
    bottom:'a Apron.Abstract0.t Cudd.Mtbddc.unique ->
    supp:Cudd.Bdd.vt -> Cudd.Bdd.vt -> 'a ApronDD.t -> 'a ApronDD.t
end