Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
h fltr
let fltr = f :: (a -> Bool) -> [a] -> [a] where f _ [] = []; f p (x:xs) = if (p x) then x:(f p xs) else f p xs in fltr (<5) [2,44,1,32]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.