summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/babel-contrib/greek/test-case-changing.tex
diff options
context:
space:
mode:
Diffstat (limited to 'macros/latex/contrib/babel-contrib/greek/test-case-changing.tex')
-rw-r--r--macros/latex/contrib/babel-contrib/greek/test-case-changing.tex61
1 files changed, 56 insertions, 5 deletions
diff --git a/macros/latex/contrib/babel-contrib/greek/test-case-changing.tex b/macros/latex/contrib/babel-contrib/greek/test-case-changing.tex
index e5cc0d15e5..50eaf650ea 100644
--- a/macros/latex/contrib/babel-contrib/greek/test-case-changing.tex
+++ b/macros/latex/contrib/babel-contrib/greek/test-case-changing.tex
@@ -24,7 +24,8 @@
%
\usepackage[greek,english]{babel} % babel-greek
% \usepackage[greek,english,provide=*]{babel} % Babel's Greek "ini"
-\languageattribute{greek}{polutoniko} % "modern" polytonic Greek
+% \languageattribute{greek}{polutoniko} % "modern" polytonic Greek
+\languageattribute{greek}{ancient}
\usepackage[unicode,colorlinks,linkcolor=blue]{hyperref}
@@ -112,7 +113,8 @@ MakeLowercase:
The lowercase of \langGreek{Σ} is the «auto-sigma»
(\verb|\textautosigma|): \langGreek{ΣΣ $\mapsto$ \MakeLowercase{ΣΣ}}.
Add a ZWNJ or use the \verb|\noboundary| macro to prevent conversion to
-final sigma: \langGreek{\MakeLowercase{ΣΣ‌}}.
+final sigma: \langGreek{\MakeLowercase{ΣΣ‌}} (works only with "old"
+(pre-2022) \verb|\MakeLowercase|).
\subsection{Greek extended}
@@ -314,7 +316,7 @@ MakeLowercase:
\textpi{} \textrho{} \textfinalsigma{} \textsigma{} \texttau{}
\textupsilon{} \textphi{} \textchi{} \textpsi{} \textomega{}
\accdialytika\textiota{} \accdialytika\textupsilon{}
- \acctonos\textomicron{} \acctonos\textupsilon{} \acctonos\textomega{} \\
+ \acctonos\textomicron{} \acctonos\textupsilon{} \acctonos\textomega{} ␣\\
ϐ ϑ ␣ ␣ ␣ ϕ ϖ ␣ Ϙ ϙ Ϛ ϛ Ϝ ϝ Ϟ ϟ \\
\textbetasymbol{} \textthetasymbol{} ␣ ␣ ␣ \textphisymbol{}
@@ -343,6 +345,40 @@ MakeLowercase:
\MakeLowercase{\GreekAndCoptic}
\end{quote}
+\subsubsection{symbol variants}
+
+\newcommand{\symbolvariants}{
+ \textbeta \textvarbeta \textbetasymbol ϐ
+ \textepsilon \textvarepsilon \textepsilonsymbol ϵ
+ \texttheta \textvartheta \textthetasymbol ϑ
+ \textTheta \textvarTheta \textThetasymbol ϴ
+ \textkappa \textvarkappa \textkappasymbol ϰ
+ \textpi \textvarpi \textpisymbol ϖ
+ \textrho \textvarrho \textrhosymbol ϱ
+ \textphi \textvarphi \textphisymbol ϕ
+}
+
+No case change (letter, ``var''-letter, letter-``symbol'', literal symbol)
+\begin{quote}
+ \selectlanguage{greek}
+ \symbolvariants
+\end{quote}
+%
+MakeUppercase selects the matching capital lette
+\begin{quote}
+ \selectlanguage{greek}
+ \MakeUppercase{\symbolvariants}
+\end{quote}
+%
+MakeLowercase select the lowercase letter (not the symbol)
+\begin{quote}
+ \selectlanguage{greek}
+ \MakeLowercase{\textBeta Β \textEpsilon Ε
+ \textTheta Θ \textThetasymbol \textvarTheta ϴ
+ \textKappa Κ \textPi Π \textRho Ρ \textPhi Φ}
+\end{quote}
+
+
\subsection{Greek extended}
@@ -943,7 +979,7 @@ Every second line is input as Latin transliteration:
\renewcommand{\GreekAndCoptic}{%
ͺ ; ␣ ␣ ΄ ΅ Ά · Έ Ή Ί ␣ Ό ␣ Ύ Ώ \\
- \lgrfont{ | ? \: \: ' "' 'A ; 'E 'H 'I \:'O \:'U 'W} \\
+ \lgrfont{ | ? \: \: ' "' 'A ; 'E 'H 'I \: 'O \: 'U 'W} \\
ΐ Α Β Γ Δ Ε Ζ Η Θ Ι Κ Λ Μ Ν Ξ Ο \\
\lgrfont{'"i A B G D E Z H J I K L M N X O} \\
Π Ρ ␣ Σ Τ Υ Φ Χ Ψ Ω Ϊ Ϋ ά έ ή ί \\
@@ -1025,7 +1061,7 @@ variant is \emph\GreekLanguageVariant.
ῠ ῡ ῢ ΰ ␣ ␣ ῤ ῥ ῦ ῧ Ὺ Ύ Ῥ ῭ ΅ ` \\
\lgrfont{\u{u} \=u `"u '"u \: \: >r <r ~u ~"u `U 'U <R `" '" ` } \\
␣ ␣ ῲ ῳ ῴ ␣ ῶ ῷ Ὸ Ό Ὼ Ώ ῼ ´ ῾ \\
- \lgrfont{ \: \: `w| w| 'w| \: ~w ~w| `O 'O `W 'W W| ' < }
+ \lgrfont{\: \: `w| w| 'w| \: ~w ~w| `O 'O `W 'W W| ' < }
}
\begin{quote}
@@ -1055,6 +1091,21 @@ dialytika \verb|"~ "` "'| appears as apostrophe, as a single \verb|"| stands
for an apostrophe in the LGR transliteration if followed by a space or empty
character.
+Side-effect of mapping `,',~, <, and > to the "empty" char for accent
+dropping: the characters vanish if used stand-alone
+(also with the ``old'' MakeUppercase):
+\begin{quote}
+ \selectlanguage{greek}
+ ` ' ~ < > → \MakeUppercase{` ' ~ < >}
+ ``x'' <<y>> → \MakeUppercase{``x'' <<y>>}
+\end{quote}
+
+Workaround: use literal typographical quote characters:
+\begin{quote}
+ \selectlanguage{greek}
+ ‘x’ «y» → \MakeUppercase{‘x’ «y»}
+\end{quote}
+
MakeLowercase:
\begin{quote}