pavone@170: #{ pavone@170: sum <- :l { pavone@170: l fold: 0 with: :acc el { pavone@170: acc + el pavone@170: } pavone@170: } pavone@170: main <- { pavone@170: print: (string: (sum: [])) . "\n" pavone@170: print: (string: (sum: [1 2 3 4])) . "\n" pavone@170: print: (string: (sum: 1 | 2 | 3 | 4 | [])) . "\n" pavone@170: print: (string: (sum: [1 2] . [3 4])) . "\n" pavone@170: } pavone@170: }