0

Why am I getting a parse error in this code?

data One = H| I deriving (Read,Show,Eq)
data E = A | B deriving (Read,Show,Eq)
type L = [E]

fun1 :: One -> E -> One
-- function for fun1 is here

fun2 :: One -> L -> One
fun2 a [] = a
fun2 a x:xs = fun2 (fun1 a x) xs    --<<< I am getting error here
Chris Martin
  • 30,334
  • 10
  • 78
  • 137
user2070333
  • 335
  • 2
  • 11
  • Possible duplicate of [Haskell: Parse error in pattern](https://stackoverflow.com/questions/8561762/haskell-parse-error-in-pattern) – Chris Martin Sep 06 '17 at 07:38

1 Answers1

3

Try:

fun2 a (x:xs) = fun2 (fun1 a x) xs
Daniel Lyons
  • 22,421
  • 2
  • 50
  • 77