urbit/main/bin/thumb.hoon
2014-06-28 00:09:41 -07:00

14 lines
232 B
Plaintext

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