Catamorphism: Difference between revisions
added Arturo
Drkameleon (talk | contribs) (Undo revision 324479 by Drkameleon (talk)) |
Drkameleon (talk | contribs) (added Arturo) |
||
Line 274:
{{out}}
<pre>{55, 3628800, "10987654321"}</pre>
=={{header|Arturo}}==
<lang rebol>; find the sum, with seed:0 (default)
print fold [1 2 3 4] => (+)
; find the product, with seed:1
print fold [1 2 3 4] .seed:1 => (*)</lang>
{{out}}
<pre>10
24</pre>
=={{header|BBC BASIC}}==
| |||