Module Base.Binary_searchable

module type S = sig ... end
module type S1 = sig ... end
module type Indexable = sig ... end
module type Indexable1 = sig ... end
module Which_target_by_key : sig ... end
module Which_target_by_segment : sig ... end
type nonrec ('t, 'elt) binary_search_segmented = ?pos:int -> ?len:int -> 't -> segment_of:('elt -> [ `Left | `Right ]) -> [ `Last_on_left | `First_on_right ] -> int option
module Make (T : Indexable) : S with type t := T.t with type elt := T.elt
module Make1 (T : Indexable1) : S1 with type 'a t := 'a T.t