diff options
Diffstat (limited to 'fonts/greek/greektex/greektex.sty')
-rw-r--r-- | fonts/greek/greektex/greektex.sty | 1074 |
1 files changed, 1074 insertions, 0 deletions
diff --git a/fonts/greek/greektex/greektex.sty b/fonts/greek/greektex/greektex.sty new file mode 100644 index 0000000000..ff326150d1 --- /dev/null +++ b/fonts/greek/greektex/greektex.sty @@ -0,0 +1,1074 @@ +% This is file `greektex.sty', October 2004
+% adapted and updated from the stylefile greek2e.sty
+% by Yiannis Moschovakis and Chrisovalantis Sfirakis
+%
+% A compilation and adaptation to LaTeX2e
+% of the greektex files, by Yiannis Moschovakis and George Spiliotis
+% using the ywcl series of Levy fonts, which is exactly
+% the same as the cl series, recoded in the Windows encoding
+% rather than the old IBM 437
+%
+% This file contains all of greektex except for hyphenation,
+% so that if the .tfm and .pk files for the ywcl fonts are available,
+% then \usepackage{greektex} makes possible the typesetting of
+% greeklish text by any LaTeX2e system, without hyphenation.
+%
+% Hyphenation is fully contained in the accompanying file
+% gehyphw.gr. For LaTeX to use it, initex must be run in
+% an environment which looks for it and can find it.
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesPackage{greektex}
+ [2004/10/24 v1.0 greektex standard setup file]
+
+%%%%%%%%%%%%%%%%%%%%%%%%% % lccodes and uccodes reassigned
+% Originally assigned in gehyphw.gr, because the lccodes are
+% needed for the hyphenation tables.
+
+% lc vowels have lccode 1
+
+\lccode`á=1
+\lccode`Ü=1
+\lccode`^^a1=1 % .á
+\lccode`^^a5=1 % á`
+\lccode`^^a6=1 % á=
+\lccode`^^a7=1 % >á
+\lccode`^^a8=1 % <á
+\lccode`^^a9=1 % >á'
+\lccode`^^aa=1 % <á'
+\lccode`å=1
+\lccode`Ý=1
+\lccode`^^ab=1 % å`
+\lccode`^^80=1 % >å
+\lccode`^^81=1 % <å
+\lccode`^^82=1 % >å'
+\lccode`^^83=1 % <å'
+\lccode`ç=1
+\lccode`Þ=1
+\lccode`^^bb=1 % .ç
+\lccode`^^84=1 % ç`
+\lccode`^^85=1 % ç=
+\lccode`^^86=1 % >ç
+\lccode`^^87=1 % <ç
+\lccode`^^88=1 % >ç'
+\lccode`^^a0=1 % <ç'
+\lccode`é=1
+\lccode`ß=1
+\lccode`ú=1
+\lccode`^^c0=1 % é with diairesis and oxeia
+\lccode`^^89=1 % é`
+\lccode`^^8a=1 % é=
+\lccode`^^8b=1 % >é
+\lccode`^^8c=1 % <é
+\lccode`^^8d=1 % >é'
+\lccode`^^8e=1 % <é'
+\lccode`^^b6=1 % >=é
+\lccode`^^bd=1 % <=é
+\lccode`ï=1
+\lccode`ü=1
+\lccode`^^8f=1 % ï`
+\lccode`^^90=1 % >ï
+\lccode`^^91=1 % <ï
+\lccode`^^92=1 % >ï'
+\lccode`^^93=1 % <ï'
+\lccode`õ=1
+\lccode`û=1
+\lccode`ý=1
+\lccode`^^e0=1 % õ with diaer and oxeia
+\lccode`^^94=1 % õ`
+\lccode`^^95=1 % õ=
+\lccode`^^96=1 % >õ
+\lccode`^^97=1 % <õ
+\lccode`^^98=1 % >õ'
+\lccode`^^99=1 % <õ'
+\lccode`ù=1
+\lccode`þ=1
+\lccode`^^ff=1 % .ù
+\lccode`^^9a=1 % ù`
+\lccode`^^9b=1 % ù=
+\lccode`^^9c=1 % >ù
+\lccode`^^9d=1 % <ù
+\lccode`^^9e=1 % >ù'
+\lccode`^^9f=1 % <ù'
+
+% Consonants and capitals
+% Capital vowels get 1 to ensure hyphenation of all-capital text
+
+\lccode`â=`â
+\lccode`ã=`ã
+\lccode`ä=`ä
+\lccode`æ=`æ
+\lccode`è=`è
+\lccode`ê=`ê
+\lccode`ë=`ë
+\lccode`ì=`ì
+\lccode`í=`í
+\lccode`î=`î
+\lccode`ð=`ð
+\lccode`ñ=`ñ
+\lccode`ó=`ó
+\lccode`ò=`ò
+\lccode`ô=`ô
+\lccode`ö=`ö
+\lccode`÷=`÷
+\lccode`ø=`ø
+\lccode`Á=1
+\lccode`^^a2=1 % 'Á
+\lccode`Â=`â
+\lccode`Ã=`ã
+\lccode`Ä=`ä
+\lccode`Å=1
+\lccode`^^b8=1 % 'E
+\lccode`Æ=`æ
+\lccode`Ç=1
+\lccode`^^b9=1 % 'Ç
+\lccode`È=`è
+\lccode`É=1
+\lccode`^^ba=1 % 'É
+\lccode`^^da=1 % "É
+\lccode`Ê=`ê
+\lccode`Ë=`ë
+\lccode`Ì=`ì
+\lccode`Í=`í
+\lccode`Î=`î
+\lccode`Ï=1
+\lccode`^^bc=1 % 'Ï
+\lccode`Ð=`ð
+\lccode`Ñ=`ñ
+\lccode`Ó=`ó
+\lccode`Ô=`ô
+\lccode`Õ=`õ
+\lccode`^^be=1 % 'Õ
+\lccode`^^db=1 % "Õ
+\lccode`Ö=`ö
+\lccode`×=`÷
+\lccode`Ø=`ø
+\lccode`Ù=1
+\lccode`^^bf=1 % 'Ù
+%%===================================================
+
+% uccodes forget the accents and iota subscripts
+% they preserve the diaeresis
+% this cannot handle ligatures
+% including the initial, accented cap ligatures
+% but it makes \uppercase work when accented, initial capitals
+% are entered in hexagesimal notation
+% 'Á=^^a2, 'Å=^^b8, 'Ç=^^b9, 'É=^^ba, 'Ï=^^bc, 'Õ=^^be, 'Ù=^^bf
+% or using the appropriate extended keyboard program
+
+\uccode`á=`Á
+\uccode`Ü=`Á
+\uccode`^^a1=`Á % á|
+\uccode`^^a5=`Á % á`
+\uccode`^^a6=`Á % á=
+\uccode`^^a7=`Á % >á
+\uccode`^^a8=`Á % <á
+\uccode`^^a9=`Á % >á'
+\uccode`^^aa=`Á % <á'
+\uccode`â=`Â
+\uccode`ã=`Ã
+\uccode`ä=`Ä
+\uccode`å=`Å
+\uccode`Ý=`Å
+\uccode`^^ab=`Å % å`
+\uccode`^^80=`Å % >å
+\uccode`^^81=`Å % <å
+\uccode`^^82=`Å % >å'
+\uccode`^^83=`Å % <å'
+\uccode`æ=`Æ
+\uccode`ç=`Ç
+\uccode`Þ=`Ç
+\uccode`^^bb=`Ç % ±
+\uccode`^^84=`Ç % ç`
+\uccode`^^85=`Ç % ç=
+\uccode`^^86=`Ç % >ç
+\uccode`^^87=`Ç % <ç
+\uccode`^^88=`Ç % >ç'
+\uccode`^^a0=`Ç % <ç'
+\uccode`è=`È
+\uccode`é=`É
+\uccode`ß=`É
+\uccode`ú=`^^da
+\uccode`^^c0=`^^da % "'é
+\uccode`^^89=`É % é`
+\uccode`^^8a=`É % é=
+\uccode`^^8b=`É % >é
+\uccode`^^8c=`É % <é
+\uccode`^^8d=`É % >é'
+\uccode`^^8e=`É % <é'
+\uccode`ê=`Ê
+\uccode`ë=`Ë
+\uccode`ì=`Ì
+\uccode`í=`Í
+\uccode`î=`Î
+\uccode`ï=`Ï
+\uccode`ü=`Ï
+\uccode`^^8f=`Ï % ï`
+\uccode`^^90=`Ï % >ï
+\uccode`^^91=`Ï % <ï
+\uccode`^^92=`Ï % >ï'
+\uccode`^^93=`Ï % <ï'
+\uccode`ð=`Ð
+\uccode`ñ=`Ñ
+\uccode`ó=`Ó
+\uccode`ò=`Ó
+\uccode`ô=`Ô
+\uccode`õ=`Õ
+\uccode`ý=`Õ
+\uccode`û=`^^db
+\uccode`^^e0=`^^db % "'õ
+\uccode`^^94=`Õ % õ`
+\uccode`^^95=`Õ % õ=
+\uccode`^^96=`Õ % >õ
+\uccode`^^97=`Õ % <õ
+\uccode`^^98=`Õ % >õ'
+\uccode`^^99=`Õ % <õ'
+\uccode`ö=`Ö
+\uccode`÷=`×
+\uccode`ø=`Ø
+\uccode`ù=`Ù
+\uccode`þ=`Ù
+\uccode`^^ff=`Ù % .ù
+\uccode`^^9a=`Ù % ù`
+\uccode`^^9b=`Ù % ù=
+\uccode`^^9c=`Ù % >ù
+\uccode`^^9d=`Ù % <ù
+\uccode`^^9e=`Ù % >ù'
+\uccode`Á=`Á
+\uccode`^^a2=`^^a2 % 'A
+\uccode`Â=`Â
+\uccode`Ã=`Ã
+\uccode`Ä=`Ä
+\uccode`Å=`Å
+\uccode`^^b8=`^^b8 % 'E
+\uccode`Æ=`Æ
+\uccode`Ç=`Ç
+\uccode`^^b9=`^^b9 % 'H
+\uccode`È=`È
+\uccode`É=`É
+\uccode`^^ba=`^^ba % 'I
+\uccode`^^da=`^^da % "I
+\uccode`Ê=`Ê
+\uccode`Ë=`Ë
+\uccode`Ì=`Ì
+\uccode`Í=`Í
+\uccode`Î=`Î
+\uccode`Ï=`Ï
+\uccode`^^bc=`^^bc % 'O
+\uccode`Ð=`Ð
+\uccode`Ñ=`Ñ
+\uccode`Ó=`Ó
+\uccode`Ô=`Ô
+\uccode`Õ=`Õ
+\uccode`^^be=`^^be % 'Y
+\uccode`^^db=`^^db % "Y
+\uccode`Ö=`Ö
+\uccode`×=`×
+\uccode`Ø=`Ø
+\uccode`Ù=`Ù
+\uccode `^^bf=`^^bf % 'Ù
+% =============================================================
+
+% From geletcatw.gr % make Greek letters letters
+
+% catcodes =========================================
+
+% The vowels
+
+\catcode`á=11
+\catcode`Ü=11
+\catcode`^^a1=11 % .á
+\catcode`^^a5=11 % á`
+\catcode`^^a6=11 % á=
+\catcode`^^a7=11 % >á
+\catcode`^^a8=11 % <á
+\catcode`^^a9=11 % >á'
+\catcode`^^aa=11 % <á'
+\catcode`å=11
+\catcode`Ý=11
+\catcode`^^ab=11 % å`
+\catcode`^^80=11 % >å
+\catcode`^^81=11 % <å
+\catcode`^^82=11 % >å'
+\catcode`^^83=11 % <å'
+\catcode`ç=11
+\catcode`Þ=11
+\catcode`^^bb=11 % .ç
+\catcode`^^84=11 % ç`
+\catcode`^^85=11 % ç=
+\catcode`^^86=11 % >ç
+\catcode`^^87=11 % <ç
+\catcode`^^88=11 % >ç'
+\catcode`^^a0=11 % <ç'
+\catcode`é=11
+\catcode`ß=11
+\catcode`ú=11
+\catcode`^^c0=11 % é with diairesis and oxeia
+\catcode`^^89=11 % é`
+\catcode`^^8a=11 % é=
+\catcode`^^8b=11 % >é
+\catcode`^^8c=11 % <é
+\catcode`^^8d=11 % >é'
+\catcode`^^8e=11 % <é'
+\catcode`^^b6=11 % >=é
+\catcode`^^bd=11 % <=é
+\catcode`ï=11
+\catcode`ü=11
+\catcode`^^8f=11 % ï`
+\catcode`^^90=11 % >ï
+\catcode`^^91=11 % <ï
+\catcode`^^92=11 % >ï'
+\catcode`^^93=11 % <ï'
+\catcode`õ=11
+\catcode`û=11
+\catcode`ý=11
+\catcode`^^e0=11 % õ with diaer and oxeia
+\catcode`^^94=11 % õ`
+\catcode`^^95=11 % õ=
+\catcode`^^96=11 % >õ
+\catcode`^^97=11 % <õ
+\catcode`^^98=11 % >õ'
+\catcode`^^99=11 % <õ'
+\catcode`ù=11
+\catcode`þ=11
+\catcode`^^ff=11 % .ù
+\catcode`^^9a=11 % ù`
+\catcode`^^9b=11 % ù=
+\catcode`^^9c=11 % >ù
+\catcode`^^9d=11 % <ù
+\catcode`^^9e=11 % >ù'
+\catcode`^^9f=11 % <ù'
+\catcode`^^b7=12 % anw telia
+
+% Consonants and capitals
+
+\catcode`â=11
+\catcode`ã=11
+\catcode`ä=11
+\catcode`æ=11
+\catcode`è=11
+\catcode`ê=11
+\catcode`ë=11
+\catcode`ì=11
+\catcode`í=11
+\catcode`î=11
+\catcode`ð=11
+\catcode`ñ=11
+\catcode`ó=11
+\catcode`ò=11
+\catcode`ô=11
+\catcode`ö=11
+\catcode`÷=11
+\catcode`ø=11
+\catcode`Á=11
+\catcode`^^a2=11 % 'Á
+\catcode`Â=11
+\catcode`Ã=11
+\catcode`Ä=11
+\catcode`Å=11
+\catcode`^^b8=11
+\catcode`Æ=11
+\catcode`Ç=11
+\catcode`^^b9=11 % 'Ç
+\catcode`È=11
+\catcode`É=11
+\catcode`^^ba=11 % 'É
+\catcode`^^da=11 % "É
+\catcode`Ê=11
+\catcode`Ë=11
+\catcode`Ì=11
+\catcode`Í=11
+\catcode`Î=11
+\catcode`Ï=11
+\catcode`^^bc=11 % 'Ï
+\catcode`Ð=11
+\catcode`Ñ=11
+\catcode`Ó=11
+\catcode`Ô=11
+\catcode`Õ=11
+\catcode`^^be=11 % 'Õ
+\catcode`^^db=11 % "Õ
+\catcode`Ö=11
+\catcode`×=11
+\catcode`Ø=11
+\catcode`Ù=11
+\catcode`^^bf=11 % 'Ù
+
+% this leaves the accents of category "other"
+
+% only the unaccented letters get mathcodes
+% ynm and the anv teleia, added
+
+%\mathcode`^^b7="71F5 % anv teleia,
+\mathcode`^^b7="71B7 % anv teleia,
+\mathcode`á="7198
+\mathcode`â="7199
+\mathcode`ã="719A
+\mathcode`ä="719B
+\mathcode`å="719C
+\mathcode`æ="719D
+\mathcode`ç="719E
+\mathcode`è="719F
+\mathcode`é="71A0
+\mathcode`ê="71A1
+\mathcode`ë="71A2
+\mathcode`ì="71A3
+\mathcode`í="71A4
+\mathcode`î="71A5
+\mathcode`ï="71A6
+\mathcode`ð="71A7
+\mathcode`ñ="71A8
+\mathcode`ó="71A9
+\mathcode`ò="71AA
+\mathcode`ô="71AB
+\mathcode`õ="71AC
+\mathcode`ö="71AD
+\mathcode`÷="71AE
+\mathcode`ø="71AF
+\mathcode`ù="71E0
+\mathcode`Á="7180
+\mathcode`Â="7181
+\mathcode`Ã="7182
+\mathcode`Ä="7183
+\mathcode`Å="7184
+\mathcode`Æ="7185
+\mathcode`Ç="7186
+\mathcode`È="7187
+\mathcode`É="7188
+\mathcode`Ê="7189
+\mathcode`Ë="718A
+\mathcode`Ì="718B
+\mathcode`Í="718C
+\mathcode`Î="718D
+\mathcode`Ï="718E
+\mathcode`Ð="718F
+\mathcode`Ñ="7190
+\mathcode`Ó="7191
+\mathcode`Ô="7192
+\mathcode`Õ="7193
+\mathcode`Ö="7194
+\mathcode`×="7195
+\mathcode`Ø="7196
+\mathcode`Ù="7197
+
+% sfcodes ========================================================
+
+\sfcode`á=1000
+\sfcode`Ü=1000
+\sfcode`^^a1=1000 % .á
+\sfcode`^^a5=1000 % á`
+\sfcode`^^a6=1000 % á=
+\sfcode`^^a7=1000 % >á
+\sfcode`^^a8=1000 % <á
+\sfcode`^^a9=1000 % >á'
+\sfcode`^^aa=1000 % <á'
+\sfcode`å=1000
+\sfcode`Ý=1000
+\sfcode`^^ab=1000 % å`
+\sfcode`^^80=1000 % >å
+\sfcode`^^81=1000 % <å
+\sfcode`^^82=1000 % >å'
+\sfcode`^^83=1000 % <å'
+\sfcode`ç=1000
+\sfcode`Þ=1000
+\sfcode`^^bb=1000 % .ç
+\sfcode`^^84=1000 % ç`
+\sfcode`^^85=1000 % ç=
+\sfcode`^^86=1000 % >ç
+\sfcode`^^87=1000 % <ç
+\sfcode`^^88=1000 % >ç'
+\sfcode`^^a0=1000 % <ç'
+\sfcode`é=1000
+\sfcode`ß=1000
+\sfcode`ú=1000
+\sfcode`^^c0=1000 % é with diairesis and oxeia
+\sfcode`^^89=1000 % é`
+\sfcode`^^8a=1000 % é=
+\sfcode`^^8b=1000 % >é
+\sfcode`^^8c=1000 % <é
+\sfcode`^^8d=1000 % >é'
+\sfcode`^^8e=1000 % <é'
+\sfcode`^^b6=1000 % >=é
+\sfcode`^^bd=1000 % <=é
+\sfcode`ï=1000
+\sfcode`ü=1000
+\sfcode`^^8f=1000 % ï`
+\sfcode`^^90=1000 % >ï
+\sfcode`^^91=1000 % <ï
+\sfcode`^^92=1000 % >ï'
+\sfcode`^^93=1000 % <ï'
+\sfcode`õ=1000
+\sfcode`û=1000
+\sfcode`ý=1000
+\sfcode`^^e0=1000 % õ with diaer and oxeia
+\sfcode`^^94=1000 % õ`
+\sfcode`^^95=1000 % õ=
+\sfcode`^^96=1000 % >õ
+\sfcode`^^97=1000 % <õ
+\sfcode`^^98=1000 % >õ'
+\sfcode`^^99=1000 % <õ'
+\sfcode`ù=1000
+\sfcode`þ=1000
+\sfcode`^^ff=1000 % .ù
+\sfcode`^^9a=1000 % ù`
+\sfcode`^^9b=1000 % ù=
+\sfcode`^^9c=1000 % >ù
+\sfcode`^^9d=1000 % <ù
+\sfcode`^^9e=1000 % >ù'
+\sfcode`^^9f=1000 % <ù'
+
+\sfcode`^^b7=1500 % ano teleia
+
+\sfcode`Á=999
+\sfcode`^^a2=999 % 'Á
+\sfcode`Â=999
+\sfcode`Ã=999
+\sfcode`Ä=999
+\sfcode`Å=999
+\sfcode`^^b8=999 % 'E
+\sfcode`Æ=999
+\sfcode`Ç=999
+\sfcode`^^b9=999 % 'Ç
+\sfcode`È=999
+\sfcode`É=999
+\sfcode`^^ba=999 % 'É
+\sfcode`^^da=999 % "É
+\sfcode`Ê=999
+\sfcode`Ë=999
+\sfcode`Ì=999
+\sfcode`Í=999
+\sfcode`Î=999
+\sfcode`Ï=999
+\sfcode`^^bc=999 % 'Ï
+\sfcode`Ð=999
+\sfcode`Ñ=999
+\sfcode`Ó=999
+\sfcode`Ô=999
+\sfcode`Õ=999
+\sfcode`^^be=999 % 'Õ
+\sfcode`^^db=999 % "Õ
+\sfcode`Ö=999
+\sfcode`×=999
+\sfcode`Ø=999
+\sfcode`Ù=999
+
+% ===========================================================
+
+\def\áô{^^b7 } % anw teleia
+\def\óçìåñá{\number\day~\ifcase\month\or%
+Éáíïõáñßïõ\or Öåâñïõáñßïõ\or Ìáñôßïõ\or Áðñéëßïõ\or Ìáßïõ\or Éïõíßïõ\or%
+Éïõëßïõ\or Áõãïýóôïõ\or Óåðôåìâñßïõ\or Ïêôùâñßïõ\or Íïåìâñßïõ\or%
+Äåêåìâñßïõ\fi,~\number\year}
+
+% ywclabbr.gr
+% the windows-fonts version of the 1994 geabbr
+% September 2001, Yiannis N. Moschovakis
+%
+% macros for classical Greek under ygreektex
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+
+%%%%%%%%%%%%%%%%%%% Constants
+
+% Code the accent constants with category 11
+
+\def\@êâ{\char18} % we use the Knuth grave for the âáñåßá
+\def\@êð{^^ad} % ðåñéóðùìÝíç
+\def\@êø{^^ae} % øéëÞ
+\def\@êä{^^af} % äáóåßá
+\def\@êøï{^^b0} % øéëÞ-ïîåßá
+\def\@êäï{^^b1} % äáóåßá-ïîåßá
+\def\@êøâ{^^b2} % øéëÞ-âáñåßá
+\def\@êäâ{^^b3} % äáóåßá-âáñåßá
+\def\@êøð{^^b4} % øéëÞ-ðåñéóðùìÝíç
+\def\@êäð{^^b5} % äáóåßá-ðåñéóðùìÝíç
+\def\@êõð{^^d2} % õðïôåßíïõóá
+
+\def\áé{^^a1} % the three vowels with the iota subscript
+\def\çé{^^bb}
+\def\ùé{^^ff}
+\def\õðïôåéíïõóá{^^d2}
+
+% Accents, aspiration marks and the greek parens get category other.
+\catcode`^^ac=12%
+\catcode`^^ad=12%
+\catcode`^^ae=12%
+\catcode`^^af=12%
+\catcode`^^b0=12%
+\catcode`^^b1=12%
+\catcode`^^b2=12%
+\catcode`^^b3=12%
+\catcode`^^b4=12%
+\catcode`^^b5=12%
+\catcode`^^b7=12% % anv teleia
+\catcode`^^a3=12% % <<
+\catcode`^^a4=12 % >>
+
+
+%%%%%%%%%%%%%%%%%% The accenting tables
+
+\def\ø#1{%
+\if#1á^^a7%
+\else\if#1Ü^^a9%
+\else\if#1^^a1\accent174 ^^a1% % |á
+\else\if#1^^b6\accent176 ^^a1% % |'á
+\else\if#1å^^80%
+\else\if#1Ý^^82%
+\else\if#1ç^^86%
+\else\if#1Þ^^88%
+\else\if#1^^a1\accent174 ^^bb% % |ç
+\else\if#1^^aa\accent176 ^^bb% % |'ç
+\else\if#1é^^8b%
+\else\if#1ß^^8d%
+\else\if#1ï^^90%
+\else\if#1ü^^92%
+\else\if#1õ^^96%
+\else\if#1ý^^98%
+\else\if#1ù^^9c%
+\else\if#1þ^^9e%
+\else\if#1^^ff\accent174 ^^ff% % |ù
+\else\if#1^^fe\accent176 ^^f3% % |'ù
+\else\@êø#1%
+\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi%
+\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}
+
+\def\øï#1{%
+\if#1á^^a9%
+\else\if#1^^a1\accent176 ^^a1% % |á
+\else\if#1å^^82%
+\else\if#1ç^^88%
+\else\if#1^^bb\accent176 ^^bb% % |ç
+\else\if#1é^^8d%
+\else\if#1ï^^92%
+\else\if#1õ^^98%
+\else\if#1ù^^9e%
+\else\if#1^^ff\accent176 ^^ff% % |ù
+\else\@êøï#1%
+\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}
+
+
+\def\øâ#1{%
+\if#1á\accent178 á%
+\else\if#1^^a1\accent178 ^^a1% % |á
+\else\if#1å\accent178 å%
+\else\if#1ç\accent178 ç%
+\else\if#1^^bb\accent178 ^^bb% % |ç
+\else\if#1é\accent178 é%
+\else\if#1ï\accent178 ï%
+\else\if#1õ\accent178 õ%
+\else\if#1ù\accent178 ù%
+\else\if#1^^ff\accent178 ^^ff% % |ù
+\else\@êøâ#1%
+\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}
+
+\def\øð#1{%
+\if#1á\accent180 á%
+\else\if#1^^a1\accent180 ^^a1% % |á
+\else\if#1ç\accent180 ç%
+\else\if#1^^b1\accent180 ^^b1% % |ç
+\else\if#1é\accent180 é%
+\else\if#1õ\accent180 õ%
+\else\if#1ù\accent180 ù%
+\else\if#1^^ff\accent180 ^^ff% % |ù
+\else\@êøð#1%
+\fi\fi\fi\fi\fi\fi\fi\fi}
+
+\def\ä#1{%
+\if#1á^^a8%
+\else\if#1Ü^^aa%
+\else\if#1^^a1\accent175 ^^a1% % |á
+\else\if#1^^a5\accent177 ^^a5% % |'á
+\else\if#1å^^81%
+\else\if#1Ý^^83%
+\else\if#1ç^^87%
+\else\if#1Þ^^a0%
+\else\if#1^^bb\accent175 ^^bb% % |ç
+\else\if#1^^ce\accent177 ^^e7% % |'ç
+\else\if#1é^^8c%
+\else\if#1ß^^8e%
+\else\if#1ï^^91%
+\else\if#1ü^^93%
+\else\if#1õ^^97%
+\else\if#1ý^^99%
+\else\if#1ù^^9d%
+\else\if#1þ^^9f%
+\else\if#1^^ff\accent175 ^^ff% % |ù
+\else\if#1^^da\accent177 ^^ff% % |'ù
+\else\if#1ñ\accent175 ñ%
+\else\@êä#1%
+\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi%
+\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}
+
+\def\äï#1{%
+\if#1á^^aa%
+\else\if#1^^a1\accent177 ^^a1% % |á
+\else\if#1å^^83%
+\else\if#1ç^^a0%
+\else\if#1^^bb\accent177 ^^bb% % |ç
+\else\if#1é^^8e%
+\else\if#1ï^^93%
+\else\if#1õ^^99%
+\else\if#1ù^^9f%
+\else\if#1^^ff\accent177 ^^ff% % |ù
+\else\@êäï#1%
+\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}
+
+\def\äâ#1{%
+\if#1á\accent179 á%
+\else\if#1^^a1\accent179 ^^a1% % |á
+\else\if#1å\accent179 å%
+\else\if#1ç\accent179 ç%
+\else\if#1^^bb\accent179 ^^bb% % |ç
+\else\if#1é\accent179 é%
+\else\if#1ï\accent179 ï%
+\else\if#1õ\accent179 õ%
+\else\if#1ù\accent179 ù%
+\else\if#1^^ff\accent179 ^^ff% % |ù
+\else\@êäâ#1%
+\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}
+
+\def\äð#1{%
+\if#1á\accent181 á%
+\else\if#1^^a1\accent181 ^^a1% % |á
+\else\if#1ç\accent181 ç%
+\else\if#1^^bb\accent181 ^^bb% % |ç
+\else\if#1é\char180%
+\else\if#1õ\accent181 õ%
+\else\if#1ù\accent181 ù%
+\else\if#1^^b2\accent181 ^^b2% % |ù
+\else\@êäð#1%
+\fi\fi\fi\fi\fi\fi\fi\fi}
+
+\def\â#1{%
+\if#1á^^a5%
+\else\if#1^^a1\accent18 ^^a1% % |á
+\else\if#1å^^ab%
+\else\if#1ç^^84%
+\else\if#1^^bb\accent18 ^^bb% % |ç
+\else\if#1é^^89%
+\else\if#1^^fa\accent172 é% % "é
+\else\if#1ï^^8f%
+\else\if#1õ^^94%
+\else\if#1^^fb\accent172 õ% % "õ
+\else\if#1ù^^9a%
+\else\if#1^^ff\accent18 ^^ff% % |ù
+\else\@êâ#1%
+\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi%
+\fi\fi}
+
+\def\ð#1{%
+\if#1á^^a6%
+\else\if#1^^a1\accent173 ^^a1% % |á
+\else\if#1ç^^85%
+\else\if#1^^bb\accent173 ^^bb% % |ç
+\else\if#1é^^8a%
+\else\if#1õ^^95%
+\else\if#1ù^^9b%
+\else\if#1^^ff\accent173 ^^ff% % |ù
+\else\@êð#1%
+\fi\fi\fi\fi\fi\fi\fi\fi}
+
+%%%%%%%%%%%%%%%%%% End Greek commands
+
+%%%%%%%%%%%%%%%%%%%%%%%%%% Basic Greek encoding (OT1 extension)
+%% This is by Spiliotis, with very few adjustments
+%% and translated to the windows coding
+
+% \input LG1enc.def
+\DeclareFontEncoding{LG1}{}{}
+\DeclareTextAccent{\"}{LG1}{127}
+\DeclareTextAccent{\'}{LG1}{19}
+\DeclareTextAccent{\.}{LG1}{95}
+\DeclareTextAccent{\=}{LG1}{22}
+\DeclareTextAccent{\^}{LG1}{94}
+\DeclareTextAccent{\`}{LG1}{18}
+\DeclareTextAccent{\~}{LG1}{126}
+\DeclareTextAccent{\H}{LG1}{125}
+\DeclareTextAccent{\u}{LG1}{21}
+\DeclareTextAccent{\v}{LG1}{20}
+\DeclareTextAccent{\r}{LG1}{23}
+\DeclareTextCommand{\b}{LG1}[1]
+ {{\o@lign{\relax#1\crcr\hidewidth\sh@ft{29}%
+ \vbox to.2ex{\hbox{\char22}\vss}\hidewidth}}}
+\DeclareTextCommand{\c}{LG1}[1]
+ {\leavevmode\setbox\z@\hbox{#1}\ifdim\ht\z@=1ex\accent24 #1%
+ \else{\ooalign{\unhbox\z@\crcr\hidewidth\char24\hidewidth}}\fi}
+\DeclareTextCommand{\d}{LG1}[1]
+ {{\o@lign{\relax#1\crcr\hidewidth\sh@ft{10}.\hidewidth}}}
+\DeclareTextSymbol{\AE}{LG1}{29}
+\DeclareTextSymbol{\OE}{LG1}{30}
+\DeclareTextSymbol{\O}{LG1}{31}
+\DeclareTextSymbol{\ae}{LG1}{26}
+\DeclareTextSymbol{\i}{LG1}{16}
+\DeclareTextSymbol{\j}{LG1}{17}
+\DeclareTextSymbol{\oe}{LG1}{27}
+\DeclareTextSymbol{\o}{LG1}{28}
+\DeclareTextSymbol{\ss}{LG1}{25}
+\DeclareTextSymbol{\textemdash}{LG1}{124}
+\DeclareTextSymbol{\textendash}{LG1}{123}
+\DeclareTextSymbol{\textexclamdown}{LG1}{60}
+\DeclareTextSymbol{\textquestiondown}{LG1}{62}
+\DeclareTextSymbol{\textquotedblleft}{LG1}{92}
+\DeclareTextSymbol{\textquotedblright}{LG1}{`\"}
+\DeclareTextSymbol{\textquoteleft}{LG1}{`\`}
+\DeclareTextSymbol{\textquoteright}{LG1}{`\'}
+\DeclareTextCommand{\aa}{LG1}
+ {{\accent23a}}
+\DeclareTextCommand{\L}{LG1}
+ {\leavevmode\setbox\z@\hbox{L}\hb@xt@\wd\z@{\hss\@xxxii L}}
+\DeclareTextCommand{\l}{LG1}
+ {{\@xxxii l}}
+\DeclareTextCommand{\AA}{LG1}
+ {\leavevmode\setbox\z@\hbox{h}\dimen@\ht\z@\advance\dimen@-1ex%
+ \rlap{\raise.67\dimen@\hbox{\char23}}A}
+\DeclareTextCommand{\textdollar}{LG1}{{%
+ \ifdim \fontdimen\@ne\font >\z@
+ \slshape
+ \else
+ \upshape
+ \fi
+ \char`\$}}
+\DeclareTextCommand{\textsterling}{LG1}{{%
+ \ifdim \fontdimen\@ne\font >\z@
+ \itshape
+ \else
+ \fontencoding{OT1}\fontfamily{cmr}\fontshape{ui}\selectfont
+ \fi
+ \char`\$}}
+
+\DeclareFontSubstitution{LG1}{ywclr}{m}{n}
+\DeclareSymbolFont{letters}{OML}{ywclm}{m}{it}
+\SetSymbolFont{letters}{bold}{OML}{ywclm}{b}{it}
+\let\oldencdef=\encodingdefault
+\let\oldrmdef=\rmdefault
+\let\oldttdef=\ttdefault
+\let\oldsfdef=\sfdefault
+\def\setupgreek{%
+ \renewcommand{\encodingdefault}{LG1}%
+ \renewcommand{\rmdefault}{ywclr}%
+ \renewcommand{\ttdefault}{ywcltt}%
+ \renewcommand{\sfdefault}{ywclss}%
+}\setupgreek
+\newcommand{\nogreek}[1]{{%
+ \renewcommand{\encodingdefault}{\oldencdef}%
+ \renewcommand{\rmdefault}{\oldrmdef}%
+ \renewcommand{\ttdefault}{\oldttdef}%
+ \renewcommand{\sfdefault}{\oldsfdef}\fontencoding\oldencdef
+ \fontfamily\oldrmdef\selectfont#1\setupgreek}}
+
+% Make unaccented lc and uc Greek letters available in math
+% lc
+%%%%%%%%%%%%%%%%%%%% try mathfont assignments (these were missing in hammer
+%\DeclareSymbolFont{operators} {LG1}{ywclr} {m}{n}
+%\DeclareSymbolFont{letters} {OML}{ywclm} {m}{it}
+%\DeclareSymbolFont{symbols} {OMS}{cmsy}{m}{n}
+%\DeclareSymbolFont{largesymbols}{OMX}{cmex}{m}{n}
+%\SetSymbolFont{operators}{bold}{LG1}{ywclr} {bx}{n}
+%\SetSymbolFont{letters} {bold}{LG1}{ywclm} {b}{it}
+%\SetSymbolFont{symbols} {bold}{OMS}{cmsy}{b}{n}
+%\DeclareSymbolFontAlphabet{\mathrm} {operators}
+%\DeclareSymbolFontAlphabet{\mathnormal}{letters}
+%\DeclareSymbolFontAlphabet{\mathcal} {symbols}
+\DeclareMathAlphabet {\mathrm}{LG1}{ywclr}{m}{n}
+\DeclareMathAlphabet {\mathbf}{LG1}{ywclr}{bx}{n}
+\DeclareMathAlphabet {\mathsf}{LG1}{ywclss}{m}{n}
+\DeclareMathAlphabet {\mathit}{LG1}{ywclr}{m}{it}
+\DeclareMathAlphabet {\mathtt}{LG1}{ywcltt}{m}{n}
+\SetMathAlphabet\mathsf{bold}{OT1}{cmss}{bx}{n}
+\SetMathAlphabet\mathit{bold}{OT1}{cmr}{bx}{it}
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\DeclareMathSymbol{^^e1}{\mathalpha}{letters}{`^^e1}
+\DeclareMathSymbol{^^e2}{\mathalpha}{letters}{`^^e2}
+\DeclareMathSymbol{^^e3}{\mathalpha}{letters}{`^^e3}
+\DeclareMathSymbol{^^e4}{\mathalpha}{letters}{`^^e4}
+\DeclareMathSymbol{^^e5}{\mathalpha}{letters}{`^^e5}
+\DeclareMathSymbol{^^e6}{\mathalpha}{letters}{`^^e6}
+\DeclareMathSymbol{^^e7}{\mathalpha}{letters}{`^^e7}
+\DeclareMathSymbol{^^e8}{\mathalpha}{letters}{`^^e8}
+\DeclareMathSymbol{^^e9}{\mathalpha}{letters}{`^^e9}
+\DeclareMathSymbol{^^ea}{\mathalpha}{letters}{`^^ea}
+\DeclareMathSymbol{^^eb}{\mathalpha}{letters}{`^^eb}
+\DeclareMathSymbol{^^ec}{\mathalpha}{letters}{`^^ec}
+\DeclareMathSymbol{^^ed}{\mathalpha}{letters}{`^^ed}
+\DeclareMathSymbol{^^ee}{\mathalpha}{letters}{`^^ee}
+\DeclareMathSymbol{^^ef}{\mathalpha}{letters}{`^^ef}
+\DeclareMathSymbol{^^f0}{\mathalpha}{letters}{`^^f0}
+\DeclareMathSymbol{^^f1}{\mathalpha}{letters}{`^^f1}
+\DeclareMathSymbol{^^f2}{\mathalpha}{letters}{`^^f2}
+\DeclareMathSymbol{^^f3}{\mathalpha}{letters}{`^^f3}
+\DeclareMathSymbol{^^f4}{\mathalpha}{letters}{`^^f4}
+\DeclareMathSymbol{^^f5}{\mathalpha}{letters}{`^^f5}
+\DeclareMathSymbol{^^f6}{\mathalpha}{letters}{`^^f6}
+\DeclareMathSymbol{^^f7}{\mathalpha}{letters}{`^^f7}
+\DeclareMathSymbol{^^f8}{\mathalpha}{letters}{`^^f8}
+\DeclareMathSymbol{^^f9}{\mathalpha}{letters}{`^^f9}
+% uc
+\DeclareMathSymbol{^^c1}{\mathalpha}{letters}{`^^c1}
+\DeclareMathSymbol{^^c2}{\mathalpha}{letters}{`^^c2}
+\DeclareMathSymbol{^^c3}{\mathalpha}{letters}{`^^c3}
+\DeclareMathSymbol{^^c4}{\mathalpha}{letters}{`^^c4}
+\DeclareMathSymbol{^^c5}{\mathalpha}{letters}{`^^c5}
+\DeclareMathSymbol{^^c6}{\mathalpha}{letters}{`^^c6}
+\DeclareMathSymbol{^^c7}{\mathalpha}{letters}{`^^c7}
+\DeclareMathSymbol{^^c8}{\mathalpha}{letters}{`^^c8}
+\DeclareMathSymbol{^^c9}{\mathalpha}{letters}{`^^c9}
+\DeclareMathSymbol{^^ca}{\mathalpha}{letters}{`^^ca}
+\DeclareMathSymbol{^^cb}{\mathalpha}{letters}{`^^cb}
+\DeclareMathSymbol{^^cc}{\mathalpha}{letters}{`^^cc}
+\DeclareMathSymbol{^^cd}{\mathalpha}{letters}{`^^cd}
+\DeclareMathSymbol{^^ce}{\mathalpha}{letters}{`^^ce}
+\DeclareMathSymbol{^^cf}{\mathalpha}{letters}{`^^cf}
+\DeclareMathSymbol{^^d0}{\mathalpha}{letters}{`^^d0}
+\DeclareMathSymbol{^^d1}{\mathalpha}{letters}{`^^d1}
+\DeclareMathSymbol{^^d3}{\mathalpha}{letters}{`^^d3}
+\DeclareMathSymbol{^^d4}{\mathalpha}{letters}{`^^d4}
+\DeclareMathSymbol{^^d5}{\mathalpha}{letters}{`^^d5}
+\DeclareMathSymbol{^^d6}{\mathalpha}{letters}{`^^d6}
+\DeclareMathSymbol{^^d7}{\mathalpha}{letters}{`^^d7}
+\DeclareMathSymbol{^^d8}{\mathalpha}{letters}{`^^d8}
+\DeclareMathSymbol{^^d9}{\mathalpha}{letters}{`^^d9}
+
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%% Preload the .fd files
+
+% lg1ywclr.fd
+\DeclareFontFamily{LG1}{ywclr}{}
+\DeclareFontShape{LG1}{ywclr}{m}{n}
+ { <5> <6> <7> <8> <9> <10> <11> <12> <14> <17> <20> <25> gen * ywclr
+ }{}
+\DeclareFontShape{LG1}{ywclr}{m}{sl}
+ { <5> <6> <7> <8> ywclsl8
+ <9> <10> <11> <12> <14> <17> <20> <25> gen * ywclsl
+ }{}
+\DeclareFontShape{LG1}{ywclr}{m}{it}
+ { <5> <6> <7> ywclti7
+ <8> <9> <10> <11> <12> <14> <17> <20> <25> gen * ywclti
+ }{}
+\DeclareFontShape{LG1}{ywclr}{m}{sc}
+ { <5> <6> ywclcsc6
+ <7> <8> ywclcsc8
+ <9> <10> <11> <12> <14> <17> <20> <25> gen * ywclcsc
+ }{}
+%%%%%% bold series
+\DeclareFontShape{LG1}{ywclr}{b}{n}
+ {<->sub * ywclr/bx/n}{}
+
+%%%%%%% bold extended series
+\DeclareFontShape{LG1}{ywclr}{bx}{n}
+ { <5> <6> <7> <8> <9> <10> <11> <12> <14> <17> <20> <25> <32>
+<40> gen * ywclbx
+ }{}
+\DeclareFontShape{LG1}{ywclr}{bx}{sl}
+ { <5> <6> <7> <8> <9> <10> <11> <12> <14> <17> <20> <25> gen * ywclbxsl
+ }{}
+\DeclareFontShape{LG1}{ywclr}{bx}{it}
+ {<->sub * ywclr/bx/n}{}
+
+% lg1clss.fd
+\DeclareFontFamily{LG1}{ywclss}{}
+\DeclareFontShape{LG1}{ywclss}{m}{n}
+ { <5> <6> <7> <8> ywclss8
+ <9> <10> <11> <12> <14> <17> <20> <25> gen * ywclss
+ }{}
+
+\DeclareFontShape{LG1}{ywclss}{bx}{n}
+ { <5> <6> <7> <8> ywclssbx8
+ <9> <10> <11> <12> <14> <17> <20> <25> gen * ywclssbx
+ }{}
+
+\DeclareFontShape{LG1}{ywclss}{m}{it}
+ {<->sub*ywclr/m/it}{}
+\DeclareFontShape{LG1}{ywclss}{m}{sl}
+ {<->sub*ywclr/m/sl}{}
+%%%%%% Font/shape undefined, therefore substituted
+\DeclareFontShape{LG1}{ywclss}{m}{sc}
+ {<->sub*ywclr/m/sc}{}
+%%%%%% Font/shape undefined, therefore substituted
+\DeclareFontShape{LG1}{ywclss}{m}{ui}
+ {<->sub*ywclr/m/n}{}
+%%%%%%% semibold condensed series
+\DeclareFontShape{LG1}{ywclss}{sbc}{n}
+ {<->sub*ywclr/bx/n}{}
+%%%%%%%% bold extended series
+%\DeclareFontShape{LG1}{ywclss}{bx}{n}
+% {<->sub*ywclss/m/n}{}
+%%%%%% Font/shape undefined, therefore substituted
+\DeclareFontShape{LG1}{ywclss}{bx}{ui}
+ {<->sub*ywclss/m/n}{}
+
+% lg1cltt.fd, corrected cmtt to cltt in first line, ynm
+\DeclareFontFamily{LG1}{ywcltt}{\hyphenchar \font\m@ne}
+\DeclareFontShape{LG1}{ywcltt}{m}{n}
+ { <5> <6> <7> <8> ywcltt8
+ <9> <10> <11> <12> <14> <17> <20> <25> gen * ywcltt
+ }{}
+%%%%% make sure subst shapes are available
+\DeclareFontShape{LG1}{ywcltt}{m}{it}
+ {<->sub * ywcltt/m/n}{}
+\DeclareFontShape{LG1}{ywcltt}{m}{sl}
+ {<->sub * ywcltt/m/n}{}
+\DeclareFontShape{LG1}{ywcltt}{m}{sc}
+ {<->sub * ywcltt/m/n}{}
+\DeclareFontShape{LG1}{ywcltt}{m}{ui}
+ {<->sub * ywcltt/m/n}{}
+\DeclareFontShape{LG1}{ywcltt}{bx}{n}
+ {<->sub * ywcltt/m/n}{}
+\DeclareFontShape{LG1}{ywcltt}{bx}{it}
+ {<->sub * ywcltt/m/n}{}
+\DeclareFontShape{LG1}{ywcltt}{bx}{ui}
+ {<->sub * ywcltt/m/n}{}
+
+% omlclm.fd, changed cmm to clm, ynm
+\DeclareFontFamily{OML}{ywclm}{\skewchar\font127 }
+\DeclareFontShape{OML}{ywclm}{m}{it}%
+ { <5> <6> <7> <8> <9> <10> <11> <12> <14> <17> <20> <25> gen * ywclmi%
+ }{}
+\DeclareFontShape{OML}{ywclm}{b}{it}{%
+ <5> <6> <7> <8> <9> gen * cmmib
+ <10> <11> <12> <14> <17> <20> <25> cmmib10
+ }{}
+\DeclareFontShape{OML}{ywclm}{bx}{it}
+ {<-> ssub * ywclm/b/it}{}
+
+% omsclr.fd
+\DeclareFontFamily{OMS}{ywclr}{\skewchar\font48 }
+\DeclareFontShape{OMS}{ywclr}{m}{n}
+ {<-> ssub * cmsy/m/n}{}
+\DeclareFontShape{OMS}{ywclr}{m}{it}
+ {<-> ssub * cmsy/m/n}{}
+\DeclareFontShape{OMS}{ywclr}{m}{sl}
+ {<-> ssub * cmsy/m/n}{}
+\DeclareFontShape{OMS}{ywclr}{m}{sc}
+ {<-> ssub * cmsy/m/n}{}
+\DeclareFontShape{OMS}{ywclr}{bx}{n}
+ {<-> ssub * cmsy/b/n}{}
+\DeclareFontShape{OMS}{ywclr}{bx}{it}
+ {<-> ssub * cmsy/b/n}{}
+\DeclareFontShape{OMS}{ywclr}{bx}{sl}
+ {<-> ssub * cmsy/b/n}{}
+\DeclareFontShape{OMS}{ywclr}{bx}{sc}
+ {<-> ssub * cmsy/b/n}{}
+
+% omsclsy.fd
+\DeclareFontFamily{OMS}{ywclsy}{\skewchar\font48 }
+\DeclareFontShape{OMS}{ywclsy}{m}{n}{%
+ <5> <6> <7> <8> <9> <10> gen * cmsy
+ <11> <12> <14> <17> <20> <25> cmsy10
+ }{}
+\DeclareFontShape{OMS}{ywclsy}{b}{n}{%
+ <5> <6> <7> <8> <9> gen * cmbsy
+ <10> <11> <12> <14> <17> <20> <25>cmbsy10
+ }{}
+
+% omxclex.fd
+\DeclareFontFamily{OMX}{ywclex}{}{}
+\DeclareFontShape{OMX}{ywclex}{m}{n}{
+ <-> sfixed * cmex10
+ }{}
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\ProcessOptions \relax % ynm
+%%
+%% End of file `greektex.sty'.
|