urbit/gen/hood/start.hoon
2016-08-11 19:39:37 -07:00

17 lines
250 B
Plaintext

::
:::: /hoon/start/hood/gen
::
/? 310
::
::::
!:
:- %say
|= $: {now/@da eny/@uvJ bec/beak}
{arg/{@ $@($~ {@ $~})} $~}
==
:- %drum-start
?> ((sane %tas) -.arg)
?@ +.arg [q.bec -.arg]
?> ((sane %tas) +<.arg)
[-.arg +<.arg]