mirror of
https://github.com/urbit/shrub.git
synced 2024-12-14 20:02:51 +03:00
21 lines
440 B
Plaintext
21 lines
440 B
Plaintext
::
|
|
:::: /hoon+core+tang+mar
|
|
::
|
|
/? 314
|
|
!:
|
|
|_ tan/(list tank)
|
|
::
|
|
++ grow
|
|
|%
|
|
++ elem
|
|
=- ;pre:code:"{(trip (role (turn - crip)))}" :: XX
|
|
^- wall %- zing ^- (list wall)
|
|
(turn (flop tan) |=(a/tank (wash 0^160 a)))
|
|
--
|
|
++ grab :: convert from
|
|
|%
|
|
++ noun (list ^tank) :: clam from %noun
|
|
++ tank |=(a/^tank [a]~)
|
|
--
|
|
--
|