sig
type
t = { hr : int; min : int; sec : int; ms : int; }
end