diff options
| author |  ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-10-22 17:26:16 +0000 |
|---|---|---|
| committer | ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-10-22 17:26:16 +0000 |
| commit | f5e9f1baec96ce7fa892a30d288f248e9d2d4b7d (patch) | |
| tree | 9190d5f551d691797971c3b7b3546c4e28408018 /lib/cArray.mli | |
| parent | 8cb2656507f44b7342ac4b75f787dd8f832ada84 (diff) | |
More efficient operations in CArray.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16910 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'lib/cArray.mli')
| -rw-r--r-- | lib/cArray.mli | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/cArray.mli b/lib/cArray.mli index 0e0be1dfd..6608c06d2 100644 --- a/lib/cArray.mli +++ b/lib/cArray.mli @@ -94,6 +94,9 @@ sig val map_to_list : ('a -> 'b) -> 'a array -> 'b list (** Composition of [map] and [to_list]. *) + val map_of_list : ('a -> 'b) -> 'a list -> 'b array + (** Composition of [map] and [of_list]. *) + val chop : int -> 'a array -> 'a array * 'a array (** [chop i a] returns [(a1, a2)] s.t. [a = a1 + a2] and [length a1 = n]. Raise [Failure "Array.chop"] if [i] is not a valid index. *) |