Parameter Make.K

type t
val id : t -> int

unique per t