!:
::  /=main=/bin/secret/hoon
::
=>  .(-< `who=@p`-<)
|=  [est=time *]
|=  ~
^-  bowl
:_  ~  :_  ~
[%la %leaf (scow %p (,@p .^(%a (scot %p who) %code (scot %da est) ~)))]