Greatest subsequential sum: Difference between revisions

m
Line 90:
=={{header|AppleScript}}==
 
Linear derivation of both sum and list, in a single fold:
<lang applescript>-- maxSubseq :: [Int] -> [Int] -> (Int, [Int])
on maxSubseq(xs)
9,659

edits