Mayan calendar: Difference between revisions

Content added Content deleted
m (Fix markup which producing bogus TOC entries)
m (→‎{{header|Perl 6}}: minor tweaks. follow Go's example for less cluttered header layout)
Line 388: Line 388:
reverse $days.polymod(20,18,20,20);
reverse $days.polymod(20,18,20,20);
}
}



# HEADER
# HEADER
printf "%10s %9s %10s %12s %10s\n",
say ' Gregorian Tzolk’in Haab’ Long Lord of ';
⚫
say ' Date # Name Day Month Count the Night';
'Gregorian', 'Tzolk’in', 'Haab', 'Long', 'Lord of';
say '-----------------------------------------------------------------------';
printf " %-6s %2s %-9s %4s %-10s %-6s %8s\n",
⚫
'Date', '#', 'Name', 'Day', 'Month', 'Count', 'the Night';


# DATES
# DATES
Line 412: Line 410:
}</lang>
}</lang>
{{out}}
{{out}}
<pre> Gregorian Tzolk’in Haab’ Long Lord of
<pre> Gregorian Tzolk’in Haab’ Long Lord of
Date # Name Day Month Count the Night
Date # Name Day Month Count the Night
-----------------------------------------------------------------------
1963-11-21 3 Eb Chum Keh 12.17.10.3.12 G9
1963-11-21 3 Eb Chum Keh 12.17.10.3.12 G9
2004-06-19 4 Ben 16 Sotz’ 12.19.11.6.13 G7
2004-06-19 4 Ben 16 Sotz’ 12.19.11.6.13 G7
Retrieved from "https://rosettacode.org/wiki/Mayan_calendar"