Greatest subsequential sum: Difference between revisions

Content added Content deleted
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)