module Time: sig .. end
sig
end
include Interval.S
val create_ending_after : Ofday.t * Ofday.t -> now:Time.t -> t
Ofday.t * Ofday.t -> now:Time.t -> t
val create_ending_before : Ofday.t * Ofday.t -> ubound:Time.t -> t
Ofday.t * Ofday.t -> ubound:Time.t -> t