RosettaCodeData/Task/Greatest-subsequential-sum/Forth/greatest-subsequential-sum-2.fth
2015-11-18 06:14:39 +00:00

2 lines
106 B
Forth

test 11 max-sub .array [3 5 6 -2 -1 4 ] = 15 ok
test2 11 max-sub .array [3 5 6 -2 -1 4 -4 2 99 ] = 112 ok