Functor Binary_searchable_intf.Binary_searchable.Make1

module Make1: 
functor (T : Indexable1) -> S1 with type 'a t := 'a T.t
Parameters:
T : Indexable1

type 'a t 
val binary_search : ('a t, 'a) Binary_searchable_intf.binary_search
val binary_search_segmented : ('a t, 'a)
Binary_searchable_intf.binary_search_segmented