@@ -18,8 +18,11 @@ A container arm for `++jar` operation arms. A `++jar` is a `++map` of
18`a` is a jar.
18`a` is a jar.
21− > ~(. ja (mo (limo a/"ho" b/"he" ~)))
21+> ~(. ja (my [a+1 b+2 ~]))
22− <2.dgz [nlr([p={%a %b} q=""]) <414.fvk 101.jzo 1.ypj %164>]>
22+< 2.ngd
23+ [ a=?(%~ [n=[?(p=%a p=%b) q=@ud] l=nlr([p=?(%a %b) q=@ud]) r=nlr([p=?(%a %b) q=@ud])])
24+ <123.zao 45.xig 1.pnw %140>
@@ -47,18 +50,18 @@ A list retrieved from jar `a` using the key `b`.
50− > =l (mo `(list ,[@t (list ,@)])`[['a' `(list ,@)`[1 2 3 ~]] ['b' `(list ,@)`[4 5 6 ~]] ~])
53+> =l (my [['a' (limo 1 2 3 ~)] ['b' (limo 4 5 6 ~)]~])
52− [[p='a' q=~[1 2 3]] [p='b' q=~[4 5 6]]}
55+[n=[p='b' q=[i=4 t=~[5 6]]] l={} r={[p='a' q=[i=1 t=~[2 3]]]}]
54− > (~(get ja l) 'a')
57+> (~(get ja l) 'a')
55− ~[1 2 3]
58+[i=1 t=[i=2 t=~[3]]]
57− > (~(get ja l) 'b')
60+> (~(get ja l) 'b')
58− ~[4 5 6]
61+[i=4 t=[i=5 t=~[6]]]
60− > (~(get ja l) 'c')
63+> (~(get ja l) 'c')
@@ -86,22 +89,26 @@ Prepend to list
86#### Examples
89#### Examples
89− > =l (mo `(list ,[@t (list ,@)])`[['a' `(list ,@)`[1 2 3 ~]] ['b' `(list ,@)`[4 5 6 ~]] ~])
92+> =l (my [['a' (limo 1 2 3 ~)] ['b' (limo 4 5 6 ~)]~])
91− {[p='a' q=~[1 2 3]] [p='b' q=~[4 5 6]]}
94+[n=[p='b' q=[i=4 t=~[5 6]]] l={} r={[p='a' q=[i=1 t=~[2 3]]]}]
93− > (~(add ja l) 'b' 7)
95+> (~(add ja l) 'a' 100)
94− {[p='a' q=~[1 2 3]] [p='b' q=~[7 4 5 6]]}
96+[ n=[p='b' q=[i=4 t=[i=5 t=~[6]]]]
98+ r=[n=[p='a' q=[i=100 t=[i=1 t=~[2 3]]]] l=~ r=~]
96− > (~(add ja l) 'a' 100)
100+> (~(add ja l) 'a' 100)
97− {[p='a' q=~[100 1 2 3]] [p='b' q=~[4 5 6]]}
101+[n=[p='b' q=[i=4 t=[i=5 t=~[6]]]] l=~ r=[n=[p='a' q=[i=100 t=[i=1 t=~[2 3]]]] l=~ r=~]]
98−
102+> (~(add ja l) 'b' 7)
103+[n=[p='b' q=[i=7 t=[i=4 t=~[5 6]]]] l=~ r=[n=[p='a' q=[i=1 t=[i=2 t=~[3]]]] l=~ r=~]]
99− > (~(add ja l) 'c' 7)
104+> (~(add ja l) 'c' 7)
100− {[p='a' q=~[1 2 3]] [p='c' q=~[7]] [p='b' q=~[4 5 6]]}
105+[ n=[p='b' q=[i=4 t=[i=5 t=~[6]]]]
107+ r=[n=[p='c' q=[i=7 t=~]] l=[n=[p='a' q=[i=1 t=~[2 3]]] l={} r={}] r=~]
102− > (~(add ja l) 'c' `(list ,@)`[7 8 9 ~])
109+> (~(add ja l) 'c' (limo 7 8 9 ~))
103− ! type-fail
110+mull-grow
@@ -120,8 +127,18 @@ Container arm for jug operation arms. A `++jug` is a `++map` of
120`a` is a jug.
127`a` is a jug.
123− > ~(. ju (mo (limo a=(sa "ho") b=(sa "he") ~)))
130+> ~(. ju (my [[a (sy 1 ~)] [b (sy 2 ~)] ~]))
124− <2.dgz [nlr([p={%a %b} q={nlr(^$1{@tD $1}) nlr(^$3{@tD $3})}]) <414.fvk 101.jzo 1.ypj %164>]>
131+< 5.cws
135+ [ n=[p=@ub ?(q=%~ q=[?(n=@ud #!) l=nlr(?(@ud #!)) r=nlr(?(@ud #!))])]
136+ l=nlr([p=@ub q=?(%~ [?(n=@ud #!) l=nlr(?(@ud #!)) r=nlr(?(@ud #!))])])
137+ r=nlr([p=@ub q=?(%~ [?(n=@ud #!) l=nlr(?(@ud #!)) r=nlr(?(@ud #!))])])
140+ <123.zao 45.xig 1.pnw %140>
127### `++del:ju`
144### `++del:ju`