module Ofday: sig .. end
sig
end
include Ofday
module Zoned: sig .. end
val now : zone:Zone.t -> t
zone:Zone.t -> t