Module type Period.S


module type S = sig  end

type t 
val empty : t
val add : t -> t -> t
val sub : t -> t -> t
val opp : t -> t
val compare : t -> t -> int