RosettaCodeData/Task/Catamorphism/Oforth/catamorphism.oforth
2016-12-05 23:44:36 +01:00

2 lines
66 B
Text

[ 1, 2, 3, 4, 5 ] reduce(#max)
[ "abc", "def", "gfi" ] reduce(#+)