% ibygreek.tex -- GJC Lokhorst -- May 7, 1994
% Dr. Gert-Jan C. Lokhorst, Erasmus University Rotterdam
% lokhorst@filint.fwb.eur.nl, glokhorst@fac.fbk.eur.nl
% ------------------------
% For use with plain-nfss.
% Replaces ibygrk.tex; does not call setgreek.tex
% Use "\fontsize{14}{17pt}\selectfont" instead of "\setgreek14/17"
% and "{\greek{}...}" instead of "\GK{}...\RM{}"

\newtoks\digraphs
\digraphs={tlgsqq}
\input ibygrk.map

\makeatletter
\new@fontshape{greek}{m}{n}{%
   <5>gribyr8 at5pt%
   <6>gribyr8 at6pt%
   <7>gribyr8 at7pt%
   <8>gribyr8%
   <9>gribyr9%
  <10>gribyr10%
  <11>gribyr10 at10.95pt%
  <12>gribyr10 at12pt%
  <14>gribyr10 at14.4pt%
  <17>gribyr10 at17.28pt%
  <20>gribyr10 at20.74pt%
  <25>gribyr10 at24.88pt}{}
\extra@def{greek}{}{}
\new@fontshape{greek}{m}{sl}{%
   <5>gribysl8 at5pt%
   <6>gribysl8 at6pt%
   <7>gribysl8 at7pt%
   <8>gribysl8%
   <9>gribysl9%
  <10>gribsl10%
  <11>gribsl10 at10.95pt%
  <12>gribsl10 at12pt%
  <14>gribsl10 at14.4pt%
  <17>gribsl10 at17.28pt%
  <20>gribsl10 at20.74pt%
  <25>gribsl10 at24.88pt}{}
\subst@fontshape{greek}{m}{it}{greek}{m}{sl}
\new@fontshape{greek}{b}{n}{%
   <5>gribyb8 at5pt%
   <6>gribyb8 at6pt%
   <7>gribyb8 at7pt%
   <8>gribyb8%
   <9>gribyb9%
  <10>gribyb10%
  <11>gribyb10 at10.95pt%
  <12>gribyb10 at12pt%
  <14>gribyb10 at14.4pt%
  <17>gribyb10 at17.28pt%
  <20>gribyb10 at20.74pt%
  <25>gribyb10 at24.88pt}{}
\subst@fontshape{greek}{bx}{n}{greek}{b}{n}
\def\greek{\family{greek}\selectfont}
\makeatother