alset←{                     ⍝ Assoc list ⍺ with (key value) pair ⍵ replaced.
    key val←⍵               ⍝ key and new value
    {(val)@(⍺⍳⊂key)⊢⍵}\⍺   ⍝ :: list ← list ∇ key value
}

code_colours

test script

Back to: notes

Back to: Workspaces