@@ -137,6 +137,7 @@ A flag.
139 > =a (sy [1 2 3 4 5 6 ~])
139 > =a (sy [1 2 3 4 5 6 ~])
140 [n=6 l={5 4} r={1 3 2}]
141 [n=6 l={5 4} r={1 3 2}]
141 > ~(apt in a)
142 > ~(apt in a)
@@ -244,14 +245,14 @@ A set.
245 > =b (sy `(list @t)`['a' 'b' 'c' ~])
246 > =b (sy `(list @t)`['a' 'b' 'c' ~])
246 > (~(del in b) 'a')
247 > (~(del in b) 'a')
247− {'c' 'b'}
248+ [n='b' l=[n='c' l={} r={}] r=~]
249 > =b (sy `(list @t)`['john' 'bonita' 'daniel' 'madeleine' ~])
250 > =b (sy `(list @t)`['john' 'bonita' 'daniel' 'madeleine' ~])
250 > (~(del in b) 'john')
251 > (~(del in b) 'john')
251− {'bonita' 'madeleine' 'daniel'}
252+ [n='madeleine' l=[n='daniel' l={} r={'bonita'}] r=~]
253 > (~(del in b) 'susan')
254 > (~(del in b) 'susan')
254− {'bonita' 'madeleine' 'daniel' 'john'}
255+ [n='madeleine' l=[n='daniel' l={} r={'bonita'}] r=[n='john' l={} r={}]]
@@ -293,16 +294,19 @@ A set.
294#### Examples
295#### Examples
296− > ((~(dif in (sy 1 2 3 ~)) (sy 2 3 4 ~))
300+ > (~(dif in c) d)
297 [n=1 l=~ r=~]
301 [n=1 l=~ r=~]
299− > (~(dif in (sy 2 3 4 ~)) (sy 1 2 3 ~))
303+ > (~(dif in d) c)
300 [n=4 l=~ r=~]
304 [n=4 l=~ r=~]
302− > `(set @ud)`((~(dif in (sy 1 2 3 ~)) (sy 2 3 4 ~))
306+ > `(set @ud)`(~(dif in c) d)
305− > `(set @ud)`(~(dif in (sy 2 3 4 ~)) (sy 1 2 3 ~))
309+ > `(set @ud)`(~(dif in d) c)
@@ -338,21 +342,21 @@ The `unit` of an atom.
339#### Examples
343#### Examples
341− > =a (sy `(list @)`[1 2 3 4 5 6 7 ~])
345+ > =a (sy `(list @)`[1 2 3 4 5 6 7 ~])
342− > a
346+ > `(set @)`a
343 {5 4 7 6 1 3 2}
347 {5 4 7 6 1 3 2}
348 > (~(dig in a) 7)
352 > (~(dig in a) 7)
351 > (~(dig in a) 2)
355 > (~(dig in a) 2)
354 > (~(dig in a) 6)
358 > (~(dig in a) 6)
357#### Discussion
361#### Discussion
@@ -388,17 +392,18 @@ A `set`.
389#### Examples
393#### Examples
395+ > =b `(set @t)`(sy `(list @t)`['bonita' 'madeleine' 'rudolf' 'john' ~])
392 {'bonita' 'madeleine' 'rudolf' 'john'}
397 {'bonita' 'madeleine' 'rudolf' 'john'}
394 > (~(gas in b) `(list @t)`['14' 'things' 'number' '1.337' ~])
399 > (~(gas in b) `(list @t)`['14' 'things' 'number' '1.337' ~])
395− {'1.337' '14' 'number' 'things' 'bonita' 'madeleine' 'rudolf' 'john'}
400+ [n='number' l={'1.337' '14'} r={'things' 'bonita' 'madeleine' 'rudolf' 'john'}]
402+ > =s (sy `(list @t)`['a' 'b' 'c' 'd' 'e' ~])
397− > (~(gas in s) `(list ,@t)`['1' '2' '3' ~])
403+ > (~(gas in s) `(list @t)`['1' '2' '3' ~])
398− {'1' '3' '2' 'e' 'd' 'a' 'c' 'b'}
404+ [n='e' l=[n='1' l={} r={'3' '2'}] r=[n='b' l={'d' 'a' 'c'} r={}]]
402### `+-has:in`
407### `+-has:in`
@@ -490,9 +495,6 @@ A `set`.
490 > (~(int in `(set @t)`(sy "ac")) `(set @t)`(sy "ha"))
495 > (~(int in `(set @t)`(sy "ac")) `(set @t)`(sy "ha"))
491 [n='a' l={} r={}]
496 [n='a' l={} r={}]
493− > (~(int in (sy "acmo")) (sy "lep"))
497### `+-put:in`
499### `+-put:in`
@@ -568,8 +570,6 @@ A noun.
568 ?~ a +<+.b
570 ?~ a +<+.b
569 $(a r.a, +<+.b $(a l.a, +<+.b (b n.a +<+.b)))
571 $(a r.a, +<+.b $(a l.a, +<+.b (b n.a +<+.b)))
573#### Examples
573#### Examples
575 > =a (~(gas in *(set @)) [1 2 3 ~])
575 > =a (~(gas in *(set @)) [1 2 3 ~])
@@ -748,3 +748,4 @@ An atom.