[Haskell-cafe] How to obtain unique integers