Greatest subsequential sum: Difference between revisions
Content added Content deleted
Line 90: | Line 90: | ||
=={{header|AppleScript}}== |
=={{header|AppleScript}}== |
||
Linear derivation of both sum and list |
Linear derivation of both sum and list, in a single fold: |
||
<lang applescript>-- maxSubseq :: [Int] -> [Int] -> (Int, [Int]) |
<lang applescript>-- maxSubseq :: [Int] -> [Int] -> (Int, [Int]) |
||
on maxSubseq(xs) |
on maxSubseq(xs) |