Mayan calendar: Difference between revisions

→‎{{header|Go}}: Made longCount function a bit tidier and added final Perl 6 example.
m (→‎{{header|Perl 6}}: minor tweaks. follow Go's example for less cluttered header layout)
(→‎{{header|Go}}: Made longCount function a bit tidier and added final Perl 6 example.)
Line 277:
diff += 13 * 400 * 360
baktun := diff / (400 * 360)
diff -%= baktun * 400 * 360
katun := diff / (20 * 360)
diff -%= katun * 20 * 360
tun := diff / 360
diff -%= tun * 360
winal := diff / 20
kin := diff -% winal*20
return fmt.Sprintf("%d.%d.%d.%d.%d", baktun, katun, tun, winal, kin)
}
 
Line 306:
"2020-02-29",
"2020-03-01",
"2071-05-16",
}
fmt.Println(" Gregorian Tzolk’in Haab’ Long Lord of")
Line 332 ⟶ 333:
2020-02-29 4 Kimi 14 K’ayab 13.0.7.5.6 G7
2020-03-01 5 Manik’ 15 K’ayab 13.0.7.5.7 G8
2071-05-16 1 Ok 18 Sip 13.2.19.4.10 G9
</pre>
 
9,482

edits