sig   val now : unit -> Ptime.t   val period : unit -> Ptime.span option   val current_tz_offset_s : unit -> Ptime.tz_offset_s option   val now_d_ps : unit -> int * int64   val period_d_ps : unit -> (int * int64) option end