module Date: sig .. end
sig
end
include Date
val of_time : Time.t -> Date.t
Time.t -> Date.t
val today : unit -> Date.t
unit -> Date.t
val format : Date.t -> string -> string
Date.t -> string -> string