dscan←{                     ⍝ Divide scan
    ⍺←⍬⍴⌽⍳⍴⍴⍵               ⍝ ⍺ is axis (default last).
    ×\[⍺]⍵*[⍺](⍺⊃⍴⍵)⍴1,-1
}

code_colours

test script

Back to: notes

Back to: Workspaces