para

# -*- encoding: utf-8; indent-tabs-mode: nil -*-
use v6.d;

unit module Date::Calendar::Maya::Names:ver<0.1.0>:auth<zef:jforget>:api<1>;

my %day-names = 'yua' => qw/ Imix      Ik    Akbal  Kan    Chicchan
                             Cimi      Manik Lamat  Muluc  Oc
                             Chuen     Eb    Ben    Ix     Men
                             Cib       Caban Etznab Cauac  Ahau
                            /
               , 'en' => qw/ Alligator Wind  Night  Iguana Serpent
                             Death     Deer  Rabbit Rain   Foot
                             Monkey    Tooth Cane   Jaguar Eagle
                             Owl       Quake Flint  Storm  Lord
                            /
               , 'fr'  => ( "Crocodile"
                          , "Vent"
                          , "Maison"
                          , "Lézard"
                          , "Serpent"
                          , "Mort"
                          , "Chevreuil"
                          , "Lapin"
                          , "Eau"
                          , "Chien"
                          , "Singe"
                          , "Herbe"
                          , "Roseau"
                          , "Jaguar"
                          , "Aigle"
                          , "Vautour"
                          , "Mouvement"
                          , "Couteau de silex"
                          , "Pluie"
                          , "Fleur"
                          );
my %month-names = 'yua' => qw/ Pop    Uo     Zip  Zotz Tzec  Xul
                               Yaskin Mol    Chen Yax  Zac   Ceh
                               Mac    Kankin Muan Pax  Kayab Cumku
                               Uayeb
                            /
                 , 'en'  => ( "Mat"
                            , "Frog"
                            , "Stag"
                            , "Bat"
                            , "Skull"
                            , "End"
                            , "Green time"
                            , "Gather"
                            , "Well"
                            , "Green"
                            , "White"
                            , "Deer"
                            , "Cover"
                            , "Yellow time"
                            , "Owl"
                            , "Drum"
                            , "Turtle"
                            , "Dark god"
                            , "void"
                           )
                 , 'fr' => qw/ Pop    Uo     Zip  Zotz Tzec  Xul
                               Yaskin Mol    Chen Yax  Zac   Ceh
                               Mac    Kankin Muan Pax  Kayab Cumku
                               Uayeb
                            /;

our sub allowed-locale(Str:D $locale) {
  %month-names{$locale}:exists;
}

our sub month-name(Str:D $locale, Int:D $month --> Str) {
  %month-names{$locale}[$month - 1];
}

our sub day-name(Str:D $locale, Int:D $index --> Str) {
  %day-names{$locale}[$index - 1];
}



head

Date::Calendar::Maya::Names - Names for the Maya calendar


Date::Calendar::Maya::Names     is    a     companion    module     to
Date::Calendar::Maya. It  provides the day  names and the  month names
for this calendar.


Most sources about the  Maya calendar give a list of  Haab names and a
list of Tzolkin names, usually  without specifying which precise Mayan
language  they use.  A footnote  in Calendrical  Calculations mentions
that names are translitterated from  the Yucatec language. This is why
I have adopted these names (and their English translations).


On the other hand, for the  French language, I have found translations
only for Tzolkin names. So the Haab names are left untranslated.


The  Mayan  names come  from  Calendrical  Calculations Third  Edition
(L<http://www.cs.tau.ac.il/~nachum/calendar-book/third-edition/>).


The  English  names  come   Calendrical  Calculations  Third  Edition
(L<http://www.cs.tau.ac.il/~nachum/calendar-book/third-edition/>).


The French names come from L<https://icalendrier.fr/calendriers-saga/calendriers/maya/>


Jean Forget <J2N-FORGET at orange dot fr>


This library is  free software; you can redistribute  it and/or modify
it under the Artistic License 2.0.


root

Spinden

Astronomical

React

=begin React :component<HeaderCol> :id<menu> 
=para L<Documentation|/doc/introduction>
=para L<Modules| /mods>
=para L<Examples| file:../examples/index.podlite>
=para L<AI|file:../mcp/index.podlite>
=para L<Download |file:../download/index.podlite>
=para L<About|file:../about/index.podlite>
=para 🔍 K<⌘K>/K<ctrl-K>
=end React


=begin React :component<HeaderCol> :id<footer>  
=begin nested :!nested
=item1 B<Language>
    =item2 L<Get started|file:../getting-started/getting-started.podlite>
    =item2 L<Why Raku?|/doc/language/faq#Why-should-I-learn-Raku-What's-so-great-about-it>
    =item2 L<Try Raku|https://glot.io/new/raku>
    =item2 L<Download | file:../download/index.podlite>
    =item2 L<Raku cheat sheet|https://github.com/Raku/mu/blob/master/docs/Perl6/Cheatsheet/cheatsheet.txt>
    =item2 L<Raku on Exercism|https://exercism.org/tracks/raku>
    =item2 L<Wikipedia|https://en.wikipedia.org/wiki/Raku_(programming_language)>

=end nested
=begin nested :!nested

=item1 B<L<Documentation|/doc>>
    =item2 L<Getting started, Migration guides from other languages, & Tutorials | file:../doc/introduction.podlite>
    =item2 L<Language References|file:../doc/reference.podlite>
    =item2 L<Type Reference| file:../doc/types.podlite>
    =item2 L<Miscellaneous| file:../doc/miscellaneous.podlite>
    =item2 L<FAQs (Frequently Asked Questions)|/doc/language/faq>
    =item2 L<Community|/doc/language/community>
    =item2 L<The list of all documents|file:../doc/index.podlite>
    =item2 L<Hand these documents to an AI assistant|file:../mcp/index.podlite>

=end nested
=begin nested :!nested
=item1 B<Learning>
    =item2 L<The Raku Guide|https://raku.guide/>
    =item2 L<Wikibook |https://en.wikibooks.org/wiki/Raku_Programming>
    =item2 L<Books |https://perl6book.com/>
    =item2 L<Rosetta Code | https://www.raku.org/community/rosettacode>
    =item2 L<Learn Raku in Y minutes|https://learnxinyminutes.com/docs/raku/>
    =item2 L<Golfing |https://github.com/AlexDaniel/raku-golf-cheatsheet>
=end nested
=begin nested :!nested

=item1 B<Explore>
    =item2 L<Raku Blog Aggregator|https://planet.raku.org/>
    =item2 L<Rakudo Weekly|https://rakudoweekly.blog/>
    =item2 L<The Weekly Challenge |https://perlweeklychallenge.org/>
    =item2 L<Raku Advent Calendar|https://raku-advent.blog/>

=end nested
=end React


Built with L<Podlite|https://podlite.org> — the markup and publishing tools behind this site.


=begin React :component<CookieConsent> :id<CookieConsent> :buttonCaption("Got it!")
=para
This website uses cookies for analytics.
=end React


Names

NAME

DESCRIPTION

ISSUES

SOURCES

AUTHOR

COPYRIGHT AND LICENSE

Date::Calendar::MayaAztec v0.1.0

Authors

License

Dependencies

Test Dependencies

Provides

Documentation