on master help sign in
thru 3c
c6bbffaHenry Ault
docs/system/hoon/library/src/3c/core/yo.md+11−11
@@ -13,7 +13,7 @@ days from leap years in a century (24).
13Produces
13Produces
14--------
14--------
15
15
16−An [atom]().
16+An atom.
17
17
18Source
18Source
19------
19------
@@ -39,7 +39,7 @@ Number of seconds in a day.
39Produces
39Produces
40--------
40--------
41
41
42−An [atom]().
42+An atom.
43
43
44Source
44Source
45------
45------
@@ -63,7 +63,7 @@ XX Revisit
63Produces
63Produces
64--------
64--------
65
65
66−An [atom]().
66+An atom.
67
67
68Source
68Source
69------
69------
@@ -86,7 +86,7 @@ seconds in a minute by the minutes in an hour.
86Produces
86Produces
87--------
87--------
88
88
89−An [atom]().
89+An atom.
90
90
91Source
91Source
92------
92------
@@ -134,7 +134,7 @@ The number of seconds in a minute.
134Produces
134Produces
135--------
135--------
136
136
137−An [atom]().
137+An atom.
138
138
139Source
139Source
140------
140------
@@ -160,12 +160,12 @@ month at the year at that index.
160Produces
160Produces
161--------
161--------
162
162
163−A [`++list`]() of [`@ud`]()
163+A `++list` of `@ud`
164
164
165Source
165Source
166------
166------
167
167
168− ++ moh `(list ,@ud)`[31 28 31 30 31 30 31 31 30 31 30 31 ~]
168+ ++ moh `(list @ud)`[31 28 31 30 31 30 31 31 30 31 30 31 ~]
169
169
170Examples
170Examples
171--------
171--------
@@ -188,12 +188,12 @@ month at the leap-year at that index.
188Examples
188Examples
189--------
189--------
190
190
191−A [`++list`]() of [`@ud`]()
191+A `++list` of `@ud`
192
192
193Source
193Source
194------
194------
195
195
196− ++ moy `(list ,@ud)`[31 29 31 30 31 30 31 31 30 31 30 31 ~]
196+ ++ moy `(list @ud)`[31 29 31 30 31 30 31 31 30 31 30 31 ~]
197
197
198Examples
198Examples
199--------
199--------
@@ -215,7 +215,7 @@ number of seconds in four years.
215Produces
215Produces
216--------
216--------
217
217
218−An [atom]().
218+An atom.
219
219
220Source
220Source
221------
221------
@@ -240,7 +240,7 @@ seconds in a day by 365.
240Produces
240Produces
241--------
241--------
242
242
243−An [atom]().
243+An atom.
244
244
245Source
245Source
246------
246------
docs/system/hoon/library/src/3c/gate/yall.md+8−7
@@ -17,10 +17,10 @@ Produces
17Source
17Source
18------
18------
19
19
20− ++ yall :: day # to day of year
20+ ++ yall :: day / to day of year
21− |= day=@ud
21+ |= day/@ud
22− ^- [y=@ud m=@ud d=@ud]
22+ ^- {y/@ud m/@ud d/@ud}
23− =+ [era=0 cet=0 lep=_?]
23+ =+ [era=0 cet=0 lep=*?]
24 => .(era (div day era:yo), day (mod day era:yo))
24 => .(era (div day era:yo), day (mod day era:yo))
25 => ^+ .
25 => ^+ .
26 ?: (lth day +(cet:yo))
26 ?: (lth day +(cet:yo))
@@ -28,18 +28,19 @@ Source
28 => .(lep |, cet 1, day (sub day +(cet:yo)))
28 => .(lep |, cet 1, day (sub day +(cet:yo)))
29 .(cet (add cet (div day cet:yo)), day (mod day cet:yo))
29 .(cet (add cet (div day cet:yo)), day (mod day cet:yo))
30 =+ yer=(add (mul 400 era) (mul 100 cet))
30 =+ yer=(add (mul 400 era) (mul 100 cet))
31− |- ^- [y=@ud m=@ud d=@ud]
31+ |- ^- {y/@ud m/@ud d/@ud}
32 =+ dis=?:(lep 366 365)
32 =+ dis=?:(lep 366 365)
33 ?. (lth day dis)
33 ?. (lth day dis)
34 =+ ner=+(yer)
34 =+ ner=+(yer)
35 $(yer ner, day (sub day dis), lep =(0 (end 0 2 ner)))
35 $(yer ner, day (sub day dis), lep =(0 (end 0 2 ner)))
36− |- ^- [y=@ud m=@ud d=@ud]
36+ |- ^- {y/@ud m/@ud d/@ud}
37 =+ [mot=0 cah=?:(lep moy:yo moh:yo)]
37 =+ [mot=0 cah=?:(lep moy:yo moh:yo)]
38− |- ^- [y=@ud m=@ud d=@ud]
38+ |- ^- {y/@ud m/@ud d/@ud}
39 =+ zis=(snag mot cah)
39 =+ zis=(snag mot cah)
40 ?: (lth day zis)
40 ?: (lth day zis)
41 [yer +(mot) +(day)]
41 [yer +(mot) +(day)]
42 $(mot +(mot), day (sub day zis))
42 $(mot +(mot), day (sub day zis))
43+ ::
43
44
44Examples
45Examples
45--------
46--------
docs/system/hoon/library/src/3c/gate/yawn.md+3−2
@@ -17,13 +17,13 @@ Accepts
17Produces
17Produces
18--------
18--------
19
19
20−A [`@ud`]().
20+A `@ud`.
21
21
22Source
22Source
23------
23------
24
24
25 ++ yawn :: days since Jesus
25 ++ yawn :: days since Jesus
26− |= [yer=@ud mot=@ud day=@ud]
26+ |= {yer/@ud mot/@ud day/@ud}
27 ^- @ud
27 ^- @ud
28 => .(mot (dec mot), day (dec day))
28 => .(mot (dec mot), day (dec day))
29 => ^+ .
29 => ^+ .
@@ -46,6 +46,7 @@ Source
46 =+ nec=(sub yer 100)
46 =+ nec=(sub yer 100)
47 $(yer nec, day (add day ?:((yelp nec) 36.525 36.524)))
47 $(yer nec, day (add day ?:((yelp nec) 36.525 36.524)))
48 (add day (mul (div yer 400) (add 1 (mul 4 36.524))))
48 (add day (mul (div yer 400) (add 1 (mul 4 36.524))))
49+ ::
49
50
50Examples
51Examples
51--------
52--------
docs/system/hoon/library/src/3c/gate/year.md+5−4
@@ -6,25 +6,26 @@ its `@d`representation.
6Accepts
6Accepts
7-------
7-------
8
8
9−`det` is a [`++date`]()
9+`det` is a `++date`
10
10
11Produces
11Produces
12--------
12--------
13
13
14−A [`@d`]().
14+A `@d`.
15
15
16Source
16Source
17------
17------
18
18
19 ++ year :: date to @d
19 ++ year :: date to @d
20− |= det=date
20+ |= det/date
21− ^- @d
21+ ^- @da
22 =+ ^= yer
22 =+ ^= yer
23 ?: a.det
23 ?: a.det
24 (add 292.277.024.400 y.det)
24 (add 292.277.024.400 y.det)
25 (sub 292.277.024.400 (dec y.det))
25 (sub 292.277.024.400 (dec y.det))
26 =+ day=(yawn yer m.det d.t.det)
26 =+ day=(yawn yer m.det d.t.det)
27 (yule day h.t.det m.t.det s.t.det f.t.det)
27 (yule day h.t.det m.t.det s.t.det f.t.det)
28+ ::
28
29
29Examples
30Examples
30--------
31--------
docs/system/hoon/library/src/3c/gate/yell.md+4−2
@@ -8,12 +8,12 @@ Source
8------
8------
9
9
10 ++ yell :: tarp from @d
10 ++ yell :: tarp from @d
11− |= now=@d
11+ |= now/@d
12 ^- tarp
12 ^- tarp
13 =+ sec=(rsh 6 1 now)
13 =+ sec=(rsh 6 1 now)
14 =+ ^= fan
14 =+ ^= fan
15 =+ [muc=4 raw=(end 6 1 now)]
15 =+ [muc=4 raw=(end 6 1 now)]
16− |- ^- (list ,@ux)
16+ |- ^- (list @ux)
17 ?: |(=(0 raw) =(0 muc))
17 ?: |(=(0 raw) =(0 muc))
18 ~
18 ~
19 => .(muc (dec muc))
19 => .(muc (dec muc))
@@ -25,6 +25,8 @@ Source
25 =+ mit=(div sec mit:yo)
25 =+ mit=(div sec mit:yo)
26 => .(sec (mod sec mit:yo))
26 => .(sec (mod sec mit:yo))
27 [day hor mit sec fan]
27 [day hor mit sec fan]
28+ ::
29+
28
30
29Examples
31Examples
30--------
32--------
docs/system/hoon/library/src/3c/gate/yore.md+3−2
@@ -10,13 +10,13 @@ Accepts
10Produces
10Produces
11--------
11--------
12
12
13−A [`++date`]().
13+A `++date`.
14
14
15Source
15Source
16------
16------
17
17
18 ++ yore :: @d to date
18 ++ yore :: @d to date
19− |= now=@d
19+ |= now/@da
20 ^- date
20 ^- date
21 =+ rip=(yell now)
21 =+ rip=(yell now)
22 =+ ger=(yall d.rip)
22 =+ ger=(yall d.rip)
@@ -24,6 +24,7 @@ Source
24 [a=& y=(sub y.ger 292.277.024.400)]
24 [a=& y=(sub y.ger 292.277.024.400)]
25 [a=| y=+((sub 292.277.024.400 y.ger))]
25 [a=| y=+((sub 292.277.024.400 y.ger))]
26 [m.ger d.ger h.rip m.rip s.rip f.rip]
26 [m.ger d.ger h.rip m.rip s.rip f.rip]
27+ ::
27
28
28Examples
29Examples
29--------
30--------
docs/system/hoon/library/src/3c/gate/yule.md+5−4
@@ -2,24 +2,24 @@
2
2
3Daily time to time atom
3Daily time to time atom
4
4
5−Accept a [`++tarp`](/doc/hoon/library/1#++tarp), a parsed daily time, and produces a time atom,
5+Accept a `++tarp`, a parsed daily time, and produces a time atom,
6`@d`.
6`@d`.
7
7
8Accepts
8Accepts
9-------
9-------
10
10
11−`rip` is a [`++tarp`](/doc/hoon/library/1#++tarp).
11+`rip` is a `++tarp`.
12
12
13Produces
13Produces
14--------
14--------
15
15
16−A [`@d`]().
16+A `@d`.
17
17
18Source
18Source
19------
19------
20
20
21 ++ yule :: time atom
21 ++ yule :: time atom
22− |= rip=tarp
22+ |= rip/tarp
23 ^- @d
23 ^- @d
24 =+ ^= sec ;: add
24 =+ ^= sec ;: add
25 (mul d.rip day:yo)
25 (mul d.rip day:yo)
@@ -34,6 +34,7 @@ Source
34 => .(muc (dec muc))
34 => .(muc (dec muc))
35 (add (lsh 4 muc i.f.rip) $(f.rip t.f.rip))
35 (add (lsh 4 muc i.f.rip) $(f.rip t.f.rip))
36 (con (lsh 6 1 sec) fac)
36 (con (lsh 6 1 sec) fac)
37+ ::
37
38
38Examples
39Examples
39--------
40--------