sig
  type t
  val from_int : int -> Time_sig.Second.t
  val from_float : float -> Time_sig.Second.t
  val to_int : Time_sig.Second.t -> int
  val to_float : Time_sig.Second.t -> float
end