David Tran’s blog

length' :: [a] -> Int
length' = sum . map (\_ -> 1)

length'' :: [a] -> Int
length''   = foldl (\acc _ -> acc + 1) 0
--length'' = foldr (\_ acc -> acc + 1) 0

This entry was posted on Monday, May 21st, 2007 at 5:07 pm and is filed under Haskell - SOE. You can follow any responses to this entry through the RSS 2.0 feed. You can leave a response, or trackback from your own site.