[Haskell-beginners] Parse error in pattern