sig type 'a t val make : 'a -> 'a CamlinternalMenhirLib.InfiniteArray.t val get : 'a CamlinternalMenhirLib.InfiniteArray.t -> int -> 'a val set : 'a CamlinternalMenhirLib.InfiniteArray.t -> int -> 'a -> unit val extent : 'a CamlinternalMenhirLib.InfiniteArray.t -> int val domain : 'a CamlinternalMenhirLib.InfiniteArray.t -> 'a array end