22 lines
455 B
APL
22 lines
455 B
APL
⍝ Create a namespace ("hash")
|
||
X←⎕NS ⍬
|
||
|
||
⍝ Assign some names
|
||
X.this←'that'
|
||
X.foo←88
|
||
|
||
⍝ Access the names
|
||
X.this
|
||
that
|
||
|
||
⍝ Or do it the array way
|
||
X.(foo this)
|
||
88 that
|
||
|
||
⍝ Namespaces are first class objects
|
||
sales ← ⎕NS ⍬
|
||
sales.(prices quantities) ← (100 98.4 103.4 110.16) (10 12 8 10)
|
||
sales.(revenue ← prices +.× quantities)
|
||
sales.revenue
|
||
4109.6
|