Source file flat_array.ml

1
2
3
4
5
6
7
type elt = float
type t = floatarray
let len = Array.Floatarray.length
let get = Array.Floatarray.unsafe_get
let set = Array.Floatarray.unsafe_set

let create = Array.Floatarray.create