module Ofday: S with type key = Ofday.t with type value = float
S
with type key = Ofday.t
with type value = float