module Period: sig end
include S
val make : int -> int -> int -> int -> int -> int -> Calendar.t
val lmake : ?year:int ->
?month:int ->
?day:int -> ?hour:int -> ?minute:int -> ?second:int -> unit -> Calendar.t
val year : int -> Calendar.t
val month : int -> Calendar.t
val week : int -> Calendar.t
val day : int -> Calendar.t
val hour : int -> Calendar.t
val minute : int -> Calendar.t
val second : int -> Calendar.t
val to_date : Calendar.t -> Date.Period.t
val from_date : Date.Period.t -> Calendar.t
val from_time : Time.Period.t -> Calendar.t
exception Not_computable
val to_time : Calendar.t -> Time.Period.t