Catamorphism: Difference between revisions
m
→{{header|Haskell}}: ( spacing )
(→{{header|Haskell}}: added type signatures, consistent treatment of three cases, output) |
m (→{{header|Haskell}}: ( spacing )) |
||
Line 702:
=={{header|Haskell}}==
<lang haskell>xs :: [Int]
xs = [1 .. 10]
main :: IO ()
main =
mapM_
[ show $ foldr (+)
, show $ foldr (*)
, foldr ((++) . show) [ ] xs -- concatenation
]</lang>
{{Out}}
|