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

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

myLength' = foldr (\_ n -> n + 1) 0 myLength'' = foldr (\n _ -> n + 1) 0