Control.Concurrent.Unique
data
Unique
newUnique