urbit/cat/hood/start.hoon
2015-06-19 17:16:48 -04:00

16 lines
236 B
Plaintext

::
:::: /hoon/start/hood/cat
::
/? 314
::
::::
!:
|= $: [now=@da eny=@uvI bec=beak]
[arg=[@ $|(~ [@ ~])] ~]
==
:- %hood-start
?> ((sane %tas) -.arg)
?@ +.arg [%home -.arg]
?> ((sane %tas) +<.arg)
[-.arg +<.arg]