mirror of
https://github.com/urbit/shrub.git
synced 2024-12-15 04:22:48 +03:00
14 lines
286 B
Plaintext
14 lines
286 B
Plaintext
::
|
|
:::: /hoon/balance/womb/gen
|
|
::
|
|
/? 310
|
|
/+ womb
|
|
:- %say
|
|
|= $: {now/@da eny/@uvI bec/beak}
|
|
$~
|
|
who/(unit @p)
|
|
==
|
|
:- %womb-balance-all
|
|
=+ [him=(scot %p ?^(who u.who p.bec)) cas=(scot %da now)]
|
|
.^((set {@uvH mail:womb}) %gx /[him]/hood/[cas]/womb/balance)
|