urbit/main/bin/thumb.hoon

14 lines
231 B
Plaintext
Raw Normal View History

2013-12-07 09:27:49 +04:00
!:
:: /=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<] ~]