easy 4 in haskell, password generator