sig
  type 'a t
  val empty : 'a CCImmutArray.t
  val length : 'a CCImmutArray.t -> int
  val singleton : 'a -> 'a CCImmutArray.t
  val doubleton : 'a -> 'a -> 'a CCImmutArray.t
  val make : int -> 'a -> 'a CCImmutArray.t
  val init : int -> (int -> 'a) -> 'a CCImmutArray.t
  val get : 'a CCImmutArray.t -> int -> 'a
  val set : 'a CCImmutArray.t -> int -> 'a -> 'a CCImmutArray.t
  val map : ('a -> 'b) -> 'a CCImmutArray.t -> 'b CCImmutArray.t
  val mapi : (int -> 'a -> 'b) -> 'a CCImmutArray.t -> 'b CCImmutArray.t
  val append : 'a CCImmutArray.t -> 'a CCImmutArray.t -> 'a CCImmutArray.t
  val iter : ('a -> unit) -> 'a CCImmutArray.t -> unit
  val iteri : (int -> 'a -> unit) -> 'a CCImmutArray.t -> unit
  val foldi : ('a -> int -> 'b -> 'a) -> 'a -> 'b CCImmutArray.t -> 'a
  val fold : ('a -> 'b -> 'a) -> 'a -> 'b CCImmutArray.t -> 'a
  val for_all : ('a -> bool) -> 'a CCImmutArray.t -> bool
  val exists : ('a -> bool) -> 'a CCImmutArray.t -> bool
  type 'a sequence = ('a -> unit) -> unit
  type 'a gen = unit -> 'a option
  val of_list : 'a list -> 'a CCImmutArray.t
  val to_list : 'a CCImmutArray.t -> 'a list
  val of_array_unsafe : 'a array -> 'a CCImmutArray.t
  val to_seq : 'a CCImmutArray.t -> 'a CCImmutArray.sequence
  val of_seq : 'a CCImmutArray.sequence -> 'a CCImmutArray.t
  val of_gen : 'a CCImmutArray.gen -> 'a CCImmutArray.t
  val to_gen : 'a CCImmutArray.t -> 'a CCImmutArray.gen
  type 'a printer = Format.formatter -> 'a -> unit
  val print :
    ?start:string ->
    ?stop:string ->
    ?sep:string ->
    'a CCImmutArray.printer -> 'a CCImmutArray.t CCImmutArray.printer
end