Merge commit '9ab824' into HEAD

This commit is contained in:
C. Guy Yarvin 2016-09-02 12:33:36 -07:00
commit 2f89baefb3

View File

@ -1258,6 +1258,17 @@
+- wyt :: depth of map
|- ^- @
?~(a 0 +((add $(a l.a) $(a r.a))))
::
+- key :: set of keys
|- ^- (set _?>(?=(^ a) p.n.a))
?~ a ~
[n=p.n.a l=$(a l.a) r=$(a r.a)]
::
+- val :: list of vals
=| b/(list _?>(?=(^ a) q.n.a))
|- ^+ b
?~ a b
$(a r.a, b [q.n.a $(a l.a)])
--
:: ::
:::: 2j: jar and jug logic ::