RosettaCodeData/Task/Greatest-subsequential-sum/Forth/greatest-subsequential-sum-2.fth
2023-07-01 13:44:08 -04: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