vat: add +vat, a single-desk version of +vats

This commit is contained in:
John Franklin 2022-05-07 02:20:44 -05:00
parent 71d4f72ce1
commit 3d9f0c6414

10
pkg/arvo/gen/vat.hoon Normal file
View File

@ -0,0 +1,10 @@
/- *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)]]