summaryrefslogtreecommitdiff
path: root/posts
diff options
context:
space:
mode:
authorGregor Kleen <gkleen@yggdrasil.li>2015-03-29 05:32:34 +0200
committerGregor Kleen <gkleen@yggdrasil.li>2015-03-29 05:32:34 +0200
commitd8567468d2e8ea442086658806c8b098e6f02295 (patch)
treeec2d8bea1c0082132df1a3130c5c0f1c27fa5e7f /posts
parent1d571ba3cd00c76b282135c5b798228fdf544fcf (diff)
downloaddirty-haskell.org-d8567468d2e8ea442086658806c8b098e6f02295.tar
dirty-haskell.org-d8567468d2e8ea442086658806c8b098e6f02295.tar.gz
dirty-haskell.org-d8567468d2e8ea442086658806c8b098e6f02295.tar.bz2
dirty-haskell.org-d8567468d2e8ea442086658806c8b098e6f02295.tar.xz
dirty-haskell.org-d8567468d2e8ea442086658806c8b098e6f02295.zip
update - functions existed all along
Diffstat (limited to 'posts')
-rw-r--r--posts/blog-rss.md10
1 files changed, 10 insertions, 0 deletions
diff --git a/posts/blog-rss.md b/posts/blog-rss.md
index 559a6c6..f7116a9 100644
--- a/posts/blog-rss.md
+++ b/posts/blog-rss.md
@@ -23,3 +23,13 @@ Along the way two helper functions were introduced — if an implementation of t
23 (<-->) :: [(a -> a)] -> a -> a 23 (<-->) :: [(a -> a)] -> a -> a
24 [] <--> x = x 24 [] <--> x = x
25 (f:fs) <--> x = fs <--> (f x) 25 (f:fs) <--> x = fs <--> (f x)
26
27== Update
28
29 import Control.Applicative ((<*>), pure)
30
31 (<->) fs = (<*>) fs . pure
32
33 (<-->) = flip $ foldl (.) id
34
35Thanks, viktor. \ No newline at end of file