Skip to content

Instantly share code, notes, and snippets.

@evanrinehart

evanrinehart/folds.hs

Created May 8, 2018 02:52
Show Gist options
  • Save evanrinehart/a95c80ec98aef29f0cc9040f325a3e10 to your computer and use it in GitHub Desktop.
Save evanrinehart/a95c80ec98aef29f0cc9040f325a3e10 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
folds.hs
foldr f z [] = z
foldr f z (x:xs) = f x (foldr f z xs)
foldl f z [] = z
foldl f z (x:xs) = foldl f (f z x) xs
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment