RosettaCodeData/Task/Catamorphism/Maxima/catamorphism-2.maxima

3 lines
81 B
Plaintext

lreduce("+", [1, 2, 3, 4], 100);
/* (%o1) 110 */