[Haskell-beginners] Segmentation fault