unable to find the error

[Krishnendu Kar]

Hi! Please tell me whats wrong in this-   module  EvenSumOddProd where           evenSumOddProd :: [Int] -> (Int, Int)  evenSumOddProd(s:t) = (s + (even(a)), t * (odd(b)))   where (a,b) = evenSumOddProd t   output wanted is evenSumOddProd[1,2,3,4,5] returns (6, 15)   thanks in advance Annie