shrub/gen/womb/shop.hoon

::
::::  /hoon/shop/womb/gen
  ::
/?    310
:-  %say
|=  $:  {now/@da eny/@uvI bec/beak}
        arg/$@($~ {typ/?($stars $planets $galaxies) $~})
        who/(unit @p)
    ==
?~  arg  $(arg ~[typ=%planets])
=-  [%ships .^((list ship) %gx /[him]/hood/[cas]/womb/shop/[typ.arg]/[nth]/ships)]
[him=(scot %p ?^(who u.who p.bec)) cas=(scot %da now) nth=(scot %ud %.(10 ~(rad og eny)))]
womb scry generators 2016-04-30 00:40:44 +03:00			`::`
			`:::: /hoon/shop/womb/gen`
			`::`
			`/? 310`
			`:- %say`
			`\|= $: {now/@da eny/@uvI bec/beak}`
			`arg/$@($~ {typ/?($stars $planets $galaxies) $~})`
			`who/(unit @p)`
			`==`
			`?~ arg $(arg ~[typ=%planets])`
add marks to %womb scry helpers 2016-07-07 00:48:45 +03:00			`=- [%ships .^((list ship) %gx /[him]/hood/[cas]/womb/shop/[typ.arg]/[nth]/ships)]`
womb scry generators 2016-04-30 00:40:44 +03:00			`[him=(scot %p ?^(who u.who p.bec)) cas=(scot %da now) nth=(scot %ud %.(10 ~(rad og eny)))]`