(*) Find the number of elements of a list.

myLength :: [a] -> Int myLength [] = 0 myLength (_:xs) = 1 + myLength xs

myLength' :: [a] -> Int myLength' = foldr (\x n -> n + 1) 0