sig
  val is_polkagrid : 'a Apron.Abstract1.t -> bool
  val of_polkagrid : 'a PolkaGrid.t Apron.Abstract1.t -> 'b Apron.Abstract1.t
  val to_polkagrid : 'a Apron.Abstract1.t -> 'b PolkaGrid.t Apron.Abstract1.t
end