sig
  type 'a t
  external manager_alloc :
    'a Apron.Manager.t -> 'a Apron.Disjunction.t Apron.Manager.t
    = "camlidl_disjunction_ap_disjunction_manager_alloc"
  external manager_decompose :
    'a Apron.Disjunction.t Apron.Manager.t -> 'a Apron.Manager.t
    = "camlidl_disjunction_ap_disjunction_manager_decompose"
  external to_lincons0_set :
    'a Apron.Disjunction.t Apron.Manager.t ->
    'a Apron.Disjunction.t Apron.Abstract0.t -> Apron.Lincons0.t array
    = "camlidl_disjunction_ap_disjunction_to_lincons0_set"
  val to_lincons1_set :
    'a Apron.Disjunction.t Apron.Manager.t ->
    'a Apron.Disjunction.t Apron.Abstract1.t -> Apron.Lincons1.earray
  external _decompose :
    'a Apron.Disjunction.t Apron.Manager.t ->
    'a Apron.Disjunction.t Apron.Abstract0.t ->
    'a Apron.Abstract0.t array * int
    = "camlidl_disjunction_ap_disjunction__decompose"
  val decompose :
    'a Apron.Disjunction.t Apron.Manager.t ->
    'a Apron.Disjunction.t Apron.Abstract0.t -> 'a Apron.Abstract0.t array
  external compose :
    'a Apron.Disjunction.t Apron.Manager.t ->
    'a Apron.Abstract0.t array -> 'a Apron.Disjunction.t Apron.Abstract0.t
    = "camlidl_disjunction_ap_disjunction_compose"
  val manager_is_disjunction : 'a Apron.Manager.t -> bool
  val manager_of_disjunction :
    'a Apron.Disjunction.t Apron.Manager.t -> 'b Apron.Manager.t
  val manager_to_disjunction :
    'a Apron.Manager.t -> 'b Apron.Disjunction.t Apron.Manager.t
  module Abstract0 :
    sig
      val is_disjunction : 'a Apron.Abstract0.t -> bool
      val of_disjunction :
        'a Apron.Disjunction.t Apron.Abstract0.t -> 'b Apron.Abstract0.t
      val to_disjunction :
        'a Apron.Abstract0.t -> 'b Apron.Disjunction.t Apron.Abstract0.t
    end
  module Abstract1 :
    sig
      val is_disjunction : 'a Apron.Abstract1.t -> bool
      val of_disjunction :
        'a Apron.Disjunction.t Apron.Abstract1.t -> 'b Apron.Abstract1.t
      val to_disjunction :
        'a Apron.Abstract1.t -> 'b Apron.Disjunction.t Apron.Abstract1.t
    end
end