urbit/main/bin/thumb.hoon
2013-12-06 21:27:49 -08:00

14 lines
231 B
Plaintext

!:
:: /=main=/bin/thumb/hoon
::
=> .(-< `who=@p`-<)
|= *
|= [bud=@p ~]
^- bowl
:_ ~
=+ dub=(scot %p bud)
=+ wyl=((hard will) .^(%a /[dub]/will=))
?~ wyl
[[%la %leaf "no will for {(trip dub)}"] ~]
[[%la >q.q.q.i.wyl<] ~]