[Haskell-cafe] recursion issues...

[Ryan Bloor]

hiya
 
I was wondering how I would get the second function do recursively do the function for poolNews xs.... tried that and it fails. 
 
Ryan
 
 
--Give wins, draws a rating.
 
poolNews :: Result -> PoolNews -> PoolNews
poolNews (a,b,c,d,e) (home,away,goaless,scoredraw) 
             | c > d = (home+1,away,goaless,scoredraw) 
             | c < d = (home,away+1,goaless,scoredraw)  
             |(c == 0) && (d == 0) = (home+1,away,goaless+1,scoredraw) 
                  | otherwise = (home,away,goaless,scoredraw+1)
 

--Do for all Results
poolNewsB :: Results -> PoolNews
poolNewsB (x:xs) = poolNews x (0,0,0,0)
_________________________________________________________________
Celeb spotting – Play CelebMashup and win cool prizes
https://www.celebmashup.com
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://www.haskell.org/pipermail/haskell-cafe/attachments/20071110/81b11a81/attachment.htm