shrub/gen/moon.hoon

::
::::  /hoon/moon/gen
  ::
/?    310
::
::::
  !:
:-  %say
|=  $:  {now/@da eny/@uvI bec/beak}
        $~
        $~
    ==
:-  %noun
?>  =(1 (met 5 p.bec))
=+  mon=(mix (lsh 5 1 (end 5 1 eny)) p.bec)
=+  tic=.^(@ /a/(scot %p p.bec)/tick/(scot %da now)/(scot %p mon))
"moon: {<`@p`mon>}; ticket: {<`@p`tic>}"
Add moon generator. 2015-10-20 21:12:22 +03:00			`::`
fix hoon location header information 2016-02-05 06:05:37 +03:00			`:::: /hoon/moon/gen`
Add moon generator. 2015-10-20 21:12:22 +03:00			`::`
formal reponsibility taken gen/ 314->310 2016-02-17 04:40:32 +03:00			`/? 310`
Add moon generator. 2015-10-20 21:12:22 +03:00			`::`
			`::::`
			`!:`
			`:- %say`
Revert "Stripdown part 2." This reverts commit afcc1cb9a80db3a687d7a2a1dc3bf1be38df5b68. 2016-01-26 03:52:58 +03:00			`\|= $: {now/@da eny/@uvI bec/beak}`
151ize +moon args 2016-02-17 07:34:06 +03:00			`$~`
			`$~`
Add moon generator. 2015-10-20 21:12:22 +03:00			`==`
			`:- %noun`
			`?> =(1 (met 5 p.bec))`
			`=+ mon=(mix (lsh 5 1 (end 5 1 eny)) p.bec)`
Better handling of .^ in ames and ++mink 2016-02-19 00:44:17 +03:00			`=+ tic=.^(@ /a/(scot %p p.bec)/tick/(scot %da now)/(scot %p mon))`
			"moon: {<`@p`mon>}; ticket: {<`@p`tic>}"