tview←{⎕ML←1            ⍝ TreeView style tree from nested array.
    ⍺←0                 ⍝ default depth 0.
    1=≡,⍵:⍺,⊂,⊂⍵        ⍝ atom: leaf node depth and value.
    node←⍺,⊂1↑⍵         ⍝ tree:      node depth and value.
    subs(⍺+1)∇¨1↓⍵     ⍝ sub-trees.
    ,⌿node⍪↑subs        ⍝ node together with subtrees.
}
code_colours

test script

Back to: notes

Back to: Workspaces