sig
  val now_d_ps : unit -> int * int64
  val period_d_ps : unit -> (int * int64) option
  val current_tz_offset_s : unit -> int option
end