package bastet

  1. Overview
  2. Docs
Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Source file Array.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
module A = ArrayF.Make (struct
  let length = ArrayLabels.length

  let make = ArrayLabels.make

  let append = ArrayLabels.append

  let map f arr = ArrayLabels.map ~f arr

  let mapi f arr = ArrayLabels.mapi ~f:(fun index e -> f e index) arr

  let fold_left f init arr = ArrayLabels.fold_left ~f ~init arr

  let every f arr = ArrayLabels.for_all ~f arr

  let slice ~start ~end_ arr = ArrayLabels.sub arr ~pos:start ~len:(end_ - start)
end)

include A