List removeDup := method(
  self uniqueCount select(last == 1) map(first)
)