sig
  type t = [ `Unassigned | `Version of int * int ]
  val compare : Uucp.Age.t -> Uucp.Age.t -> int
  val pp : Format.formatter -> Uucp.Age.t -> unit
  val age : Uucp.uchar -> Uucp.Age.t
end