3 ms·A strangely glaring error prod (x:xs) = x * (sum xs)by tome 12y agoA strangely glaring error prod (x:xs) = x * (sum xs)agumonkey 12y agoThat's why I wished anaphoric recursion was more used. prod (x:xs) = x * (self xs)tome 12y agoprod' self [] = 1 prod' self (x:xs) = x * self xs prod = fix prod'