Clock
type time_of_day = {
hour : int;
minute : int;
second : float;
}
val seconds_per_day : int
val split : offset:int -> float -> int * time_of_day
val local : offset:int -> float -> Civil.date * time_of_day
val of_local : offset:int -> Civil.date -> time_of_day -> float
val to_string : ?seconds:bool -> time_of_day -> string
val offset_to_string : int -> string