colsum←{⍺←10                            ⍝ Sum of (default decimal) columns.
    ⍺{{(0=⍬⍴⍵)↓⍵}+⌿1 0⌽0,0 ⍺⊤⍵}⍣≡+⌿⍵    ⍝ repeat while overflow.
}

code_colours

test script

Back to: notes

Back to: Workspaces