[Haskell-beginners] A first try