!:
=>  .(+ =>(+ ^/=main=/lib/pony))
|=  [est=@da *]
|=  [sle=@dr ~]
^-  bowl
%+  pomp  "sleeping for {(scow %dr sle)}..."
%-  (posh (add est sle))
|=  now=@da
:_  ~
:~  [%la %leaf "slept."]
==