/-  *hood
:-  %say
|=  $:  [now=@da eny=@uvJ bec=beak]
        [[=desk ~] ~]
    ==
?:  =(desk %kids)  [%tang ~[(report-kids p.bec now)]]
=+  .^  =vat  %gx
        /(scot %p p.bec)/hood/(scot %da now)/kiln/vat/[desk]/noun
    ==
[%tang ~[(report-vat p.bec now vat)]]