foldl←{⎕ML←0             ⍝ Fold (reduce) from the left.
    ↑⍺⍺⍨/(⌽⍵),⊂⍺
}

test script

Back to: notes

Back to: Workspaces

Trouble seeing APL font?