summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/polyglossia/gloss-greek-new.ldf
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/latex/polyglossia/gloss-greek-new.ldf')
-rw-r--r--Master/texmf-dist/tex/latex/polyglossia/gloss-greek-new.ldf410
1 files changed, 0 insertions, 410 deletions
diff --git a/Master/texmf-dist/tex/latex/polyglossia/gloss-greek-new.ldf b/Master/texmf-dist/tex/latex/polyglossia/gloss-greek-new.ldf
deleted file mode 100644
index 1b8864cd214..00000000000
--- a/Master/texmf-dist/tex/latex/polyglossia/gloss-greek-new.ldf
+++ /dev/null
@@ -1,410 +0,0 @@
-\ProvidesFile{gloss-greek.ldf}[polyglossia: module for greek]
-\PolyglossiaSetup{greek}{
- script=Greek,
- scripttag=grek,
- frenchspacing=true,
- indentfirst=true,
- fontsetup=true,
- %TODO localalph={greek@alph,greek@Alph}
-}
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%% The code in this file was initially adapted from the antomega
-%% module for greek. Currently large parts of it derive from the
-%% package xgreek.sty (c) Apostolos Syropoulos
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% this file imported from xgreek fixes the \lccode and \uccode of Greek letters:
-\input{xgreek-fixes.def}
-
-%TODO: set these in \define@key instead:
-\ifx\l@greek\@undefined
- \ifx\l@polygreek\@undefined
- \xpg@nopatterns{Greek}%
- \adddialect\l@greek\l@nohyphenation
- \else
- \let\l@greek\l@polygreek
- \fi
-\fi
-\ifx\l@monogreek\@undefined
- \xpg@warning{No hyphenation patterns were loaded for Monotonic Greek\MessageBreak
- I will use the patterns loaded for \string\l@greek instead}
- \adddialect\l@monogreek\l@greek
-\fi
-\ifx\l@ancientgreek\@undefined
- \xpg@warning{No hyphenation patterns were loaded for Ancient Greek\MessageBreak
- I will use the patterns loaded for \string\l@greek instead}
- \adddialect\l@ancientgreek\l@greek
-\fi
-
-%set monotonic as default
-\def\greek@variant{\l@monogreek}% monotonic
-\def\captionsgreek{\monogreekcaptions}%
-\def\dategreek{\datemonogreek}%
-
-\def\tmp@mono{mono}
-\def\tmp@monotonic{monotonic}
-\def\tmp@poly{poly}
-\def\tmp@polytonic{polytonic}
-\def\tmp@ancient{ancient}
-\def\tmp@ancientgreek{ancientgreek}
-
-\define@key{greek}{variant}[monotonic]{%
- \def\@tmpa{#1}%
- \ifx\@tmpa\tmp@poly\def\@tmpa{polytonic}\fi
- \ifx\@tmpa\tmp@ancientgreek\def\@tmpa{ancient}\fi
- \ifx\@tmpa\tmp@polytonic%
- \def\greek@variant{\l@polygreek}%
- \def\captionsgreek{\polygreekcaptions}%
- \def\dategreek{\datepolygreek}%
- \xpg@info{Option: Polytonic Greek}%
- \else
- \ifx\@tmpa\tmp@ancient
- \def\greek@variant{\l@ancientgreek}%
- \def\captionsgreek{\ancientgreekcaptions}%
- \def\dategreek{\dateancientgreek}%
- \xpg@info{Option: Ancient Greek}%
- \else %monotonic
- \def\greek@variant{\l@monogreek}% monotonic
- \def\captionsgreek{\monogreekcaptions}%
- \def\dategreek{\datemonogreek}%
- \xpg@info{Option: Monotonic Greek}%
- \fi
- \fi}
-
-\def\greek@language{\language=\greek@variant}
-
-\newif\if@greek@numerals
-\define@key{greek}{numerals}[greek]{%
-\ifstrequal{#1}{arabic}{\@greek@numeralsfalse}{\@greek@numeralstrue}}
-
-\define@boolkey{greek}{attic}[true]{\xpg@warning{Greek option `attic' is no longer required.}}
-
-% This sets the defaults
-\setkeys{greek}{numerals}
-
-\def\monogreekcaptions{%
- \def\refname{Αναφορές}%
- \def\abstractname{Περίληψη}%
- \def\bibname{Βιβλιογραφία}%
- \def\prefacename{Πρόλογος}%
- \def\chaptername{Κεφάλαιο}%
- \def\appendixname{Παράρτημα}%
- \def\contentsname{Περιεχόμενα}%
- \def\listfigurename{Κατάλογος σχημάτων}%
- \def\listtablename{Κατάλογος πινάκων}%
- \def\indexname{Ευρετήριο}%
- \def\figurename{Σχήμα}%
- \def\tablename{Πίνακας}%
- \def\partname{Μέρος}%
- \def\pagename{Σελίδα}%
- \def\seename{βλέπε}%
- \def\alsoname{βλέπε επίσης}%
- \def\enclname{Συνημμένα}%
- \def\ccname{Κοινοποίηση}%
- \def\headtoname{Προς}%
- \def\proofname{Απόδειξη}%
- \def\glossaryname{Γλωσσάρι}}%
-
-\def\datemonogreek{%
- \def\today{\number\day\space%
- \greek@month%
- \space\number\year}%
- \def\greektoday{\greeknumber\day\space%
- \greek@month%
- \space\greeknumber\year}%
- \def\Greektoday{\Greeknumber\day\space%
- \greek@month%
- \space\Greeknumber\year}%
- \def\greek@month{\ifcase\month\or%
- Ιανουαρίου\or
- Φεβρουαρίου\or
- Μαρτίου\or
- Απριλίου\or
- Μαΐου\or
- Ιουνίου\or
- Ιουλίου\or
- Αυγούστου\or
- Σεπτεμβρίου\or
- Οκτωβρίου\or
- Νοεμβρίου\or
- Δεκεμβρίου\fi}}%
-
-\def\polygreekcaptions{%
- \def\refname{Ἀναφορές}%
- \def\abstractname{Περίληψη}%
- \def\bibname{Βιβλιογραφία}%
- \def\prefacename{Πρόλογος}%
- \def\chaptername{Κεφάλαιο}%
- \def\appendixname{Παράρτημα}%
- \def\contentsname{Περιεχόμενα}%
- \def\listfigurename{Κατάλογος σχημάτων}%
- \def\listtablename{Κατάλογος πινάκων}%
- \def\indexname{Εὑρετήριο}%
- \def\figurename{Σχῆμα}%
- \def\tablename{Πίνακας}%
- \def\partname{Μέρος}%
- \def\pagename{Σελίδα}%
- \def\seename{βλέπε}%
- \def\alsoname{βλέπε ἐπίσης}%
- \def\enclname{Συνημμένα}%
- \def\ccname{Κοινοποίηση}%
- \def\headtoname{Πρὸς}%
- \def\proofname{Ἀπόδειξη}}%
-
-\def\datepolygreek{%
- \def\today{\number\day\space%
- \greek@month%
- \space\number\year}%
- \def\greektoday{\greeknumber\day\space%
- \greek@month%
- \space\greeknumber\year}%
- \def\Greektoday{\Greeknumber\day\space%
- \greek@month%
- \space\Greeknumber\year}%
- \def\greek@month{\ifcase\month\or%
- Ἰανουαρίου\or
- Φεβρουαρίου\or
- Μαρτίου\or
- Ἀπριλίου\or
- Μαΐου\or
- Ἰουνίου\or
- Ἰουλίου\or
- Αὐγούστου\or
- Σεπτεμβρίου\or
- Ὀκτωβρίου\or
- Νοεμβρίου\or
- Δεκεμβρίου\fi}}%
-
-% this is copied verbatim from xgreek.sty:
-\def\ancientgreekcaptions{%
- \def\prefacename{Προοίμιον}%
- \def\refname{Αναφοραί}%
- \def\abstractname{Περίληψις}%
- \def\bibname{Βιβλιογραφία}%
- \def\chaptername{Κεφάλαιον}%
- \def\appendixname{Παράρτημα}%
- \def\contentsname{Περιεχόμενα}%
- \def\listfigurename{Κατάλογος σχημάτων}%
- \def\listtablename{Κατάλογος πινάκων}%
- \def\indexname{Εὑρετήριον}%
- \def\figurename{Σχήμα}%
- \def\tablename{Πίναξ}%
- \def\partname{Μέρος}%
- \def\enclname{Συνημμένως}%
- \def\ccname{Κοινοποίησις}%
- \def\headtoname{Πρὸς}%
- \def\pagename{Σελὶς}%
- \def\seename{ὃρα}%
- \def\alsoname{ὃρα ὡσαύτως}%
- \def\proofname{Ἀπόδειξις}%
- \def\glossaryname{Γλωσσάριον}%
- \def\refname{Ἀναφοραὶ}%
- \def\indexname{Εὑρετήριο}%
- \def\figurename{Σχῆμα}%
- \def\headtoname{Πρὸς}}%
-
-\def\dateancientgreek{%
- \def\today{\number\day\space%
- \greek@month%
- \space\number\year}%
- \def\greektoday{\greeknumber\day\space%
- \greek@month%
- \space\greeknumber\year}%
- \def\Greektoday{\Greeknumber\day\space%
- \greek@month%
- \space\Greeknumber\year}%
- \def\greek@month{\ifcase\month\or%
- Ἰανουαρίου\or
- Φεβρουαρίου\or
- Μαρτίου\or
- Ἀπριλίου\or
- Μαΐου\or
- Ἰουνίου\or
- Ἰουλίου\or
- Αὐγούστου\or
- Σεπτεμβρίου\or
- Ὀκτωβρίου\or
- Νοεμβρίου\or
- Δεκεμβρίου\fi}}
-
-% the code for alphabetic numbers and attic numerals
-% is not copied verbatim from xgreek.sty any more
-% it has been proposed by eg9 on issue 36 of the repository
-% see https://github.com/reutenauer/polyglossia/issues/36
-\newrobustcmd\anw@print{}
-\newrobustcmd\anw@false{%
-\renewrobustcmd\anw@print{}}
-\newrobustcmd\anw@true{%
-\renewrobustcmd\anw@print{ʹ}}
-\anw@true
-
-\protected\def\greeknumber#1{\expandafter\@greeknumber\expandafter{\number#1}}
-
-\def\@greeknumber#1{%
-\ifnum#1<\@ne\space\gr@ill@value{#1}%
-\else %
-\ifnum#1<10 \gr@num@i#1%
-\else %
-\ifnum#1<100 \gr@num@ii#1%
-\else %
-\ifnum#1<\@m \gr@num@iii#1%
-\else %
-\ifnum#1<\@M \gr@num@iv#1%
-\else %
-\ifnum#1<100000 \gr@num@v#1%
-\else %
-\ifnum#1<1000000 \gr@num@vi#1%
-\else %
-\space\gr@ill@value{#1}%
-\fi %
-\fi %
-\fi %
-\fi %
-\fi %
-\fi %
-\fi %
-}
-
-\protected\def\Greeknumber#1{\expandafter\@Greeknumber\expandafter{\number#1}}
-\def\@Greeknumber#1{%
-\ifnum#1<\@ne\space\gr@ill@value{#1}%
-\else %
-\ifnum#1<10 \gr@Num@i#1%
-\else %
-\ifnum#1<100 \gr@Num@ii#1%
-\else %
-\ifnum#1<\@m\gr@Num@iii#1%
-\else %
-\ifnum#1<\@M\gr@Num@iv#1%
-\else %
-\ifnum#1<100000 \gr@Num@v#1%
-\else %
-\ifnum#1<1000000 \gr@Num@vi#1%
-\else %
-\space\gr@ill@value{#1}%
-\fi %
-\fi %
-\fi %
-\fi %
-\fi %
-\fi %
-\fi %
-}
-
-\let\greeknumeral=\greeknumber
-\let\Greeknumeral=\Greeknumber
-
-\def\gr@num@i#1{%
-\ifcase#1 \or α\or β\or γ\or δ\or ε\or Ϛ\or ζ\or η\or θ\fi %
-\ifnum#1=\z@\else\anw@true\fi\anw@print}
-
-\def\gr@num@ii#1{%
-\ifcase#1 \or ι\or κ\or λ\or μ\or ν\or ξ\or ο\or π\or ϟ\fi %
-\ifnum#1=\z@\else\anw@true\fi\gr@num@i}
-
-\def\gr@num@iii#1{%
-\ifcase#1 \or ρ\or σ\or τ\or υ\or φ\or χ\or ψ\or ω\or ϡ\fi %
-\ifnum#1=\z@\anw@false\else\anw@true\fi\gr@num@ii}
-
-\def\gr@num@iv#1{%
-\ifnum#1=\z@\else ͵\fi %
-\ifcase#1 \or α\or β\or γ\or δ\or ε\or Ϛ\or ζ\or η\or θ\fi %
-\gr@num@iii}
-
-\def\gr@num@v#1{%
-\ifnum#1=\z@\else ͵\fi %
-\ifcase#1 \or ι\or κ\or λ\or μ\or ν\or ξ\or ο\or π\or ϟ\fi %
-\gr@num@iv}
-
-\def\gr@num@vi#1{%
-͵\ifcase#1 \or ρ\or σ\or τ\or υ\or φ\or χ\or ψ\or ω\or ϡ\fi %
-\gr@num@v}%
-
-\def\gr@Num@i#1{%
-\ifcase#1 \or Α\or Β\or Γ\or Δ\or Ε\or \MakeUppercase{Ϛ}\or Ζ\or Η\or θ\fi %
-\ifnum#1=\z@\else\anw@true\fi\anw@print}
-
-\def\gr@Num@ii#1{%
-\ifcase#1 \or Ι\or Κ\or Λ\or Μ\or Ν\or Ξ\or Ο\or Π\or \MakeUppercase{ϟ}\fi %
-\ifnum#1=\z@\else\anw@true\fi\gr@Num@i}
-
-\def\gr@Num@iii#1{%
-\ifcase#1 \or Ρ\or Σ\or Τ\or Υ\or Φ\or Χ\or Ψ\or Ω\or \MakeUppercase{ϡ}\fi %
-\ifnum#1=\z@\anw@false\else\anw@true\fi\gr@Num@ii}
-
-\def\gr@Num@iv#1{%
-\ifnum#1=\z@\else ͵\fi %
-\ifcase#1 \or Α\or Β\or Γ\or Δ\or Ε\or \MakeUppercase{Ϛ}\or Ζ\or Η\or θ\fi %
-\gr@Num@iii}
-
-\def\gr@Num@v#1{%
-\ifnum#1=\z@\else ͵\fi %
-\ifcase#1 \or Ι\or Κ\or Λ\or Μ\or Ν\or Ξ\or Ο\or Π\or \MakeUppercase{ϟ}\fi %
-\gr@Num@iv}
-
-\def\gr@Num@vi#1{%
-͵ \ifcase#1 \or Ρ\or Σ\or Τ\or Υ\or Φ\or Χ\or Ψ\or Ω\or \MakeUppercase{ϡ}\fi %
-\gr@Num@v}
-
-\def\gr@ill@value#1{\xpg@warning{Illegal value (#1) for Greek numeral}[$#1$]}
-
-%%%% Attic numerals (no longer optional)
-\newcount\@attic@num
-\DeclareRobustCommand*{\@@atticnum}[1]{%
- \@attic@num#1\relax
- \ifnum\@attic@num<\@ne%
- \space%
- \xpg@warning{Illegal value (\the\@attic@num) for acrophonic Attic numeral}%
- \else\ifnum\@attic@num>249999%
- \space%
- \xpg@warning{Illegal value (\the\@attic@num) for acrophonic Attic numeral}%
- \else
- \@whilenum\@attic@num>49999\do{%
- \char"10147\advance\@attic@num-50000}%
- \@whilenum\@attic@num>9999\do{%
- M\advance\@attic@num-\@M}%
- \ifnum\@attic@num>4999%
- \char"10146\advance\@attic@num-5000%
- \fi\relax
- \@whilenum\@attic@num>999\do{%
- Χ\advance\@attic@num-\@m}%
- \ifnum\@attic@num>499%
- \char"10145\advance\@attic@num-500%
- \fi\relax
- \@whilenum\@attic@num>99\do{%
- Η\advance\@attic@num-100}%
- \ifnum\@attic@num>49%
- \char"10144\advance\@attic@num-50%
- \fi\relax
- \@whilenum\@attic@num>9\do{%
- Δ\advance\@attic@num by-10}%
- \@whilenum\@attic@num>4\do{%
- Π\advance\@attic@num-5}%
- \ifcase\@attic@num\or Ι\or ΙΙ\or ΙΙΙ\or ΙΙΙΙ\fi%
- \fi\fi}
-\def\@atticnum#1{%
- \expandafter\@@atticnum\expandafter{\the#1}}
-\def\atticnumeral#1{%
- \@attic@num#1\relax
- \@atticnum{\@attic@num}}
-\let\atticnum=\atticnumeral
-
-\def\greek@numbers{%
- \let\latin@alph\@alph%
- \let\latin@Alph\@Alph%
- \if@greek@numerals
- \def\greek@alph##1{\protect\greeknumber{##1}}%
- \def\greek@Alph##1{\protect\Greeknumber{##1}}%
- \let\@alph\greek@alph%
- \let\@Alph\greek@Alph%
- \fi}
-
-\def\nogreek@numbers{%
- \let\@alph\latin@alph%
- \let\@Alph\latin@Alph%
- \let\greek@alph\@undefined%
- \let\greek@Alph\@undefined%
- }
-
-\endinput
-