urbit/gen/womb/stats.hoon
2016-08-12 00:27:45 -07:00

14 lines
291 B
Plaintext

::
:::: /hoon/stats/womb/gen
::
/? 310
/+ womb
:- %say
|= $: {now/@da eny/@uvJ bec/beak}
$~
who/(unit @p)
==
:- %womb-stat-all
=+ [him=(scot %p ?^(who u.who p.bec)) cas=(scot %da now)]
.^((map ship stat:womb) %gx /[him]/hood/[cas]/womb/stats/womb-stat-all)