sig
  val is_polka : 'Apron.Abstract1.t -> bool
  val is_polka_loose : 'Apron.Abstract1.t -> bool
  val is_polka_strict : 'Apron.Abstract1.t -> bool
  val is_polka_equalities : 'Apron.Abstract1.t -> bool
  val of_polka : 'Polka.t Apron.Abstract1.t -> 'Apron.Abstract1.t
  val of_polka_loose :
    Polka.loose Polka.t Apron.Abstract1.t -> 'Apron.Abstract1.t
  val of_polka_strict :
    Polka.strict Polka.t Apron.Abstract1.t -> 'Apron.Abstract1.t
  val of_polka_equalities :
    Polka.equalities Polka.t Apron.Abstract1.t -> 'Apron.Abstract1.t
  val to_polka : 'Apron.Abstract1.t -> 'Polka.t Apron.Abstract1.t
  val to_polka_loose :
    'Apron.Abstract1.t -> Polka.loose Polka.t Apron.Abstract1.t
  val to_polka_strict :
    'Apron.Abstract1.t -> Polka.strict Polka.t Apron.Abstract1.t
  val to_polka_equalities :
    'Apron.Abstract1.t -> Polka.equalities Polka.t Apron.Abstract1.t
end