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