[Haskell-beginners] State as function?