Skip to content

Instantly share code, notes, and snippets.

@mike-burns
Created December 28, 2011 01:21
Show Gist options
  • Save mike-burns/1525703 to your computer and use it in GitHub Desktop.
Save mike-burns/1525703 to your computer and use it in GitHub Desktop.
pipe a value through filters
pipe :: [ a -> a ] -> a -> a
pipe [] xs = xs
pipe (f:fs) xs = pipe fs $ f xs
@mike-burns
Copy link
Author

This is foldr (.) id.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment