Originally from: https://github.com/UnixJunkie/interval-tree Instead of "Int64.t", we use "Int64.t".
module Interval : sig ... endval create : 'a Interval.t list -> 'a tcreate intervals_list : interval tree of all intervals in the list
val of_triplets : (Stdlib.Int64.t * Stdlib.Int64.t * 'a) list -> 'a tof_triplets interval_triplets : interval tree of all intervals whose bounds and values are given in a list
val query : 'a t -> Stdlib.Int64.t -> 'a Interval.t listquery tree q : list of intervals in the tree t containing the Int64.t q
val iter : 'a t -> f:('a Interval.t -> unit) -> unititer tree ~f calls applies f to each interval that has been added to tree. Traversal order is not specified.