Utils (irmin-pack.Irmin_pack

module Object_counter : sig ... end

val nearest_geq : 
  arr:'a ->
  get:('b -> int -> 'c) ->
  lo:int ->
  hi:int ->
  key:'d ->
  int option

nearest_geq ~arr ~get ~lo ~hi ~key returns the index of the nearest entry in the sorted arr that is >= the given key. Routine is based on binary search.