Module Stdlib_stable.IarrayLabelsSource
Operations on immutable arrays. This module mirrors the API of Array, but omits functions that assume mutability; in addition to obviously mutating functions, it omits copy along with the functions make, create_float, and make_matrix that produce all-constant arrays. The exception is the sorting functions, which are given a copying API to replace the in-place one.
An alias for the type of immutable arrays.
Return the length (number of elements) of the given immutable array.
get a n returns the element number n of immutable array a. The first element has number 0. The last element has number length a - 1. You can also write a.:(n) instead of get a n.
A synonym for get.
val init :
('a : value_or_null mod separable). int ->
f:(int -> 'a) @ local ->
'a iarray @@ portableinit n ~f returns a fresh immutable array of length n, with element number i initialized to the result of f i. In other terms, init n ~f tabulates the results of f applied to the integers 0 to n-1.
val init_local :
('a : value_or_null mod separable). int ->
f:(int -> 'a @ local) @ local ->
'a iarray @ local @@ portableThe locally-allocating version of init.
val append :
('a : value_or_null mod separable). 'a iarray ->
'a iarray ->
'a iarray @@ portableappend v1 v2 returns a fresh immutable array containing the concatenation of the immutable arrays v1 and v2.
val append_local :
('a : value_or_null mod separable). 'a iarray @ local ->
'a iarray @ local ->
'a iarray @ local @@ portableThe locally-allocating version of append.
Same as append, but concatenates a list of immutable arrays.
val concat_local :
('a : value_or_null mod separable). 'a iarray list @ local ->
'a iarray @ local @@ portableThe locally-allocating version of concat.
val sub :
('a : value_or_null mod separable). 'a iarray ->
pos:int ->
len:int ->
'a iarray @@ portablesub a ~pos ~len returns a fresh immutable array of length len, containing the elements number pos to pos + len - 1 of immutable array a. This creates a copy of the selected portion of the immutable array.
val sub_local :
('a : value_or_null mod separable). 'a iarray @ local ->
pos:int ->
len:int ->
'a iarray @ local @@ portableThe locally-allocating version of sub.
to_list a returns the list of all the elements of a.
val to_list_local :
('a : value_or_null mod separable). 'a iarray @ local ->
'a list @ local @@ portableThe locally-allocating version of .
of_list l returns a fresh immutable array containing the elements of l.
val of_list_local :
('a : value_or_null mod separable). 'a list @ local ->
'a iarray @ local @@ portableThe locally-allocating version of of_list.
Converting to and from mutable arrays
to_array a returns a mutable copy of the immutable array a; that is, a fresh (mutable) array containing the same elements as a
of_array ma returns an immutable copy of the mutable array ma; that is, a fresh immutable array containing the same elements as ma
Iterators
val iter :
('a : value_or_null mod separable). f:('a -> unit) @ local ->
'a iarray ->
unit @@ portableiter ~f a applies function f in turn to all the elements of a. It is equivalent to f a.:(0); f a.:(1); ...; f a.:(length a - 1); ().
val iter_local :
('a : value_or_null mod separable). f:('a @ local -> unit) @ local ->
'a iarray @ local ->
unit @@ portableThe locally-scoped version of iter.
val iteri :
('a : value_or_null mod separable). f:(int -> ('a -> unit) @ local) @ local ->
'a iarray ->
unit @@ portableSame as iter, but the function is applied to the index of the element as first argument, and the element itself as second argument.
val iteri_local :
('a : value_or_null mod separable). f:
(int -> ('a @ local -> unit) @ local) @ local ->
'a iarray @ local ->
unit @@ portableThe locally-scoped version of iteri.
val map :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
('a -> 'b) @ local ->
'a iarray ->
'b iarray @@ portablemap ~f a applies function f to all the elements of a, and builds an immutable array with the results returned by f: [| f a.:(0); f a.:(1); ...; f a.:(length a - 1) |].
val map_local :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
('a @ local -> 'b @ local) @ local ->
'a iarray @ local ->
'b iarray @ local @@ portableThe locally-scoped and locally-allocating version of map.
val map_local_input :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
('a @ local -> 'b) @ local ->
'a iarray @ local ->
'b iarray @@ portableThe locally-constrained but globally-allocating version of map.
val map_local_output :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
('a -> 'b @ local) @ local ->
'a iarray ->
'b iarray @ local @@ portableThe locally-allocating but global-input version of map.
val mapi :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
(int -> ('a -> 'b) @ local) @ local ->
'a iarray ->
'b iarray @@ portableSame as map, but the function is applied to the index of the element as first argument, and the element itself as second argument.
val mapi_local :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
(int -> ('a @ local -> 'b @ local) @ local) @ local ->
'a iarray @ local ->
'b iarray @ local @@ portableThe locally-scoped and locally-allocating version of mapi.
val mapi_local_input :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
(int -> ('a @ local -> 'b) @ local) @ local ->
'a iarray @ local ->
'b iarray @@ portableThe locally-constrained but globally-allocating version of mapi.
val mapi_local_output :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
(int -> ('a -> 'b @ local) @ local) @ local ->
'a iarray ->
'b iarray @ local @@ portableThe locally-allocating but global-input version of mapi.
val fold_left :
('a : value_or_null) ('b : value_or_null mod separable). f:
('a ->
('b ->
'a) @ local) @ local ->
init:'a ->
'b iarray ->
'a @@ portablefold_left ~f ~init a computes f (... (f (f init a.:(0)) a.:(1)) ...) a.:(n-1), where n is the length of the immutable array a.
val fold_left_local :
('a : value_or_null) ('b : value_or_null mod separable). f:
('a @ local ->
'b @ local ->
'a @ local) @ local ->
init:'a @ local ->
'b iarray @ local ->
'a @ local @@ portableThe locally-constrained and locally-allocating version of fold_left.
WARNING: This function consumes O(n) extra stack space, as every intermediate accumulator will be left on the local stack!
val fold_left_local_input :
('a : value_or_null) ('b : value_or_null mod separable). f:
('a ->
('b @ local ->
'a) @ local) @ local ->
init:'a ->
'b iarray @ local ->
'a @@ portableThe locally-constrained but globally-allocating version of fold_left.
val fold_left_local_output :
('a : value_or_null) ('b : value_or_null mod separable). f:
('a @ local ->
'b ->
'a @ local) @ local ->
init:'a @ local ->
'b iarray ->
'a @ local @@ portableThe locally-allocating but global-input version of fold_left.
WARNING: This function consumes O(n) extra stack space, as every intermediate accumulator will be left on the local stack!
val fold_left_map :
('a : value_or_null) ('b : value_or_null mod separable) ('c : value_or_null mod separable).
f:
('a -> ('b -> 'a * 'c) @ local) @ local ->
init:'a ->
'b iarray ->
'a * 'c iarray @@ portableval fold_left_map_local :
('a : value_or_null) ('b : value_or_null mod separable) ('c : value_or_null mod separable).
f:
('a @ local -> 'b @ local -> ('a * 'c) @ local) @ local ->
init:'a @ local ->
'b iarray @ local ->
('a * 'c iarray) @ local @@ portableThe locally-constrained and locally-allocating version of fold_left.
WARNING: This function consumes O(n) extra stack space, as every intermediate accumulator will be left on the local stack!
val fold_left_map_local_input :
('a : value_or_null) ('b : value_or_null mod separable) ('c : value_or_null mod separable).
f:
('a -> ('b @ local -> 'a * 'c) @ local) @ local ->
init:'a ->
'b iarray @ local ->
'a * 'c iarray @@ portableThe locally-constrained but globally-allocating version of fold_left.
val fold_left_map_local_output :
('a : value_or_null) ('b : value_or_null mod separable) ('c : value_or_null mod separable).
f:
('a @ local -> 'b -> ('a * 'c) @ local) @ local ->
init:'a @ local ->
'b iarray ->
('a * 'c iarray) @ local @@ portableThe locally-allocating but global-input version of fold_left.
WARNING: This function consumes O(n) extra stack space, as every intermediate accumulator will be left on the local stack!
val fold_right :
('a : value_or_null) ('b : value_or_null mod separable). f:
('b ->
('a ->
'a) @ local) @ local ->
'b iarray ->
init:'a ->
'a @@ portablefold_right ~f a ~init computes f a.:(0) (f a.:(1) ( ... (f a.:(n-1) init) ...)), where n is the length of the immutable array a.
val fold_right_local :
('a : value_or_null) ('b : value_or_null mod separable). f:
('b @ local ->
'a @ local ->
'a @ local) @ local ->
'b iarray @ local ->
init:'a @ local ->
'a @ local @@ portableThe locally-constrained and locally-allocating version of fold_right.
WARNING: This function consumes O(n) extra stack space, as every intermediate accumulator will be left on the local stack!
val fold_right_local_input :
('a : value_or_null) ('b : value_or_null mod separable). f:
('b @ local ->
'a ->
'a) @ local ->
'b iarray @ local ->
init:'a ->
'a @@ portableThe locally-constrained but globally-allocating version of fold_right.
val fold_right_local_output :
('a : value_or_null) ('b : value_or_null mod separable). f:
('b ->
('a @ local ->
'a @ local) @ local) @ local ->
'b iarray ->
init:'a @ local ->
'a @ local @@ portableThe locally-allocating but global-input version of fold_right.
WARNING: This function consumes O(n) extra stack space, as every intermediate accumulator will be left on the local stack!
Iterators on two arrays
val iter2 :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
('a -> ('b -> unit) @ local) @ local ->
'a iarray ->
'b iarray ->
unit @@ portableiter2 ~f a b applies function f to all the elements of a and b.
val iter2_local :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
('a @ local -> 'b @ local -> unit) @ local ->
'a iarray @ local ->
'b iarray @ local ->
unit @@ portableThe locally-scoped version of iter2.
val iter2_local_first :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
('a @ local -> 'b -> unit) @ local ->
'a iarray @ local ->
'b iarray ->
unit @@ portableThe first-biased partly-locally-scoped version of iter2.
val iter2_local_second :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
('a -> ('b @ local -> unit) @ local) @ local ->
'a iarray ->
'b iarray @ local ->
unit @@ portableThe second-biased partly-locally-scoped version of iter2.
val map2 :
('a : value_or_null mod separable) ('b : value_or_null mod separable) ('c : value_or_null mod separable).
f:
('a -> ('b -> 'c) @ local) @ local ->
'a iarray ->
'b iarray ->
'c iarray @@ portablemap2 ~f a b applies function f to all the elements of a and b, and builds an immutable array with the results returned by f: [| f a.:(0) b.:(0); ...; f a.:(length a - 1) b.:(length b - 1)|].
val map2_local :
('a : value_or_null mod separable) ('b : value_or_null mod separable) ('c : value_or_null mod separable).
f:
('a @ local -> 'b @ local -> 'c @ local) @ local ->
'a iarray @ local ->
'b iarray @ local ->
'c iarray @ local @@ portableThe locally-scoped and locally-allocating version of map2.
val map2_local_inputs :
('a : value_or_null mod separable) ('b : value_or_null mod separable) ('c : value_or_null mod separable).
f:
('a @ local -> 'b @ local -> 'c) @ local ->
'a iarray @ local ->
'b iarray @ local ->
'c iarray @@ portableThe locally-scoped but globally-allocating version of map2.
val map2_local_output :
('a : value_or_null mod separable) ('b : value_or_null mod separable) ('c : value_or_null mod separable).
f:
('a -> ('b -> 'c @ local) @ local) @ local ->
'a iarray ->
'b iarray ->
'c iarray @ local @@ portableThe locally-allocating but global-inputs version of map2.
val map2_local_first_input :
('a : value_or_null mod separable) ('b : value_or_null mod separable) ('c : value_or_null mod separable).
f:
('a @ local -> 'b -> 'c) @ local ->
'a iarray @ local ->
'b iarray ->
'c iarray @@ portableThe first-biased partly-locally-scoped but globally-allocating version of map2.
val map2_local_second_input :
('a : value_or_null mod separable) ('b : value_or_null mod separable) ('c : value_or_null mod separable).
f:
('a -> ('b @ local -> 'c) @ local) @ local ->
'a iarray ->
'b iarray @ local ->
'c iarray @@ portableThe second-biased partly-locally-scoped but globally-allocating version of map2.
val map2_local_first_input_and_output :
('a : value_or_null mod separable) ('b : value_or_null mod separable) ('c : value_or_null mod separable).
f:
('a @ local -> 'b -> 'c @ local) @ local ->
'a iarray @ local ->
'b iarray ->
'c iarray @ local @@ portableThe locally-allocating and first-biased partly-locally-scoped version of map2.
val map2_local_second_input_and_output :
('a : value_or_null mod separable) ('b : value_or_null mod separable) ('c : value_or_null mod separable).
f:
('a -> ('b @ local -> 'c @ local) @ local) @ local ->
'a iarray ->
'b iarray @ local ->
'c iarray @ local @@ portableThe locally-allocating and second-biased partly-locally-scoped version of map2.
Array scanning
val for_all :
('a : value_or_null mod separable). f:('a -> bool) @ local ->
'a iarray ->
bool @@ portablefor_all ~f [|a1; ...; an|] checks if all elements of the immutable array satisfy the predicate f. That is, it returns (f a1) && (f a2) && ... && (f an).
val for_all_local :
('a : value_or_null mod separable). f:('a @ local -> bool) @ local ->
'a iarray @ local ->
bool @@ portableThe locally-scoped version of for_all.
val exists :
('a : value_or_null mod separable). f:('a -> bool) @ local ->
'a iarray ->
bool @@ portableexists ~f [|a1; ...; an|] checks if at least one element of the immutable array satisfies the predicate f. That is, it returns (f a1) || (f a2) || ... || (f an).
val exists_local :
('a : value_or_null mod separable). f:('a @ local -> bool) @ local ->
'a iarray @ local ->
bool @@ portableThe locally-scoped version of exists.
val for_all2 :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
('a -> ('b -> bool) @ local) @ local ->
'a iarray ->
'b iarray ->
bool @@ portableSame as for_all, but for a two-argument predicate.
val for_all2_local :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
('a @ local -> 'b @ local -> bool) @ local ->
'a iarray @ local ->
'b iarray @ local ->
bool @@ portableThe locally-scoped version of for_all2.
val for_all2_local_first :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
('a @ local -> 'b -> bool) @ local ->
'a iarray @ local ->
'b iarray ->
bool @@ portableThe first-biased partly-locally-scoped version of for_all2.
val for_all2_local_second :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
('a -> ('b @ local -> bool) @ local) @ local ->
'a iarray ->
'b iarray @ local ->
bool @@ portableThe second-biased partly-locally-scoped version of for_all2.
val exists2 :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
('a -> ('b -> bool) @ local) @ local ->
'a iarray ->
'b iarray ->
bool @@ portableSame as exists, but for a two-argument predicate.
val exists2_local :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
('a @ local -> 'b @ local -> bool) @ local ->
'a iarray @ local ->
'b iarray @ local ->
bool @@ portableThe locally-scoped version of exists2.
val exists2_local_first :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
('a @ local -> 'b -> bool) @ local ->
'a iarray @ local ->
'b iarray ->
bool @@ portableThe first-biased partly-locally-scoped version of exists2.
val exists2_local_second :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
f:
('a -> ('b @ local -> bool) @ local) @ local ->
'a iarray ->
'b iarray @ local ->
bool @@ portableThe second-biased partly-locally-scoped version of exists2.
val mem :
('a : value_or_null mod separable). 'a @ local ->
set:'a iarray @ local ->
bool @@ portablemem a ~set is true if and only if a is structurally equal to an element of l (i.e. there is an x in l such that compare a x = 0).
val memq :
('a : value_or_null mod separable). 'a @ local ->
set:'a iarray @ local ->
bool @@ portableSame as mem, but uses physical equality instead of structural equality to compare list elements.
val find_opt :
('a : value_or_null mod separable). f:('a -> bool) @ local ->
'a iarray ->
'a option @@ portablefind_opt ~f a returns the first element of the immutable array a that satisfies the predicate f, or None if there is no value that satisfies f in the array a.
val find_opt_local :
('a : value_or_null mod separable). f:('a @ local -> bool) @ local ->
'a iarray @ local ->
'a option @ local @@ portableThe locally-constrained and locally-allocating version of .
val find_map :
('a : value_or_null mod separable) ('b : value_or_null). f:
('a -> 'b option) @ local ->
'a iarray ->
'b option @@ portablefind_map ~f a applies f to the elements of a in order, and returns the first result of the form Some v, or None if none exist.
val find_map_local :
('a : value_or_null mod separable) ('b : value_or_null). f:
('a @ local ->
'b option @ local) @ local ->
'a iarray @ local ->
'b option @ local @@ portableThe locally-constrained and locally-allocating version of find_map.
val find_map_local_input :
('a : value_or_null mod separable) ('b : value_or_null). f:
('a @ local ->
'b option) @ local ->
'a iarray @ local ->
'b option @@ portableThe locally-constrained but globally-allocating version of find_map.
val find_map_local_output :
('a : value_or_null mod separable) ('b : value_or_null). f:
('a ->
'b option @ local) @ local ->
'a iarray ->
'b option @ local @@ portableThe locally-allocating but global-input version of find_map.
Arrays of pairs
val split :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
('a * 'b) iarray ->
'a iarray * 'b iarray @@ portablesplit [:(a1,b1); ...; (an,bn):] is ([:a1; ...; an:], [:b1; ...; bn:]).
val split_local :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
('a * 'b) iarray @ local ->
('a iarray * 'b iarray) @ local @@ portableThe locally-allocating version of split.
val combine :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
'a iarray ->
'b iarray ->
('a * 'b) iarray @@ portablecombine [:a1; ...; an:] [:b1; ...; bn:] is [:(a1,b1); ...; (an,bn):]. Raise Invalid_argument if the two immutable iarrays have different lengths.
val combine_local :
('a : value_or_null mod separable) ('b : value_or_null mod separable).
'a iarray @ local ->
'b iarray @ local ->
('a * 'b) iarray @ local @@ portableThe locally-allocating version of combine.
Sorting
val sort :
('a : value_or_null mod separable). cmp:('a -> 'a -> int) ->
'a iarray ->
'a iarray @@ portableSort an immutable array in increasing order according to a comparison function. The comparison function must return 0 if its arguments compare as equal, a positive integer if the first is greater, and a negative integer if the first is smaller (see below for a complete specification). For example, Stdlib.compare is a suitable comparison function. The result of calling sort is a fresh immutable array containing the same elements as the original sorted in increasing order. Other than this fresh array, sort is guaranteed to run in constant heap space and (at most) logarithmic stack space.
The current implementation uses Heap Sort. It runs in constant stack space.
Specification of the comparison function: Let a be the immutable array and cmp the comparison function. The following must be true for all x, y, z in a :
cmp x y> 0 if and only ifcmp y x< 0- if
cmp x y>= 0 andcmp y z>= 0 thencmp x z>= 0
The result of sort, which we'll call a', contains the same elements as a, reordered in such a way that for all i and j valid indices of a (or equivalently, of a'):
cmp a'.:(i) a'.:(j)>= 0 if and only if i >= j
val stable_sort :
('a : value_or_null mod separable). cmp:('a -> 'a -> int) ->
'a iarray ->
'a iarray @@ portableSame as sort, but the sorting algorithm is stable (i.e. elements that compare equal are kept in their original order) and not guaranteed to run in constant heap space.
The current implementation uses Merge Sort. It uses a temporary array of length n/2, where n is the length of the immutable array. It is usually faster than the current implementation of sort.
val fast_sort :
('a : value_or_null mod separable). cmp:('a -> 'a -> int) ->
'a iarray ->
'a iarray @@ portableSame as sort or stable_sort, whichever is faster on typical input.
Iterators
Iterate on the immutable array, in increasing order.
Iterate on the immutable array, in increasing order, yielding indices along elements.