% 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'.