!:
::  /=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<] ~]