sig type t val id : Server.Data.IdentifiedType.t -> int end