ucm/desk/mar/arch.hoon
2024-10-06 18:19:22 +00:00

17 lines
175 B
Plaintext

|_ arch=(list @ta)
::
++ grab
|%
++ noun (list @ta)
--
::
++ grow
|%
++ noun arch
++ json
[%a (turn arch |=(c=@ta [%s c]))]
--
::
++ grad %noun
--