\def\fileversion{v1.1}
\def\filedate{94/09/16}
\def\docdate {94/09/16}

\expandafter\ifx\csname dategreek\endcsname\else\endinput\fi
\expandafter\ifx\csname selectfont\endcsname
       \typeout{The `rgreek' style option can only be used
                ^^Jwith the new font selection scheme.}\endinput\fi
       \openin1 rgreekmac \ifeof1
       \typeout{! I can't find file `rgreekmac.tex'.}
       \else\closein1 \relax\input{rgreekmac}\fi
\typeout{Style Option: `rgreek'
 \fileversion\space <\filedate>}
\typeout{English Documentation:
 \@spaces\space <\docdate>}

\new@fontshape{greek}{m}{n}{%
  <5>grreg8 at5pt%
  <6>grreg8 at5.6pt%
  <7>grreg8 at7pt%
  <8>grreg8%
  <9>grreg9%
  <10>rgrrg10%
  <11>rgrrg10 at10.95pt%
  <12>rgrrg10 at12pt%
  <14>rgrrg10 at14.4pt%
  <17>rgrrg10 at17.28pt%
  <20>rgrrg10 at20.74pt
  <25>rgrrg10 at24.88pt}{}%
\new@fontshape{greek}{m}{tt}{%
  <5>grtt8 at5pt%
  <6>grtt8 at5.6pt%
  <7>grtt8 at7pt%
  <8>grtt8%
  <9>grtt9%
  <10>grtt10%
  <11>grtt10 at10.95pt%
  <12>grtt10 at12pt%
  <14>grtt10 at14.4pt%
  <17>grtt10 at17.28pt%
  <20>grtt10 at20.74pt%
  <25>grtt10 at24.88pt}{}%
\new@fontshape{greek}{m}{sl}{%
  <5>rgrsl10 at5pt%
  <6>rgrsl10 at5.6pt%
  <7>rgrsl10 at7pt%
  <8>rgrsl10 at8pt%
  <9>rgrsl10 at9pt%
  <10>rgrsl10%
  <11>rgrsl10 at10.95pt%
  <12>rgrsl10 at12pt%
  <14>rgrsl10 at14.4pt%
  <17>rgrsl10 at17.28pt%
  <20>rgrsl10 at20.74pt%
  <25>rgrsl10 at24.88pt}{}%
\new@fontshape{greek}{m}{it}{%
  <5>rgrti10 at5pt%
  <6>rgrti10 at5.6pt%
  <7>rgrti10 at7pt%
  <8>rgrti10 at8pt%
  <9>rgrti10 at9pt%
  <10>rgrti10%
  <11>rgrti10 at10.95pt%
  <12>rgrti10 at12pt%
  <14>rgrti10 at14.4pt%
  <17>rgrti10 at17.28pt%
  <20>rgrti10 at20.74pt%
  <25>rgrti10 at24.88pt}{}%
\new@fontshape{greek}{m}{sc}{%
  <5>rgrsc10 at5pt%
  <6>rgrsc10 at5.6pt%
  <7>rgrsc10 at7pt%
  <8>rgrsc10 at8pt%
  <9>rgrsc10 at9pt%
  <10>rgrsc10%
  <11>rgrsc10 at10.95pt%
  <12>rgrsc10 at12pt%
  <14>rgrsc10 at14.4pt%
  <17>rgrsc10 at17.28pt%
  <20>rgrsc10 at20.74pt%
  <25>rgrsc10 at24.88pt}{}%
\new@fontshape{greek}{bf}{n}{%
  <5>grbld8 at5pt%
  <6>grbld8 at5.6pt%
  <7>grbld8 at7pt%
  <8>grbld8%
  <9>grbld9%
  <10>rgrbf10%
  <11>rgrbf10 at10.95pt%
  <12>rgrbf10 at12pt%
  <14>rgrbf10 at14.4pt%
  <17>rgrbf10 at17.28pt%
  <20>rgrbf10 at20.74pt%
  <25>rgrbf10 at24.88pt}{}%
\extra@def{greek}{}{}

\def\graffiti{\protect\pgraffiti}
\def\pgraffiti{\family{greek}\series{c}\shape{sl}\size{9}{10pt}\selectfont}
\def\@makefnmark{\raise 1ex\hbox{\scriptsize\@thefnmark}}
\gdef\pel{\raisebox{.6ex}{.}\ } % punctus elevatus

\newif\ifgreek\greekfalse
\def\greekmode{%
\catcode`\<=13%
\catcode`\>=13%
\catcode`\'=13%11
\catcode`\`=13%11
\catcode`\~=11%
\catcode`\"=11%
\catcode`\|=11%
\lccode`\<=`\<%
\lccode`\>=`\>%
\lccode`\'=`\'%
\lccode`\`=`\`%
\lccode`\~=`\~%
\lccode`\"=`\"%
\lccode`\|=`\|%
\family{greek}\selectfont%
\ifx\keybgreek\undefined\relax\else\keybgreek\fi\greektrue}
\def\begingreek{\bgroup\greekmode}
\def\endgreek{\egroup}

\let\math=$
{\catcode`\$=13
\gdef\greekdelims{\catcode`\$=13
\def${\ifgreek\endgreek\else\begingreek\fi}
\def\display{\math\math}\def\enddisplay{\math\math}}}

\endinput

You are viewing proxied material from ftp.icm.edu.pl. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.