urbit/mar/tang.hoon
2015-12-09 20:05:58 -08:00

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]~)
--
--