mapFilter
| Run Settings | |
|---|---|
| Language | Haskell |
| Language Version | |
| Run Command |
| Snippet Metadata | |
|---|---|
| Owner | danielmg17 |
| Created | |
| Modified | |
| Visibility | Public |
--todo: generalize to traversables/foldables
mapFilter :: (a -> Bool) -> (a -> b) -> [] a -> [] b
mapFilter p f [] = []
mapFilter p f (x:xs) = (if p x then [(f x)] else []) ++ (mapFilter p f xs)
main = print $ mapFilter (>=3) (+1) [1,2,3,4,5]
| Editor Settings | |
|---|---|
| Theme | |
| Key bindings | |
| Full width | |
| Lines |