Difference between revisions of "Talk:Compose"
Jump to navigation
Jump to search
m |
m |
||
Line 5: | Line 5: | ||
</code> |
</code> |
||
− | Or maybe this: |
+ | <br>Or maybe this:<br> |
<code> |
<code> |
||
composeArrow :: [a -> a] -> a -> a |
composeArrow :: [a -> a] -> a -> a |
Revision as of 15:09, 17 May 2006
Reading this page got me to write an arrow version of compose. Don't know if it should be included or not since it isn't a monadic solution.
composeArrow :: [a -> a] -> a -> a
composeArrow = foldr ((>>>) . arr) (arr id)
Or maybe this:
composeArrow :: [a -> a] -> a -> a
composeArrow = foldl ((>>>) . arr) returnA