[Haskell-beginners] haskell problem