[Haskell-cafe] parser error in pattern