para

use v6.d;
unit class Date::Calendar::Persian::Names:ver<0.1.0>:auth<zef:jforget>:api<1>;

my @month-names = ( "Farvardin"
                  , "Ordibehesht"
                  , "Khordad"
                  , "Tir"
                  , "Mordad"
                  , "Shahrivar"
                  , "Mehr"
                  , "Aban"
                  , "Azar"
                  , "Dei"
                  , "Bahman"
                  , "Esfand"
);

my @month-abbr = < Far Ord Kho Tir Mor Sha
                   Meh Aba Aza Dei Bah Esf >
;

my @day-names = ( "Shanbe"        # S
                , "Yek-shanbe"    # S
                , "Do shanbe"     # M
                , "Se shanbe"     # T
                , "Chahar shanbe" # W
                , "Panj shanbe"   # T
                , "Jumee"         # F
);

my @day-abbr =  ( "Shn" # S
                , "1sh" # S
                , "2sh" # M
                , "3sh" # T
                , "4sh" # W
                , "5sh" # T
                , "Jom" # F
);

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

our sub month-abbr(Int:D $month --> Str) {
  return @month-abbr[$month - 1];
}

our sub day-name(Int:D $day7 --> Str) {
  return @day-names[$day7];
}

our sub day-abbr(Int:D $day7 --> Str) {
  return @day-abbr[$day7];
}




head

Date::Calendar::Persian::Names - string values for the Persian calendar


code

=begin code :lang<raku>

use Date::Calendar::Persian;

=end code


Date::Calendar::Persian::Names  is a  utility  module, providing  string
values for the main module Date::Calendar::Persian.


The names and abbreviations come from
L<https://api.kde.org/frameworks-api/frameworks-apidocs/frameworks/kdelibs4support/html/kcalendarsystemjalali_8cpp_source.html>


Since the KDE version number will change, you should rather use a search engine:
L<https://html.duckduckgo.com/html/?q=calendarsystemjalali%20KDElibs>


L<Date::Persian::Simple|https://metacpan.org/pod/Date::Persian::Simple>


C<calendar/cal-persia.el>  in emacs  or xemacs.


CALENDRICA 4.0 -- Common Lisp, which can be download in the "Resources" section of
L<https://www.cambridge.org/us/academic/subjects/computer-science/computing-general-interest/calendrical-calculations-ultimate-edition-4th-edition?format=PB&isbn=9781107683167>


Calendrical Calculations (Third or Fourth Edition) by Nachum Dershowitz and
Edward M. Reingold, Cambridge University Press, see
L<http://www.calendarists.com>
or L<https://www.cambridge.org/us/academic/subjects/computer-science/computing-general-interest/calendrical-calculations-ultimate-edition-4th-edition?format=PB&isbn=9781107683167>.


L<Claus Tøndering's FAQ|https://www.tondering.dk/claus/cal/persian.php>.


L<https://www.funaba.org/cc> (which seems no longer active)


L<https://en.wikipedia.org/wiki/Iranian_calendars>


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

Persian

Common

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

SYNOPSIS

DESCRIPTION

SOURCES

SEE ALSO

Perl 5 Software

Other Software

Books

Internet

AUTHOR

COPYRIGHT AND LICENSE

Date::Calendar::Persian v0.1.0

Authors

License

Dependencies

Test Dependencies

Provides

Documentation