Binary_searchable.S
val binary_search : ?pos:int -> ?len:int -> t -> compare:(elt -> 'key -> int) ->
[ `Last_strictly_less_than | `Last_less_than_or_equal_to | `Last_equal_to | `First_equal_to | `First_greater_than_or_equal_to | `First_strictly_greater_than ] -> 'key -> int option
See Binary_search.binary_search
in binary_search.ml