shrub/gen/womb/stats.hoon

14 lines
301 B
Plaintext
Raw Normal View History

2016-04-30 00:40:44 +03:00
::
:::: /hoon/stats/womb/gen
::
/? 310
2017-11-30 00:28:33 +03:00
/+ hood-womb
2016-04-30 00:40:44 +03:00
:- %say
2016-08-12 10:18:04 +03:00
|= $: {now/@da eny/@uvJ bec/beak}
2016-04-30 00:40:44 +03:00
$~
who/(unit @p)
==
:- %womb-stat-all
=+ [him=(scot %p ?^(who u.who p.bec)) cas=(scot %da now)]
2017-11-30 00:28:33 +03:00
.^((map ship stat:hood-womb) %gx /[him]/hood/[cas]/womb/stats/womb-stat-all)