random password generator in Haskell