sig
type t
type set
type elt
type day = int
val io : Rapids.CHRONOLOGICAL_MAP.t Io.literate
val create : unit -> Rapids.CHRONOLOGICAL_MAP.t
val iter :
(Rapids.CHRONOLOGICAL_MAP.day -> Rapids.CHRONOLOGICAL_MAP.set -> unit) ->
Rapids.CHRONOLOGICAL_MAP.t -> unit
val range :
Rapids.CHRONOLOGICAL_MAP.t ->
Rapids.CHRONOLOGICAL_MAP.day * Rapids.CHRONOLOGICAL_MAP.day
val get :
Rapids.CHRONOLOGICAL_MAP.t ->
Rapids.CHRONOLOGICAL_MAP.day -> Rapids.CHRONOLOGICAL_MAP.set
val add :
Rapids.CHRONOLOGICAL_MAP.t ->
Rapids.CHRONOLOGICAL_MAP.day ->
Rapids.CHRONOLOGICAL_MAP.day -> Rapids.CHRONOLOGICAL_MAP.set -> unit
end