type t = int * int * int * int
val fprintf_day : Stdlib.Format.formatter -> int -> unitval fprintf_hour : Stdlib.Format.formatter -> int -> unitval fprintf_min : Stdlib.Format.formatter -> int -> unitval fprintf : Stdlib.Format.formatter -> (int * int * int) -> unit