Sha256: 9d2fe949d90cb7cf2cbc4fe72144926bc255ab72893a6cc522e2a371502ddc3f
Contents?: true
Size: 379 Bytes
Versions: 151
Compression:
Stored size: 379 Bytes
Contents
open Core
let find xs value =
let rec go lo hi =
if lo > hi then None
else begin
let mid = lo + (hi - lo) / 2 in
let mid_val = xs.(mid) in
if mid_val < value
then go (mid + 1) hi
else if mid_val > value
then go lo (mid - 1)
else Some mid
end
in
if Array.is_empty xs
then None
else go 0 (Array.length xs - 1)
Version data entries
151 entries across 151 versions & 1 rubygems