summaryrefslogtreecommitdiff
path: root/fonts/greek/kd/latex
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /fonts/greek/kd/latex
Initial commit
Diffstat (limited to 'fonts/greek/kd/latex')
-rw-r--r--fonts/greek/kd/latex/grart10.sty379
-rw-r--r--fonts/greek/kd/latex/grart12.sty118
-rw-r--r--fonts/greek/kd/latex/grarticle.sty278
-rw-r--r--fonts/greek/kd/latex/grbk10.sty130
-rw-r--r--fonts/greek/kd/latex/grbk11.sty130
-rw-r--r--fonts/greek/kd/latex/grbk12.sty130
-rw-r--r--fonts/greek/kd/latex/grbook.sty254
-rw-r--r--fonts/greek/kd/latex/greek.sty73
-rw-r--r--fonts/greek/kd/latex/grfonts.tex303
-rw-r--r--fonts/greek/kd/latex/grkhyphen.tex1181
-rw-r--r--fonts/greek/kd/latex/grmode.sty58
-rw-r--r--fonts/greek/kd/latex/lfonts.tex889
-rw-r--r--fonts/greek/kd/latex/lgreek.3.0c415
-rw-r--r--fonts/greek/kd/latex/lgreek.tex410
14 files changed, 4748 insertions, 0 deletions
diff --git a/fonts/greek/kd/latex/grart10.sty b/fonts/greek/kd/latex/grart10.sty
new file mode 100644
index 0000000000..f9f96e24b7
--- /dev/null
+++ b/fonts/greek/kd/latex/grart10.sty
@@ -0,0 +1,379 @@
+% GREEK ARTICLE DOCUMENT STYLE -- Released 10 Oct 1991
+% for LaTeX version 2.09 - Greek TeX 3.1
+% Original Article style Copyright (C) 1987 by Leslie Lamport
+% Greek Article Style Copyright (C) 1991-1992 by K J Dryllerakis
+% Changes: $ ---> m@thm@de
+% < ---> \lt (less than)
+% > ---> \gt (greater than)
+% ****************************************
+% * FONTS *
+% ****************************************
+%
+
+\lineskip 1pt % \lineskip is 1pt for all font sizes.
+\normallineskip 1pt
+\def\baselinestretch{1}
+
+% Each size-changing command \SIZE executes the command
+% \@setsize\SIZE{BASELINESKIP}\FONTSIZE\@FONTSIZE
+% where:
+% BASELINESKIP = Normal value of \baselineskip for that size. (Actual
+% value will be \baselinestretch * BASELINESKIP.)
+%
+% \FONTSIZE = Name of font-size command. The currently available
+% (preloaded) font sizes are: \vpt (5pt), \vipt (6pt),
+% \viipt (etc.), \viiipt, \ixpt, \xpt, \xipt, \xiipt,
+% \xivpt, \xviipt, \xxpt, \xxvpt.
+% \@FONTSIZE = The same as the font-size command except with an
+% '@' in front---e.g., if \FONTSIZE = \xivpt then
+% \@FONTSIZE = \@xivpt.
+%
+% For reasons of efficiency that needn't concern the designer,
+% the document style defines \@normalsize instead of \normalsize . This is
+% done only for \normalsize, not for any other size-changing commands.
+
+\def\@normalsize{\@setsize\normalsize{12pt}\xpt\@xpt
+\abovedisplayskip 10pt plus2pt minus5pt%
+\belowdisplayskip \abovedisplayskip
+\abovedisplayshortskip \z@ plus3pt%
+\belowdisplayshortskip 6pt plus3pt minus3pt%
+\let\@listi\@listI} % Setting of \@listi added 9 Jun 87
+
+\def\small{\@setsize\small{11pt}\ixpt\@ixpt
+\abovedisplayskip 8.5pt plus 3pt minus 4pt%
+\belowdisplayskip \abovedisplayskip
+\abovedisplayshortskip \z@ plus2pt%
+\belowdisplayshortskip 4pt plus2pt minus 2pt
+\def\@listi{\leftmargin\leftmargini %% Added 22 Dec 87
+\topsep 4pt plus 2pt minus 2pt\parsep 2pt plus 1pt minus 1pt
+\itemsep \parsep}}
+
+\def\footnotesize{\@setsize\footnotesize{9.5pt}\viiipt\@viiipt
+\abovedisplayskip 6pt plus 2pt minus 4pt%
+\belowdisplayskip \abovedisplayskip
+\abovedisplayshortskip \z@ plus 1pt%
+\belowdisplayshortskip 3pt plus 1pt minus 2pt
+\def\@listi{\leftmargin\leftmargini %% Added 22 Dec 87
+\topsep 3pt plus 1pt minus 1pt\parsep 2pt plus 1pt minus 1pt
+\itemsep \parsep}}
+
+\def\scriptsize{\@setsize\scriptsize{8pt}\viipt\@viipt}
+\def\tiny{\@setsize\tiny{6pt}\vpt\@vpt}
+\def\large{\@setsize\large{14pt}\xiipt\@xiipt}
+\def\Large{\@setsize\Large{18pt}\xivpt\@xivpt}
+\def\LARGE{\@setsize\LARGE{22pt}\xviipt\@xviipt}
+\def\huge{\@setsize\huge{25pt}\xxpt\@xxpt}
+\def\Huge{\@setsize\Huge{30pt}\xxvpt\@xxvpt}
+
+\normalsize % Choose the normalsize font.
+
+% ****************************************
+% * PAGE LAYOUT *
+% ****************************************
+%
+% All margin dimensions measured from a point one inch from top and side
+% of page.
+
+% SIDE MARGINS:
+\if@twoside % Values for two-sided printing:
+ \oddsidemargin 44pt % Left margin on odd-numbered pages.
+ \evensidemargin 82pt % Left margin on even-numbered pages.
+ \marginparwidth 107pt % Width of marginal notes.
+\else % Values for one-sided printing:
+ \oddsidemargin 63pt % Note that \oddsidemargin = \evensidemargin
+ \evensidemargin 63pt
+ \marginparwidth 90pt
+\fi
+\marginparsep 11pt % Horizontal space between outer margin and
+ % marginal note
+
+
+% VERTICAL SPACING:
+ % Top of page:
+\topmargin 27pt % Nominal distance from top of page to top of
+ % box containing running head.
+\headheight 12pt % Height of box containing running head.
+\headsep 25pt % Space between running head and text.
+% \topskip = 10pt % '\baselineskip' for first line of page.
+ % Bottom of page:
+\footskip 30pt % Distance from baseline of box containing foot
+ % to baseline of last line of text.
+
+
+% DIMENSION OF TEXT:
+% 24 Jun 86: changed to explicitly compute \textheight to avoid roundoff.
+% The value of the multiplier was calculated as the floor of the
+% old \textheight minus \topskip, divided by \baselineskip for \normalsize.
+% The old value of \textheight was 528pt.
+% \textheight is the height of text (including footnotes and figures,
+% excluding running head and foot).
+
+\textheight = 43\baselineskip
+\advance\textheight by \topskip
+\textwidth 345pt % Width of text line.
+ % For two-column mode:
+\columnsep 10pt % Space between columns
+\columnseprule 0pt % Width of rule between columns.
+
+% A \raggedbottom command causes 'ragged bottom' pages: pages set to
+% natural height instead of being stretched to exactly \textheight.
+
+% FOOTNOTES:
+
+\footnotesep 6.65pt % Height of strut placed at the beginning of every
+ % footnote = height of normal \footnotesize strut,
+ % so no extra space between footnotes.
+
+\skip\footins 9pt plus 4pt minus 2pt % Space between last line of text and
+ % top of first footnote.
+
+% FLOATS: (a float is something like a figure or table)
+%
+% FOR FLOATS ON A TEXT PAGE:
+%
+% ONE-COLUMN MODE OR SINGLE-COLUMN FLOATS IN TWO-COLUMN MODE:
+\floatsep 12pt plus 2pt minus 2pt % Space between adjacent floats moved
+ % to top or bottom of text page.
+\textfloatsep 20pt plus 2pt minus 4pt % Space between main text and floats
+ % at top or bottom of page.
+\intextsep 12pt plus 2pt minus 2pt % Space between in-text figures and
+ % text.
+\@maxsep 20pt % The maximum of \floatsep,
+ % \textfloatsep and \intextsep (minus
+ % the stretch and shrink).
+% TWO-COLUMN FLOATS IN TWO-COLUMN MODE:
+\dblfloatsep 12pt plus 2pt minus 2pt % Same as \floatsep for double-column
+ % figures in two-column mode.
+\dbltextfloatsep 20pt plus 2pt minus 4pt % \textfloatsep for double-column
+ % floats.
+\@dblmaxsep 20pt % The maximum of \dblfloatsep and
+ % \dbltexfloatsep.
+
+% FOR FLOATS ON A SEPARATE FLOAT PAGE OR COLUMN:
+% ONE-COLUMN MODE OR SINGLE-COLUMN FLOATS IN TWO-COLUMN MODE:
+\@fptop 0pt plus 1fil % Stretch at top of float page/column. (Must be
+ % 0pt plus ...)
+\@fpsep 8pt plus 2fil % Space between floats on float page/column.
+\@fpbot 0pt plus 1fil % Stretch at bottom of float page/column. (Must be
+ % 0pt plus ... )
+
+% DOUBLE-COLUMN FLOATS IN TWO-COLUMN MODE.
+\@dblfptop 0pt plus 1fil % Stretch at top of float page. (Must be 0pt plus ...)
+\@dblfpsep 8pt plus 2fil % Space between floats on float page.
+\@dblfpbot 0pt plus 1fil % Stretch at bottom of float page. (Must be
+ % 0pt plus ... )
+% MARGINAL NOTES:
+%
+\marginparpush 5pt % Minimum vertical separation between two marginal
+ % notes.
+
+
+% ****************************************
+% * PARAGRAPHING *
+% ****************************************
+%
+\parskip 0pt plus 1pt % Extra vertical space between paragraphs.
+\parindent 15pt % Width of paragraph indentation.
+%\topsep 8pt plus 2pt minus 4pt % Extra vertical space, in addition to
+ % \parskip, added above and below list and
+ % paragraphing environments.
+\partopsep 2pt plus 1pt minus 1pt % Extra vertical space, in addition to
+ % \parskip and \topsep, added when user
+ % leaves blank line before environment.
+%\itemsep 4pt plus 2pt minus 1pt % Extra vertical space, in addition to
+ % \parskip, added between list items.
+% See \@listI for values of \topsep and \itemsep
+% (Change made 9 Jun 87)
+
+% The following page-breaking penalties are defined
+
+\@lowpenalty 51 % Produced by \nopagebreak[1] or \nolinebreak[1]
+\@medpenalty 151 % Produced by \nopagebreak[2] or \nolinebreak[2]
+\@highpenalty 301 % Produced by \nopagebreak[3] or \nolinebreak[3]
+
+\@beginparpenalty -\@lowpenalty % Before a list or paragraph environment.
+\@endparpenalty -\@lowpenalty % After a list or paragraph environment.
+\@itempenalty -\@lowpenalty % Between list items.
+
+% \clubpenalty % 'Club line' at bottom of page.
+% \widowpenalty % 'Widow line' at top of page.
+% \displaywidowpenalty % Math display widow line.
+% \predisplaypenalty % Breaking before a math display.
+% \postdisplaypenalty % Breaking after a math display.
+% \interlinepenalty % Breaking at a line within a paragraph.
+% \brokenpenalty % Breaking after a hyphenated line.
+
+
+% ****************************************
+% * SECTIONS *
+% ****************************************
+%
+
+% \secdef{UNSTARCMDS}{STARCMDS} :
+% When defining a sectionioning command without using
+% \@startsection, you can use \secdef as follows:
+% \def\part { ... \secdef \CMDA \CMDB }
+% \def\CMDA [#1]#2{ ... } % Command to define \part[...]{...}
+% \def\CMDB #1{ ... } % Command to define \part*{...}
+
+\def\part{\par % New paragraph
+ \addvspace{4ex} % Adds vertical space above title.
+ \@afterindentfalse % Suppresses indent in first paragraph. Change
+ \secdef\@part\@spart} % to \@afterindenttrue to have indent.
+
+\def\@part[#1]#2{\ifnum \c@secnumdepth \gt\m@ne % IF secnumdepth > -1
+ \refstepcounter{part} % THEN step part counter
+ \addcontentsline{toc}{part}{\thepart % add toc line
+ \hspace{1em}#1}\else % ELSE add unnumbered line
+ \addcontentsline{toc}{part}{#1}\fi % FI
+ { \parindent 0pt \raggedright
+ \ifnum \c@secnumdepth \gt\m@ne % IF secnumdepth > -1
+ \Large \grbf M'eroc \thepart % THEN Print 'Part' and
+ \par \nobreak % number in \Large boldface.
+ \fi % FI
+ \huge \grbf % Select \huge boldface.
+ #2\markboth{}{}\par } % Print title and set heading marks null.
+ \nobreak % TeX penalty to prevent page break.
+ \vskip 3ex % Space between title and text.
+ \@afterheading % Routine called after part and
+ } % section heading.
+
+% Heading for \part* command
+% **
+\def\@spart#1{{\parindent 0pt \raggedright
+ \huge \grbf
+% ^^^^
+% **
+ #1\par} % Title.
+ \nobreak % TeX penalty to prevent page break.
+ \vskip 3ex % Space between title and text.
+ \@afterheading % Routine called after part and
+ } % section heading.
+
+% \@startsection {NAME}{LEVEL}{INDENT}{BEFORESKIP}{AFTERSKIP}{STYLE}
+% optional * [ALTHEADING]{HEADING}
+% Generic command to start a section.
+% NAME : e.g., 'subsection'
+% LEVEL : a number, denoting depth of section -- i.e., section=1,
+% subsection = 2, etc. A section number will be printed if
+% and only if LEVEL < or = the value of the secnumdepth
+% counter.
+% INDENT : Indentation of heading from left margin
+% BEFORESKIP : Absolute value = skip to leave above the heading.
+% If negative, then paragraph indent of text following
+% heading is suppressed.
+% AFTERSKIP : if positive, then skip to leave below heading,
+% else - skip to leave to right of run-in heading.
+% STYLE : commands to set style
+% If '*' missing, then increments the counter. If it is present, then
+% there should be no [ALTHEADING] argument. A sectioning command
+% is normally defined to \@startsection + its first six arguments.
+
+% **
+% all bf's changed to grbf's
+\def\section{\@startsection {section}{1}{\z@}{-3.5ex plus -1ex minus
+ -.2ex}{2.3ex plus .2ex}{\Large\grbf}}
+\def\subsection{\@startsection{subsection}{2}{\z@}{-3.25ex plus -1ex minus
+ -.2ex}{1.5ex plus .2ex}{\large\grbf}}
+\def\subsubsection{\@startsection{subsubsection}{3}{\z@}{-3.25ex plus
+-1ex minus -.2ex}{1.5ex plus .2ex}{\normalsize\grbf}}
+\def\paragraph{\@startsection
+ {paragraph}{4}{\z@}{3.25ex plus 1ex minus .2ex}{-1em}{\normalsize\grbf}}
+\def\subparagraph{\@startsection
+ {subparagraph}{4}{\parindent}{3.25ex plus 1ex minus
+ .2ex}{-1em}{\normalsize\grbf}}
+% **
+
+% Default initializations of \...mark commands. (See below for their
+% us in defining page styles.
+%
+
+% \def\sectionmark#1{} % Preloaded definitions
+% \def\subsectionmark#1{}
+% \def\subsubsectionmark#1{}
+% \def\paragraphmark#1{}
+% \def\subparagraphmark#1{}
+
+% The value of the counter secnumdepth gives the depth of the
+% highest-level sectioning command that is to produce section numbers.
+%
+
+\setcounter{secnumdepth}{3}
+
+% APPENDIX
+%
+% The \appendix command must do the following:
+% -- reset the section and subsection counters to zero
+% -- redefine the section counter to produce appendix numbers
+% -- redefine the \section command if appendix titles and headings are
+% to look different from section titles and headings.
+%
+% **
+\def\appendix{\par
+ \setcounter{section}{0}
+ \setcounter{subsection}{0}
+ \def\thesection{\Alphgr{section}}}
+% ^^^^^
+% **
+
+
+% ****************************************
+% * LISTS *
+% ****************************************
+%
+
+% The following commands are used to set the default values for the list
+% environment's parameters. See the LaTeX manual for an explanation of
+% the meanings of the parameters. Defaults for the list environment are
+% set as follows. First, \rightmargin, \listparindent and \itemindent
+% are set to 0pt. Then, for a Kth level list, the command \@listK is
+% called, where 'K' denotes 'i', 'ii', ... , 'vi'. (I.e., \@listiii is
+% called for a third-level list.) By convention, \@listK should set
+% \leftmargin to \leftmarginK.
+%
+% For efficiency, level-one list's values are defined at top level, and
+% \@listi is defined to set only \leftmargin
+
+\leftmargini 25pt
+\leftmarginii 22pt % > \labelsep + width of '(m)'
+\leftmarginiii 18.7pt % > \labelsep + width of 'vii.'
+\leftmarginiv 17pt % > \labelsep + width of 'M.'
+\leftmarginv 10pt
+\leftmarginvi 10pt
+
+\leftmargin\leftmargini
+\labelsep 5pt
+\labelwidth\leftmargini\advance\labelwidth-\labelsep
+% \parsep 4pt plus 2pt minus 1pt (Removed 9 Jun 87)
+
+% \@listI defines top level and \@listi values of
+% \leftmargin, \topsep, \parsep, and \itemsep
+% (Added 9 Jun 87)
+\def\@listI{\leftmargin\leftmargini \parsep 4pt plus 2pt minus 1pt%
+\topsep 8pt plus 2pt minus 4pt%
+\itemsep 4pt plus 2pt minus 1pt}
+
+\let\@listi\@listI
+\@listi
+
+\def\@listii{\leftmargin\leftmarginii
+ \labelwidth\leftmarginii\advance\labelwidth-\labelsep
+ \topsep 4pt plus 2pt minus 1pt
+ \parsep 2pt plus 1pt minus 1pt
+ \itemsep \parsep}
+
+\def\@listiii{\leftmargin\leftmarginiii
+ \labelwidth\leftmarginiii\advance\labelwidth-\labelsep
+ \topsep 2pt plus 1pt minus 1pt
+ \parsep \z@ \partopsep 1pt plus 0pt minus 1pt
+ \itemsep \topsep}
+
+\def\@listiv{\leftmargin\leftmarginiv
+ \labelwidth\leftmarginiv\advance\labelwidth-\labelsep}
+
+\def\@listv{\leftmargin\leftmarginv
+ \labelwidth\leftmarginv\advance\labelwidth-\labelsep}
+
+\def\@listvi{\leftmargin\leftmarginvi
+ \labelwidth\leftmarginvi\advance\labelwidth-\labelsep}
+
diff --git a/fonts/greek/kd/latex/grart12.sty b/fonts/greek/kd/latex/grart12.sty
new file mode 100644
index 0000000000..0b0a575d76
--- /dev/null
+++ b/fonts/greek/kd/latex/grart12.sty
@@ -0,0 +1,118 @@
+% grart12.sty 13-Oct-1991
+% art12.sty 22-Dec-87
+% Changes: $ ---> m@thm@de
+% < ---> \lt (less than)
+% > ---> \gt (greater than)
+
+\lineskip 1pt \normallineskip 1pt
+\def\baselinestretch{1}
+
+\def\@normalsize{\@setsize\normalsize{14.5pt}\xiipt\@xiipt
+\abovedisplayskip 12pt plus3pt minus7pt\belowdisplayskip \abovedisplayskip
+\abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
+minus3pt\let\@listi\@listI}
+\def\small{\@setsize\small{13.6pt}\xipt\@xipt
+\abovedisplayskip 11pt plus3pt minus6pt\belowdisplayskip \abovedisplayskip
+\abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
+minus3pt
+\def\@listi{\leftmargin\leftmargini \parsep 4.5pt plus 2pt minus 1pt \itemsep
+\parsep
+ \topsep 9pt plus 3pt minus 5pt}}
+\def\footnotesize{\@setsize\footnotesize{12pt}\xpt\@xpt
+\abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip
+\abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt minus3pt
+\def\@listi{\leftmargin\leftmargini \topsep 6pt plus 2pt minus 2pt\parsep 3pt
+plus 2pt minus 1pt
+\itemsep \parsep}}
+\def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt}
+\def\tiny{\@setsize\tiny{7pt}\vipt\@vipt}
+\def\large{\@setsize\large{18pt}\xivpt\@xivpt}
+\def\Large{\@setsize\Large{22pt}\xviipt\@xviipt}
+\def\LARGE{\@setsize\LARGE{25pt}\xxpt\@xxpt}
+\def\huge{\@setsize\huge{30pt}\xxvpt\@xxvpt}
+\let\Huge=\huge
+\normalsize
+
+\if@twoside \oddsidemargin 21pt \evensidemargin 59pt \marginparwidth 85pt
+\else \oddsidemargin 39.5pt \evensidemargin 39.5pt
+ \marginparwidth 68pt
+\fi
+\marginparsep 10pt
+ \topmargin 27pt \headheight 12pt \headsep 25pt \footskip 30pt
+
+\textheight = 36\baselineskip
+\advance\textheight by \topskip
+\textwidth 390pt \columnsep 10pt \columnseprule 0pt
+
+\footnotesep 8.4pt
+\skip\footins 10.8pt plus 4pt minus 2pt
+\floatsep 14pt plus 2pt minus 4pt \textfloatsep 20pt plus 2pt minus 4pt
+\intextsep 14pt plus 4pt minus 4pt \@maxsep 20pt \dblfloatsep 14pt plus 2pt
+minus 4pt \dbltextfloatsep 20pt plus 2pt minus 4pt \@dblmaxsep 20pt
+\@fptop 0pt plus 1fil \@fpsep 10pt plus 2fil \@fpbot 0pt plus 1fil
+\@dblfptop 0pt plus 1fil \@dblfpsep 10pt plus 2fil \@dblfpbot 0pt plus 1fil
+\marginparpush 7pt
+
+\parskip 0pt plus 1pt \parindent 1.5em \partopsep 3pt plus 2pt minus 2pt
+\@lowpenalty 51 \@medpenalty 151 \@highpenalty 301
+\@beginparpenalty -\@lowpenalty \@endparpenalty -\@lowpenalty \@itempenalty
+-\@lowpenalty
+
+
+\def\part{\par \addvspace{4ex} \@afterindentfalse \secdef\@part\@spart}
+\def\@part[#1]#2{\ifnum \c@secnumdepth \gt\m@ne \refstepcounter{part}
+\addcontentsline{toc}{part}{\thepart \hspace{1em}#1}\else
+\addcontentsline{toc}{part}{#1}\fi { \parindent 0pt \raggedright
+ \ifnum \c@secnumdepth \gt\m@ne \Large \grbf M'eroc \thepart \par\nobreak \fi \huge
+\grbf #2\markboth{}{}\par } \nobreak \vskip 3ex \@afterheading }
+\def\@spart#1{{\parindent 0pt \raggedright
+ \huge \grbf
+ #1\par} \nobreak \vskip 3ex \@afterheading }
+\def\section{\@startsection {section}{1}{\z@}{-3.5ex plus -1ex minus
+ -.2ex}{2.3ex plus .2ex}{\Large\grbf}}
+\def\subsection{\@startsection{subsection}{2}{\z@}{-3.25ex plus -1ex minus
+ -.2ex}{1.5ex plus .2ex}{\large\grbf}}
+\def\subsubsection{\@startsection{subsubsection}{3}{\z@}{-3.25ex plus
+ -1ex minus -.2ex}{1.5ex plus .2ex}{\normalsize\grbf}}
+\def\paragraph{\@startsection
+ {paragraph}{4}{\z@}{3.25ex plus 1ex minus .2ex}{-1em}{\normalsize\grbf}}
+\def\subparagraph{\@startsection
+ {subparagraph}{4}{\parindent}{3.25ex plus 1ex minus
+ .2ex}{-1em}{\normalsize\grbf}}
+
+
+\setcounter{secnumdepth}{3}
+
+\def\appendix{\par
+ \setcounter{section}{0}
+ \setcounter{subsection}{0}
+ \def\thesection{\Alphgr{section}}}
+
+
+\leftmargini 2.5em
+\leftmarginii 2.2em \leftmarginiii 1.87em \leftmarginiv 1.7em \leftmarginv 1em
+\leftmarginvi 1em
+\leftmargin\leftmargini
+\labelsep .5em
+\labelwidth\leftmargini\advance\labelwidth-\labelsep
+\def\@listI{\leftmargin\leftmargini \parsep 5pt plus 2.5pt minus 1pt\topsep
+10pt plus 4pt minus 6pt\itemsep 5pt plus 2.5pt minus 1pt}
+\let\@listi\@listI
+\@listi
+\def\@listii{\leftmargin\leftmarginii
+ \labelwidth\leftmarginii\advance\labelwidth-\labelsep
+ \topsep 5pt plus 2.5pt minus 1pt
+ \parsep 2.5pt plus 1pt minus 1pt
+ \itemsep \parsep}
+\def\@listiii{\leftmargin\leftmarginiii
+ \labelwidth\leftmarginiii\advance\labelwidth-\labelsep
+ \topsep 2.5pt plus 1pt minus 1pt
+ \parsep \z@ \partopsep 1pt plus 0pt minus 1pt
+ \itemsep \topsep}
+\def\@listiv{\leftmargin\leftmarginiv
+ \labelwidth\leftmarginiv\advance\labelwidth-\labelsep}
+\def\@listv{\leftmargin\leftmarginv
+ \labelwidth\leftmarginv\advance\labelwidth-\labelsep}
+\def\@listvi{\leftmargin\leftmarginvi
+ \labelwidth\leftmarginvi\advance\labelwidth-\labelsep}
+
diff --git a/fonts/greek/kd/latex/grarticle.sty b/fonts/greek/kd/latex/grarticle.sty
new file mode 100644
index 0000000000..b8a9fa15f8
--- /dev/null
+++ b/fonts/greek/kd/latex/grarticle.sty
@@ -0,0 +1,278 @@
+% grarticle.sty Oct 12, 1991. Based On Article.sty <16-Mar-88>
+% Used in conjuction with grlatex (files lgreek.tex, grfonts.tex, greek.sty)
+% and the KD family of fonts
+% Changes are enclosed in %** comments
+\typeout{Document Style `grarticle' Beta (2b) Version<13 Oct 91>.}
+%
+% Changes: $ ---> m@thm@de
+% < ---> \lt (less than)
+% > ---> \gt (greater than)
+% Enter a global greek mode
+%
+% **
+\input grmode.sty
+% **
+%
+\def\@ptsize{0} \@namedef{ds@11pt}{\def\@ptsize{1}}
+\@namedef{ds@12pt}{\def\@ptsize{2}}
+\def\ds@twoside{\@twosidetrue \@mparswitchtrue} \def\ds@draft{\overfullrule
+5pt}
+\@options
+% **
+\input grart1\@ptsize.sty\relax
+% **
+\def\labelenumi{\theenumi.}
+\def\theenumi{\arabic{enumi}}
+\def\labelenumii{(\theenumii)}
+% **
+\def\theenumii{\alphgr{enumii}}
+% **
+\def\p@enumii{\theenumi}
+\def\labelenumiii{\theenumiii.}
+\def\theenumiii{\roman{enumiii}}
+\def\p@enumiii{\theenumi(\theenumii)}
+\def\labelenumiv{\theenumiv.}
+% **
+\def\theenumiv{\Alphgr{enumiv}}
+% **
+\def\p@enumiv{\p@enumiii\theenumiii}
+% **
+\def\labelitemi{\m@thm@de\bullet\m@thm@de} % $ cjanged to internal \m@thm@de
+\def\labelitemii{\bf --}
+\def\labelitemiii{\m@thm@de\ast\m@thm@de}
+\def\labelitemiv{\m@thm@de\cdot\m@thm@de}
+% ^^^^^^^^^ ^^^^^^^^
+% **
+\def\verse{\let\\=\@centercr
+ \list{}{\itemsep\z@ \itemindent -1.5em\listparindent \itemindent
+ \rightmargin\leftmargin\advance\leftmargin 1.5em}\item[]}
+\let\endverse\endlist
+\def\quotation{\list{}{\listparindent 1.5em
+ \itemindent\listparindent
+ \rightmargin\leftmargin \parsep 0pt plus 1pt}\item[]}
+\let\endquotation=\endlist
+\def\quote{\list{}{\rightmargin\leftmargin}\item[]}
+\let\endquote=\endlist
+% **
+\def\descriptionlabel#1{\hspace\labelsep \grbf #1}
+% ** ^^^^^
+\def\description{\list{}{\labelwidth\z@ \itemindent-\leftmargin
+ \let\makelabel\descriptionlabel}}
+\let\enddescription\endlist
+
+
+\def\theequation{\arabic{equation}}
+
+\def\titlepage{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
+ \else \newpage \fi \thispagestyle{empty}\c@page\z@}
+\def\endtitlepage{\if@restonecol\twocolumn \else \newpage \fi}
+
+\arraycolsep 5pt \tabcolsep 6pt \arrayrulewidth .4pt \doublerulesep 2pt
+\tabbingsep \labelsep
+
+\skip\@mpfootins = \skip\footins
+\fboxsep = 3pt \fboxrule = .4pt
+
+\newcounter{part}
+\newcounter {section}
+\newcounter {subsection}[section]
+\newcounter {subsubsection}[subsection]
+\newcounter {paragraph}[subsubsection]
+\newcounter {subparagraph}[paragraph]
+
+\def\thepart{\Roman{part}} \def\thesection {\arabic{section}}
+\def\thesubsection {\thesection.\arabic{subsection}}
+\def\thesubsubsection {\thesubsection .\arabic{subsubsection}}
+\def\theparagraph {\thesubsubsection.\arabic{paragraph}}
+\def\thesubparagraph {\theparagraph.\arabic{subparagraph}}
+
+\def\@pnumwidth{1.55em}
+\def\@tocrmarg {2.55em}
+\def\@dotsep{4.5}
+\setcounter{tocdepth}{3}
+% **
+\def\tableofcontents{\section*{Perieq'omena\@mkboth{PERIEQOMENA}{PERIEQOMENA}}
+% ^^^^^^^^^^^^ ^^^^^^^^^^^ ^^^^^^^^^^^
+ \@starttoc{toc}}
+\def\l@part#1#2{\addpenalty{\@secpenalty}
+ \addvspace{2.25em plus 1pt} \begingroup
+ \@tempdima 3em \parindent \z@ \rightskip \@pnumwidth \parfillskip
+-\@pnumwidth
+ {\large \grbf \leavevmode #1\hfil \hbox to\@pnumwidth{\hss #2}}\par
+% ^^^^^
+ \nobreak \endgroup}
+\def\l@section#1#2{\addpenalty{\@secpenalty} \addvspace{1.0em plus 1pt}
+\@tempdima 1.5em \begingroup
+ \parindent \z@ \rightskip \@pnumwidth
+ \parfillskip -\@pnumwidth
+ \grbf\leavevmode \advance\leftskip\@tempdima \hskip -\leftskip #1\nobreak\hfil
+% ^^^^
+\nobreak\hbox to\@pnumwidth{\hss #2}\par
+ \endgroup}
+% **
+
+\def\l@subsection{\@dottedtocline{2}{1.5em}{2.3em}}
+\def\l@subsubsection{\@dottedtocline{3}{3.8em}{3.2em}}
+\def\l@paragraph{\@dottedtocline{4}{7.0em}{4.1em}}
+\def\l@subparagraph{\@dottedtocline{5}{10em}{5em}}
+% **
+\def\listoffigures{\section*{Eik'onec\@mkboth
+% ^^^^^^^^
+ {EIKONES}{EIKONES}}\@starttoc{lof}}
+% ^^^^^^^ ^^^^^^^
+\def\l@figure{\@dottedtocline{1}{1.5em}{2.3em}}
+\def\listoftables{\section*{P'inakec\@mkboth
+% ^^^^^^^^
+ {PINAKES}{PINAKES}}\@starttoc{lot}}
+% ^^^^^^^ ^^^^^^^
+\let\l@table\l@figure
+
+
+\def\thebibliography#1{\section*{Parapomp'ec\@mkboth
+% ^^^^^^^^^^^
+ {PARAPOMPES}{PARAPOMPES}}\list
+% ^^^^^^^^^^ ^^^^^^^^^^
+ {[\arabic{enumi}]}{\settowidth\labelwidth{[#1]}\leftmargin\labelwidth
+ \advance\leftmargin\labelsep
+ \usecounter{enumi}}
+ \def\newblock{\hskip .11em plus .33em minus .07em}
+ \sloppy\clubpenalty4000\widowpenalty4000
+ \sfcode`\.=1000\relax}
+\let\endthebibliography=\endlist
+
+
+\newif\if@restonecol
+\def\theindex{\@restonecoltrue\if@twocolumn\@restonecolfalse\fi
+\columnseprule \z@
+\columnsep 35pt\twocolumn[\section*{Euret'hrio}]
+% ^^^^^^^^^^
+ \@mkboth{EURETHRIO}{EURETHRIO}\thispagestyle{plain}\parindent\z@
+% ^^^^^^^^^ ^^^^^^^^^
+ \parskip\z@ plus .3pt\relax\let\item\@idxitem}
+\def\@idxitem{\par\hangindent 40pt}
+\def\subitem{\par\hangindent 40pt \hspace*{20pt}}
+\def\subsubitem{\par\hangindent 40pt \hspace*{30pt}}
+\def\endtheindex{\if@restonecol\onecolumn\else\clearpage\fi}
+\def\indexspace{\par \vskip 10pt plus 5pt minus 3pt\relax}
+
+\def\footnoterule{\kern-3\p@
+ \hrule width .4\columnwidth
+ \kern 2.6\p@}
+
+\long\def\@makefntext#1{\parindent 1em\noindent
+ \hbox to 1.8em{\hss\m@thm@de^{\@thefnmark}\m@thm@de}#1}
+% ^^^^^^^^ ^^^^^^^^^
+% **
+
+\setcounter{topnumber}{2}
+\def\topfraction{.7}
+\setcounter{bottomnumber}{1}
+\def\bottomfraction{.3}
+\setcounter{totalnumber}{3}
+\def\textfraction{.2}
+\def\floatpagefraction{.5}
+\setcounter{dbltopnumber}{2}
+\def\dbltopfraction{.7}
+\def\dblfloatpagefraction{.5}
+
+\long\def\@makecaption#1#2{
+ \vskip 10pt
+ \setbox\@tempboxa\hbox{#1: #2}
+ \ifdim \wd\@tempboxa \gt\hsize #1: #2\par \else \hbox
+to\hsize{\hfil\box\@tempboxa\hfil}
+ \fi}
+
+
+\newcounter{figure}
+\def\thefigure{\@arabic\c@figure}
+\def\fps@figure{tbp}
+\def\ftype@figure{1}
+\def\ext@figure{lof}
+% **
+\def\fnum@figure{Eik'ona \thefigure}
+% ^^^^^^^
+% **
+\def\figure{\@float{figure}}
+\let\endfigure\end@float
+\@namedef{figure*}{\@dblfloat{figure}}
+\@namedef{endfigure*}{\end@dblfloat}
+\newcounter{table}
+\def\thetable{\@arabic\c@table}
+\def\fps@table{tbp}
+\def\ftype@table{2}
+\def\ext@table{lot}
+% **
+\def\fnum@table{P'inakac \thetable}
+% ^^^^^^^^
+% **
+\def\table{\@float{table}}
+\let\endtable\end@float
+\@namedef{table*}{\@dblfloat{table}}
+\@namedef{endtable*}{\end@dblfloat}
+
+
+\def\maketitle{\par
+ \begingroup
+ \def\thefootnote{\fnsymbol{footnote}}
+ \def\@makefnmark{\hbox
+ to 0pt{\m@thm@de^{\@thefnmark}\m@thm@de\hss}}
+ \if@twocolumn
+ \twocolumn[\@maketitle]
+ \else \newpage
+ \global\@topnum\z@ \@maketitle \fi\thispagestyle{plain}\@thanks
+ \endgroup
+ \setcounter{footnote}{0}
+ \let\maketitle\relax
+ \let\@maketitle\relax
+ \gdef\@thanks{}\gdef\@author{}\gdef\@title{}\let\thanks\relax}
+\def\@maketitle{\newpage
+ \null
+ \vskip 2em \begin{center}
+ {\LARGE \@title \par} \vskip 1.5em {\large \lineskip .5em
+\begin{tabular}[t]{c}\@author
+ \end{tabular}\par}
+ \vskip 1em {\large \@date} \end{center}
+ \par
+ \vskip 1.5em}
+% **
+\def\abstract{\if@twocolumn
+\section*{Per'ilhyh}
+% ^^^^^^^^^
+\else \small
+\begin{center}
+{\grbf Per'ilhyh\vspace{-.5em}\vspace{0pt}}
+%^^^^^ ^^^^^^^^^
+% **
+\end{center}
+\quotation
+\fi}
+\def\endabstract{\if@twocolumn\else\endquotation\fi}
+
+\mark{{}{}}
+% **
+% any sl, bf etc changed to grsl, grbf etc...
+\if@twoside \def\ps@headings{\let\@mkboth\markboth
+\def\@oddfoot{}\def\@evenfoot{}\def\@evenhead{\gr \thepage\hfil \grsl
+\leftmark}\def\@oddhead{\hbox{}\grsl \rightmark \hfil
+\gr\thepage}\def\sectionmark##1{\markboth {\uppercase{\ifnum \c@secnumdepth
+\gt\z@
+ \thesection\hskip 1em\relax \fi ##1}}{}}\def\subsectionmark##1{\markright
+{\ifnum \c@secnumdepth \gt\@ne
+ \thesubsection\hskip 1em\relax \fi ##1}}}
+\else \def\ps@headings{\let\@mkboth\markboth
+\def\@oddfoot{}\def\@evenfoot{}\def\@oddhead{\hbox {}\grsl \rightmark \hfil
+\gr\thepage}\def\sectionmark##1{\markright {\uppercase{\ifnum \c@secnumdepth
+\gt\z@
+ \thesection\hskip 1em\relax \fi ##1}}}}
+\fi
+\def\ps@myheadings{\let\@mkboth\@gobbletwo
+\def\@oddhead{\hbox{}\grsl\rightmark \hfil
+\gr\thepage}\def\@oddfoot{}\def\@evenhead{\gr \thepage\hfil\grsl\leftmark\hbox
+{}}\def\@evenfoot{}\def\sectionmark##1{}\def\subsectionmark##1{}}
+% **
+
+\ps@plain \pagenumbering{arabic} \onecolumn \if@twoside\else\raggedbottom\fi
+
+
+
+
diff --git a/fonts/greek/kd/latex/grbk10.sty b/fonts/greek/kd/latex/grbk10.sty
new file mode 100644
index 0000000000..3c7790dfdb
--- /dev/null
+++ b/fonts/greek/kd/latex/grbk10.sty
@@ -0,0 +1,130 @@
+% grbk10.sty 130Oct-1991
+% based on bk10.sty 19-Jan-88 modified for international usage
+%
+
+\lineskip 1pt \normallineskip 1pt
+\def\baselinestretch{1}
+
+\def\@normalsize{\@setsize\normalsize{12pt}\xpt\@xpt
+\abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip
+\abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt
+minus3pt\let\@listi\@listI}
+\def\small{\@setsize\small{11pt}\ixpt\@ixpt
+\abovedisplayskip 8.5pt plus 3pt minus 4pt\belowdisplayskip \abovedisplayskip
+\abovedisplayshortskip \z@ plus2pt\belowdisplayshortskip 4pt plus2pt minus 2pt
+\def\@listi{\leftmargin\leftmargini \topsep 4pt plus 2pt minus 2pt\parsep 2pt
+plus 1pt minus 1pt
+\itemsep \parsep}}
+\def\footnotesize{\@setsize\footnotesize{9.5pt}\viiipt\@viiipt
+\abovedisplayskip 6pt plus 2pt minus 4pt\belowdisplayskip \abovedisplayskip
+\abovedisplayshortskip \z@ plus 1pt\belowdisplayshortskip 3pt plus 1pt minus
+2pt
+\def\@listi{\leftmargin\leftmargini \topsep 3pt plus 1pt minus 1pt\parsep 2pt
+plus 1pt minus 1pt
+\itemsep \parsep}}
+\def\scriptsize{\@setsize\scriptsize{8pt}\viipt\@viipt}
+\def\tiny{\@setsize\tiny{6pt}\vpt\@vpt}
+\def\large{\@setsize\large{14pt}\xiipt\@xiipt}
+\def\Large{\@setsize\Large{18pt}\xivpt\@xivpt}
+\def\LARGE{\@setsize\LARGE{22pt}\xviipt\@xviipt}
+\def\huge{\@setsize\huge{25pt}\xxpt\@xxpt}
+\def\Huge{\@setsize\Huge{30pt}\xxvpt\@xxvpt}
+\normalsize
+\oddsidemargin .5in \evensidemargin 1.5in
+\marginparwidth .75in \marginparsep 7pt
+ \topmargin .75in \headheight 12pt \headsep .25in \footskip .35in
+
+\textheight = 41\baselineskip
+\advance\textheight by \topskip
+\textwidth 4.5in \columnsep 10pt \columnseprule 0pt
+
+\footnotesep 6.65pt
+\skip\footins 9pt plus 4pt minus 2pt
+\floatsep 12pt plus 2pt minus 2pt \textfloatsep 20pt plus 2pt minus 4pt
+\intextsep 12pt plus 2pt minus 2pt \@maxsep 20pt \dblfloatsep 12pt plus 2pt
+minus 2pt \dbltextfloatsep 20pt plus 2pt minus 4pt \@dblmaxsep 20pt
+\@fptop 0pt plus 1fil \@fpsep 8pt plus 2fil \@fpbot 0pt plus 1fil
+\@dblfptop 0pt plus 1fil \@dblfpsep 8pt plus 2fil \@dblfpbot 0pt plus 1fil
+\marginparpush 5pt
+\parskip 0pt plus 1pt \parindent 15pt \partopsep 2pt plus 1pt minus 1pt
+\@lowpenalty 51 \@medpenalty 151 \@highpenalty 301
+\@beginparpenalty -\@lowpenalty \@endparpenalty -\@lowpenalty \@itempenalty
+-\@lowpenalty
+
+\def\@makechapterhead#1{ \vspace*{50pt} { \parindent 0pt \raggedright
+ \ifnum \c@secnumdepth \gt\m@ne \huge\grbf \@chapapp{} \thechapter \par
+ \vskip 20pt \fi \Huge \grbf #1\par
+ \nobreak \vskip 40pt } }
+
+\def\@makeschapterhead#1{ \vspace*{50pt} { \parindent 0pt \raggedright
+ \Huge \grbf #1\par
+ \nobreak \vskip 40pt } }
+
+\def\chapter{\cleardoublepage \thispagestyle{plain} \global\@topnum\z@
+\@afterindentfalse \secdef\@chapter\@schapter}
+\def\@chapter[#1]#2{\ifnum \c@secnumdepth \gt\m@ne
+ \refstepcounter{chapter}
+ \typeout{\@chapapp\space\thechapter.}
+ \addcontentsline{toc}{chapter}{\protect
+ \numberline{\thechapter}#1}\else
+ \addcontentsline{toc}{chapter}{#1}\fi
+ \chaptermark{#1}
+ \addtocontents{lof}{\protect\addvspace{10pt}}
+\addtocontents{lot}{\protect\addvspace{10pt}} \if@twocolumn
+\@topnewpage[\@makechapterhead{#2}]
+ \else \@makechapterhead{#2}
+ \@afterheading \fi}
+\def\@schapter#1{\if@twocolumn \@topnewpage[\@makeschapterhead{#1}]
+ \else \@makeschapterhead{#1}
+ \@afterheading\fi}
+
+\def\section{\@startsection {section}{1}{\z@}{-3.5ex plus -1ex minus
+ -.2ex}{2.3ex plus .2ex}{\Large\grbf}}
+\def\subsection{\@startsection{subsection}{2}{\z@}{-3.25ex plus -1ex minus
+ -.2ex}{1.5ex plus .2ex}{\large\grbf}}
+\def\subsubsection{\@startsection{subsubsection}{3}{\z@}{-3.25ex plus
+-1ex minus -.2ex}{1.5ex plus .2ex}{\normalsize\grbf}}
+\def\paragraph{\@startsection
+ {paragraph}{4}{\z@}{3.25ex plus 1ex minus .2ex}{-1em}{\normalsize\grbf}}
+\def\subparagraph{\@startsection
+ {subparagraph}{4}{\parindent}{3.25ex plus 1ex minus
+ .2ex}{-1em}{\normalsize\grbf}}
+
+\def\chaptermark#1{}
+
+\setcounter{secnumdepth}{2}
+
+\def\appendixname{Par'arthma} % <-----------
+\def\appendix{\par
+ \setcounter{chapter}{0}
+ \setcounter{section}{0}
+ \def\@chapapp{\appendixname}
+ \def\thechapter{\Alphgr{chapter}}}
+
+\leftmargini 25pt
+\leftmarginii 22pt \leftmarginiii 18.7pt \leftmarginiv 17pt \leftmarginv 10pt
+\leftmarginvi 10pt
+\leftmargin\leftmargini
+\labelsep 5pt
+\labelwidth\leftmargini\advance\labelwidth-\labelsep
+\def\@listI{\leftmargin\leftmargini \parsep 4pt plus 2pt minus 1pt\topsep 8pt
+plus 2pt minus 4pt\itemsep 4pt plus 2pt minus 1pt}
+\let\@listi\@listI
+\@listi
+\def\@listii{\leftmargin\leftmarginii
+ \labelwidth\leftmarginii\advance\labelwidth-\labelsep
+ \topsep 4pt plus 2pt minus 1pt
+ \parsep 2pt plus 1pt minus 1pt
+ \itemsep \parsep}
+\def\@listiii{\leftmargin\leftmarginiii
+ \labelwidth\leftmarginiii\advance\labelwidth-\labelsep
+ \topsep 2pt plus 1pt minus 1pt
+ \parsep \z@ \partopsep 1pt plus 0pt minus 1pt
+ \itemsep \topsep}
+\def\@listiv{\leftmargin\leftmarginiv
+ \labelwidth\leftmarginiv\advance\labelwidth-\labelsep}
+\def\@listv{\leftmargin\leftmarginv
+ \labelwidth\leftmarginv\advance\labelwidth-\labelsep}
+\def\@listvi{\leftmargin\leftmarginvi
+ \labelwidth\leftmarginvi\advance\labelwidth-\labelsep}
+
diff --git a/fonts/greek/kd/latex/grbk11.sty b/fonts/greek/kd/latex/grbk11.sty
new file mode 100644
index 0000000000..4482b6bf28
--- /dev/null
+++ b/fonts/greek/kd/latex/grbk11.sty
@@ -0,0 +1,130 @@
+% grbk11.sty 13 Oct-1991
+% based on bk11.sty 19-Jan-88 modified for international usage
+%
+
+\lineskip 1pt \normallineskip 1pt
+\def\baselinestretch{1}
+
+\def\@normalsize{\@setsize\normalsize{13.6pt}\xipt\@xipt
+\abovedisplayskip 11pt plus3pt minus6pt\belowdisplayskip \abovedisplayskip
+\abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
+minus3pt\let\@listi\@listI}
+\def\small{\@setsize\small{12pt}\xpt\@xpt
+\abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip
+\abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt minus3pt
+\def\@listi{\leftmargin\leftmargini \topsep 6pt plus 2pt minus 2pt\parsep 3pt
+plus 2pt minus 1pt
+\itemsep \parsep}}
+\def\footnotesize{\@setsize\footnotesize{11pt}\ixpt\@ixpt
+\abovedisplayskip 8pt plus 2pt minus 4pt\belowdisplayskip \abovedisplayskip
+\abovedisplayshortskip \z@ plus 1pt\belowdisplayshortskip 4pt plus 2pt minus
+2pt
+\def\@listi{\leftmargin\leftmargini \topsep 4pt plus 2pt minus 2pt\parsep 2pt
+plus 1pt minus 1pt
+\itemsep \parsep}}
+\def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt}
+\def\tiny{\@setsize\tiny{7pt}\vipt\@vipt}
+\def\large{\@setsize\large{14pt}\xiipt\@xiipt}
+\def\Large{\@setsize\Large{18pt}\xivpt\@xivpt}
+\def\LARGE{\@setsize\LARGE{22pt}\xviipt\@xviipt}
+\def\huge{\@setsize\huge{25pt}\xxpt\@xxpt}
+\def\Huge{\@setsize\Huge{30pt}\xxvpt\@xxvpt}
+\normalsize
+\oddsidemargin .25in \evensidemargin 1.25in
+\marginparwidth 1in \marginparsep 7pt
+ \topmargin .73in \headheight 12pt \headsep .275in \footskip .38in
+
+\textheight = 38\baselineskip
+\advance\textheight by \topskip
+\textwidth 5in \columnsep 10pt \columnseprule 0pt
+
+\footnotesep 7.7pt
+\skip\footins 10pt plus 4pt minus 2pt
+\floatsep 12pt plus 2pt minus 2pt \textfloatsep 20pt plus 2pt minus 4pt
+\intextsep 12pt plus 2pt minus 2pt \@maxsep 20pt \dblfloatsep 12pt plus 2pt
+minus 2pt \dbltextfloatsep 20pt plus 2pt minus 4pt \@dblmaxsep 20pt
+\@fptop 0pt plus 1fil \@fpsep 8pt plus 2fil \@fpbot 0pt plus 1fil
+\@dblfptop 0pt plus 1fil \@dblfpsep 8pt plus 2fil \@dblfpbot 0pt plus 1fil
+\marginparpush 5pt
+\parskip 0pt plus 1pt \parindent 17pt \partopsep 3pt plus 1pt minus 2pt
+\@lowpenalty 51 \@medpenalty 151 \@highpenalty 301
+\@beginparpenalty -\@lowpenalty \@endparpenalty -\@lowpenalty \@itempenalty
+-\@lowpenalty
+
+\def\@makechapterhead#1{ \vspace*{50pt} { \parindent 0pt \raggedright
+ \ifnum \c@secnumdepth \gt\m@ne \huge\grbf \@chapapp{} \thechapter \par
+ \vskip 20pt \fi \Huge \grbf #1\par
+ \nobreak \vskip 40pt } }
+
+\def\@makeschapterhead#1{ \vspace*{50pt} { \parindent 0pt \raggedright
+ \Huge \grbf #1\par
+ \nobreak \vskip 40pt } }
+
+\def\chapter{\cleardoublepage \thispagestyle{plain} \global\@topnum\z@
+\@afterindentfalse \secdef\@chapter\@schapter}
+\def\@chapter[#1]#2{\ifnum \c@secnumdepth \gt\m@ne
+ \refstepcounter{chapter}
+ \typeout{\@chapapp\space\thechapter.}
+ \addcontentsline{toc}{chapter}{\protect
+ \numberline{\thechapter}#1}\else
+ \addcontentsline{toc}{chapter}{#1}\fi
+ \chaptermark{#1}
+ \addtocontents{lof}{\protect\addvspace{10pt}}
+\addtocontents{lot}{\protect\addvspace{10pt}} \if@twocolumn
+\@topnewpage[\@makechapterhead{#2}]
+ \else \@makechapterhead{#2}
+ \@afterheading \fi}
+\def\@schapter#1{\if@twocolumn \@topnewpage[\@makeschapterhead{#1}]
+ \else \@makeschapterhead{#1}
+ \@afterheading\fi}
+
+\def\section{\@startsection {section}{1}{\z@}{-3.5ex plus -1ex minus
+ -.2ex}{2.3ex plus .2ex}{\Large\grbf}}
+\def\subsection{\@startsection{subsection}{2}{\z@}{-3.25ex plus -1ex minus
+ -.2ex}{1.5ex plus .2ex}{\large\grbf}}
+\def\subsubsection{\@startsection{subsubsection}{3}{\z@}{-3.25ex plus
+ -1ex minus -.2ex}{1.5ex plus .2ex}{\normalsize\grbf}}
+\def\paragraph{\@startsection
+ {paragraph}{4}{\z@}{3.25ex plus 1ex minus .2ex}{-1em}{\normalsize\grbf}}
+\def\subparagraph{\@startsection
+ {subparagraph}{4}{\parindent}{3.25ex plus 1ex minus
+ .2ex}{-1em}{\normalsize\grbf}}
+
+\def\chaptermark#1{}
+
+\setcounter{secnumdepth}{2}
+
+\def\appendixname{Par'arthma} % <-----------
+\def\appendix{\par
+ \setcounter{chapter}{0}
+ \setcounter{section}{0}
+ \def\@chapapp{\appendixname}
+ \def\thechapter{\Alphgr{chapter}}}
+
+\leftmargini 2.5em
+\leftmarginii 2.2em \leftmarginiii 1.87em \leftmarginiv 1.7em \leftmarginv 1em
+\leftmarginvi 1em
+\leftmargin\leftmargini
+\labelsep .5em
+\labelwidth\leftmargini\advance\labelwidth-\labelsep
+\def\@listI{\leftmargin\leftmargini \parsep 4.5pt plus 2pt minus 1pt\topsep
+9pt plus 3pt minus 5pt\itemsep 4.5pt plus 2pt minus 1pt}
+\let\@listi\@listI
+\@listi
+\def\@listii{\leftmargin\leftmarginii
+ \labelwidth\leftmarginii\advance\labelwidth-\labelsep
+ \topsep 4.5pt plus 2pt minus 1pt
+ \parsep 2pt plus 1pt minus 1pt
+ \itemsep \parsep}
+\def\@listiii{\leftmargin\leftmarginiii
+ \labelwidth\leftmarginiii\advance\labelwidth-\labelsep
+ \topsep 2pt plus 1pt minus 1pt
+ \parsep \z@ \partopsep 1pt plus 0pt minus 1pt
+ \itemsep \topsep}
+\def\@listiv{\leftmargin\leftmarginiv
+ \labelwidth\leftmarginiv\advance\labelwidth-\labelsep}
+\def\@listv{\leftmargin\leftmarginv
+ \labelwidth\leftmarginv\advance\labelwidth-\labelsep}
+\def\@listvi{\leftmargin\leftmarginvi
+ \labelwidth\leftmarginvi\advance\labelwidth-\labelsep}
+
diff --git a/fonts/greek/kd/latex/grbk12.sty b/fonts/greek/kd/latex/grbk12.sty
new file mode 100644
index 0000000000..8126a34144
--- /dev/null
+++ b/fonts/greek/kd/latex/grbk12.sty
@@ -0,0 +1,130 @@
+% grbk11.sty 13 Oct-1991
+% based on bk12.sty 19-Jan-88 modified for international usage
+%
+
+\lineskip 1pt \normallineskip 1pt
+\def\baselinestretch{1}
+
+\def\@normalsize{\@setsize\normalsize{14.5pt}\xiipt\@xiipt
+\abovedisplayskip 12pt plus3pt minus7pt\belowdisplayskip \abovedisplayskip
+\abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
+minus3pt\let\@listi\@listI}
+\def\small{\@setsize\small{13.6pt}\xipt\@xipt
+\abovedisplayskip 11pt plus3pt minus6pt\belowdisplayskip \abovedisplayskip
+\abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
+minus3pt
+\def\@listi{\leftmargin\leftmargini \parsep 4.5pt plus 2pt minus 1pt
+ \itemsep \parsep
+ \topsep 9pt plus 3pt minus 5pt}}
+\def\footnotesize{\@setsize\footnotesize{12pt}\xpt\@xpt
+\abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip
+\abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt minus3pt
+\def\@listi{\leftmargin\leftmargini \topsep 6pt plus 2pt minus 2pt\parsep 3pt
+plus 2pt minus 1pt
+\itemsep \parsep}}
+\def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt}
+\def\tiny{\@setsize\tiny{7pt}\vipt\@vipt}
+\def\large{\@setsize\large{18pt}\xivpt\@xivpt}
+\def\Large{\@setsize\Large{22pt}\xviipt\@xviipt}
+\def\LARGE{\@setsize\LARGE{25pt}\xxpt\@xxpt}
+\def\huge{\@setsize\huge{30pt}\xxvpt\@xxvpt}
+\let\Huge=\huge
+\normalsize
+\oddsidemargin .25in \evensidemargin 1.25in
+\marginparwidth 1in \marginparsep 7pt
+ \topmargin .73in \headheight 12pt \headsep .275in \footskip 30pt
+
+\textheight = 36\baselineskip
+\advance\textheight by \topskip
+\textwidth 5in \columnsep 10pt \columnseprule 0pt
+
+\footnotesep 8.4pt
+\skip\footins 10.8pt plus 4pt minus 2pt
+\floatsep 14pt plus 2pt minus 4pt \textfloatsep 20pt plus 2pt minus 4pt
+\intextsep 14pt plus 4pt minus 4pt \@maxsep 20pt \dblfloatsep 14pt plus 2pt
+minus 4pt \dbltextfloatsep 20pt plus 2pt minus 4pt \@dblmaxsep 20pt
+\@fptop 0pt plus 1fil \@fpsep 10pt plus 2fil \@fpbot 0pt plus 1fil
+\@dblfptop 0pt plus 1fil \@dblfpsep 10pt plus 2fil \@dblfpbot 0pt plus 1fil
+\marginparpush 7pt
+\parskip 0pt plus 1pt \parindent 1.5em \partopsep 3pt plus 2pt minus 2pt
+\@lowpenalty 51 \@medpenalty 151 \@highpenalty 301
+\@beginparpenalty -\@lowpenalty \@endparpenalty -\@lowpenalty \@itempenalty
+-\@lowpenalty
+
+\def\@makechapterhead#1{ \vspace*{50pt} { \parindent 0pt \raggedright
+ \ifnum \c@secnumdepth \gt\m@ne \huge\grbf \@chapapp{} \thechapter \par
+ \vskip 20pt \fi \Huge \grbf #1\par
+ \nobreak \vskip 40pt } }
+
+\def\@makeschapterhead#1{ \vspace*{50pt} { \parindent 0pt \raggedright
+ \Huge \grbf #1\par
+ \nobreak \vskip 40pt } }
+
+\def\chapter{\cleardoublepage \thispagestyle{plain} \global\@topnum\z@
+\@afterindentfalse \secdef\@chapter\@schapter}
+\def\@chapter[#1]#2{\ifnum \c@secnumdepth \gt\m@ne
+ \refstepcounter{chapter}
+ \typeout{\@chapapp\space\thechapter.}
+ \addcontentsline{toc}{chapter}{\protect
+ \numberline{\thechapter}#1}\else
+ \addcontentsline{toc}{chapter}{#1}\fi
+ \chaptermark{#1}
+ \addtocontents{lof}{\protect\addvspace{10pt}}
+\addtocontents{lot}{\protect\addvspace{10pt}} \if@twocolumn
+\@topnewpage[\@makechapterhead{#2}]
+ \else \@makechapterhead{#2}
+ \@afterheading \fi}
+\def\@schapter#1{\if@twocolumn \@topnewpage[\@makeschapterhead{#1}]
+ \else \@makeschapterhead{#1}
+ \@afterheading\fi}
+
+\def\section{\@startsection {section}{1}{\z@}{-3.5ex plus -1ex minus
+ -.2ex}{2.3ex plus .2ex}{\Large\grbf}}
+\def\subsection{\@startsection{subsection}{2}{\z@}{-3.25ex plus -1ex minus
+ -.2ex}{1.5ex plus .2ex}{\large\grbf}}
+\def\subsubsection{\@startsection{subsubsection}{3}{\z@}{-3.25ex plus
+ -1ex minus -.2ex}{1.5ex plus .2ex}{\normalsize\grbf}}
+\def\paragraph{\@startsection
+ {paragraph}{4}{\z@}{3.25ex plus 1ex minus .2ex}{-1em}{\normalsize\grbf}}
+\def\subparagraph{\@startsection
+ {subparagraph}{4}{\parindent}{3.25ex plus 1ex minus
+ .2ex}{-1em}{\normalsize\grbf}}
+
+\def\chaptermark#1{}
+
+\setcounter{secnumdepth}{2}
+
+\def\appendixname{Par'arthma} % <-----------
+\def\appendix{\par
+ \setcounter{chapter}{0}
+ \setcounter{section}{0}
+ \def\@chapapp{\appendixname}
+ \def\thechapter{\Alphgr{chapter}}}
+
+\leftmargini 2.5em
+\leftmarginii 2.2em \leftmarginiii 1.87em \leftmarginiv 1.7em \leftmarginv 1em
+\leftmarginvi 1em
+\leftmargin\leftmargini
+\labelsep .5em
+\labelwidth\leftmargini\advance\labelwidth-\labelsep
+\def\@listI{\leftmargin\leftmargini \parsep 5pt plus 2.5pt minus 1pt\topsep
+10pt plus 4pt minus 6pt\itemsep 5pt plus 2.5pt minus 1pt}
+\let\@listi\@listI
+\@listi
+\def\@listii{\leftmargin\leftmarginii
+ \labelwidth\leftmarginii\advance\labelwidth-\labelsep
+ \topsep 5pt plus 2.5pt minus 1pt
+ \parsep 2.5pt plus 1pt minus 1pt
+ \itemsep \parsep}
+\def\@listiii{\leftmargin\leftmarginiii
+ \labelwidth\leftmarginiii\advance\labelwidth-\labelsep
+ \topsep 2.5pt plus 1pt minus 1pt
+ \parsep \z@ \partopsep 1pt plus 0pt minus 1pt
+ \itemsep \topsep}
+\def\@listiv{\leftmargin\leftmarginiv
+ \labelwidth\leftmarginiv\advance\labelwidth-\labelsep}
+\def\@listv{\leftmargin\leftmarginv
+ \labelwidth\leftmarginv\advance\labelwidth-\labelsep}
+\def\@listvi{\leftmargin\leftmarginvi
+ \labelwidth\leftmarginvi\advance\labelwidth-\labelsep}
+
diff --git a/fonts/greek/kd/latex/grbook.sty b/fonts/greek/kd/latex/grbook.sty
new file mode 100644
index 0000000000..64fc082e4a
--- /dev/null
+++ b/fonts/greek/kd/latex/grbook.sty
@@ -0,0 +1,254 @@
+% grbook.sty 13-Oct-1991
+% based on book.sty 13-Jun-89 modified for international usage
+%
+% Modified by K J Dryllerakis
+
+\typeout{Document Style `grbook' Beta (1a) Version <13 Oct 1991>.}
+
+\input grmode.sty
+
+\def\@ptsize{0} \@namedef{ds@11pt}{\def\@ptsize{1}}
+\@namedef{ds@12pt}{\def\@ptsize{2}}
+\@twosidetrue \@mparswitchtrue \def\ds@draft{\overfullrule 5pt}
+\@options
+\input grbk1\@ptsize.sty\relax
+
+\def\labelenumi{\theenumi.}
+\def\theenumi{\arabic{enumi}}
+\def\labelenumii{(\theenumii)}
+\def\theenumii{\alphgr{enumii}}
+\def\p@enumii{\theenumi}
+\def\labelenumiii{\theenumiii.}
+\def\theenumiii{\roman{enumiii}}
+\def\p@enumiii{\theenumi(\theenumii)}
+\def\labelenumiv{\theenumiv.}
+\def\theenumiv{\Alphgr{enumiv}}
+\def\p@enumiv{\p@enumiii\theenumiii}
+
+\def\labelitemi{\m@thm@de\bullet\m@thm@de}
+\def\labelitemii{\bf --}
+\def\labelitemiii{\m@thm@de\ast\m@thm@de}
+\def\labelitemiv{\m@thm@de\cdot\m@thm@de}
+
+\def\verse{\let\\=\@centercr
+ \list{}{\itemsep\z@ \itemindent -1.5em\listparindent \itemindent
+ \rightmargin\leftmargin\advance\leftmargin 1.5em}\item[]}
+\let\endverse\endlist
+\def\quotation{\list{}{\listparindent 1.5em
+ \itemindent\listparindent
+ \rightmargin\leftmargin\parsep 0pt plus 1pt}\item[]}
+\let\endquotation=\endlist
+\def\quote{\list{}{\rightmargin\leftmargin}\item[]}
+\let\endquote=\endlist
+
+\def\descriptionlabel#1{\hspace\labelsep \grbf #1}
+\def\description{\list{}{\labelwidth\z@ \itemindent-\leftmargin
+ \let\makelabel\descriptionlabel}}
+\let\enddescription\endlist
+\newdimen\descriptionmargin
+\descriptionmargin=3em
+
+\def\titlepage{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
+ \else \newpage \fi \thispagestyle{empty}\c@page\z@}
+\def\endtitlepage{\if@restonecol\twocolumn \else \newpage \fi}
+
+\arraycolsep 5pt \tabcolsep 6pt \arrayrulewidth .4pt \doublerulesep 2pt
+\tabbingsep \labelsep
+\skip\@mpfootins = \skip\footins
+\fboxsep = 3pt \fboxrule = .4pt
+\newcounter{part}
+\newcounter {chapter}
+\newcounter {section}[chapter]
+\newcounter {subsection}[section]
+\newcounter {subsubsection}[subsection]
+\newcounter {paragraph}[subsubsection]
+\newcounter {subparagraph}[paragraph]
+
+\def\thepart {\Roman{part}}
+\def\thechapter {\arabic{chapter}}
+\def\thesection {\thechapter.\arabic{section}}
+\def\thesubsection {\thesection.\arabic{subsection}}
+\def\thesubsubsection {\thesubsection .\arabic{subsubsection}}
+\def\theparagraph {\thesubsubsection.\arabic{paragraph}}
+\def\thesubparagraph {\theparagraph.\arabic{subparagraph}}
+\def\chaptername{Kef'alaio} % <----------
+\def\@chapapp{\chaptername}
+
+\def\part{\cleardoublepage \thispagestyle{plain} \if@twocolumn \onecolumn
+\@tempswatrue \else \@tempswafalse \fi \hbox{}\vfil \secdef\@part\@spart}
+
+\def\partname{M'eroc} % <----------
+\def\@part[#1]#2{\ifnum \c@secnumdepth \gt-2\relax \refstepcounter{part}
+\addcontentsline{toc}{part}{\thepart \hspace{1em}#1}\else
+\addcontentsline{toc}{part}{#1}\fi \markboth{}{}
+ {\centering \ifnum \c@secnumdepth \gt-2\relax \huge\grbf\partname{} \thepart \par
+\vskip 20pt \fi \Huge \grbf #1\par}\@endpart}
+\def\@endpart{\vfil\newpage \if@twoside \hbox{} \thispagestyle{empty}
+ \newpage
+ \fi \if@tempswa \twocolumn \fi}
+\def\@spart#1{{\centering \Huge \grbf #1\par}\@endpart}
+
+\def\@pnumwidth{1.55em}
+\def\@tocrmarg {2.55em}
+\def\@dotsep{4.5}
+\setcounter{tocdepth}{2}
+
+
+\def\contentsname{Perieq'omena} % <----------
+\def\tableofcontents{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
+ \fi\chapter*{\contentsname
+ \@mkboth{PERIEQOMENA}{PERIEQOMENA}}
+ \@starttoc{toc}\if@restonecol\twocolumn\fi}
+\def\l@part#1#2{\addpenalty{-\@highpenalty}
+ \addvspace{2.25em plus 1pt} \begingroup
+ \@tempdima 3em \parindent \z@ \rightskip \@pnumwidth \parfillskip
+-\@pnumwidth
+ {\large \grbf \leavevmode #1\hfil \hbox to\@pnumwidth{\hss #2}}\par
+ \nobreak \global\@nobreaktrue \everypar{\global\@nobreakfalse\everypar{}}
+\endgroup}
+\def\l@chapter#1#2{\addpenalty{-\@highpenalty}
+ \vskip 1.0em plus 1pt \@tempdima 1.5em \begingroup
+ \parindent \z@ \rightskip \@pnumwidth
+ \parfillskip -\@pnumwidth
+ \grbf \leavevmode \advance\leftskip\@tempdima \hskip -\leftskip #1\nobreak\hfil
+\nobreak\hbox to\@pnumwidth{\hss #2}\par
+ \penalty\@highpenalty \endgroup}
+
+\def\l@section{\@dottedtocline{1}{1.5em}{2.3em}}
+\def\l@subsection{\@dottedtocline{2}{3.8em}{3.2em}}
+\def\l@subsubsection{\@dottedtocline{3}{7.0em}{4.1em}}
+\def\l@paragraph{\@dottedtocline{4}{10em}{5em}}
+\def\l@subparagraph{\@dottedtocline{5}{12em}{6em}}
+\def\listfigurename{Eik'onec} % <----------
+\def\listoffigures{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
+ \fi\chapter*{\listfigurename\@mkboth
+ {EIKONES}{EIKONES}}\@starttoc
+ {lof}\if@restonecol
+ \twocolumn\fi}
+\def\l@figure{\@dottedtocline{1}{1.5em}{2.3em}}
+\def\listtablename{P'inakec} % <----------
+\def\listoftables{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
+ \fi\chapter*{\listtablename\@mkboth
+ {PINAKES}{PINAKES}}\@starttoc
+ {lot}\if@restonecol
+ \twocolumn\fi}
+\let\l@table\l@figure
+
+\def\bibname{Bibliograf'ia} % <----------
+\def\thebibliography#1{\chapter*{\bibname\@mkboth
+ {BIBLIOGRAFIA}{BIBLIOGRAFIA}}\list
+ {[\arabic{enumi}]}{\settowidth\labelwidth{[#1]}\leftmargin\labelwidth
+ \advance\leftmargin\labelsep
+ \usecounter{enumi}}
+ \def\newblock{\hskip .11em plus .33em minus .07em}
+ \sloppy\clubpenalty4000\widowpenalty4000
+ \sfcode`\.=1000\relax}
+\let\endthebibliography=\endlist
+
+\newif\if@restonecol
+\def\indexname{Euret'hrio} % <----------
+\def\theindex{\@restonecoltrue\if@twocolumn\@restonecolfalse\fi
+ \columnseprule \z@
+ \columnsep 35pt\twocolumn[\@makeschapterhead*{\indexname}]
+ \@mkboth{EURETHRIO}{EURETHRIO}%
+ \thispagestyle{plain}\parindent\z@
+ \parskip\z@ plus .3pt\relax\let\item\@idxitem}
+\def\@idxitem{\par\hangindent 40pt}
+\def\subitem{\par\hangindent 40pt \hspace*{20pt}}
+\def\subsubitem{\par\hangindent 40pt \hspace*{30pt}}
+\def\endtheindex{\if@restonecol\onecolumn\else\clearpage\fi}
+\def\indexspace{\par \vskip 10pt plus 5pt minus 3pt\relax}
+\def\footnoterule{\kern-3\p@
+ \hrule width .4\columnwidth
+ \kern 2.6\p@}
+\@addtoreset{footnote}{chapter}
+\long\def\@makefntext#1{\parindent 1em\noindent
+ \hbox to 1.8em{\hss\m@thm@de^{\@thefnmark}\m@thm@de}#1}
+
+\setcounter{topnumber}{2}
+\def\topfraction{.7}
+\setcounter{bottomnumber}{1}
+\def\bottomfraction{.3}
+\setcounter{totalnumber}{3}
+\def\textfraction{.2}
+\def\floatpagefraction{.5}
+\setcounter{dbltopnumber}{2}
+\def\dbltopfraction{.7}
+\def\dblfloatpagefraction{.5}
+
+\long\def\@makecaption#1#2{
+ \vskip 10pt
+ \setbox\@tempboxa\hbox{#1: #2}
+ \ifdim \wd\@tempboxa \gt\hsize #1: #2\par \else \hbox
+to\hsize{\hfil\box\@tempboxa\hfil}
+ \fi}
+
+
+\newcounter{figure}[chapter]
+\def\thefigure{\thechapter.\@arabic\c@figure}
+\def\fps@figure{tbp}
+\def\ftype@figure{1}
+\def\ext@figure{lof}
+\def\figurename{Eik'ona} % <----------
+\def\fnum@figure{\figurename{} \thefigure}
+\def\figure{\@float{figure}}
+\let\endfigure\end@float
+\@namedef{figure*}{\@dblfloat{figure}}
+\@namedef{endfigure*}{\end@dblfloat}
+\newcounter{table}[chapter]
+\def\thetable{\thechapter.\@arabic\c@table}
+\def\fps@table{tbp}
+\def\ftype@table{2}
+\def\ext@table{lot}
+\def\tablename{P'inakac} % <----------
+\def\fnum@table{\tablename{} \thetable}
+\def\table{\@float{table}}
+\let\endtable\end@float
+\@namedef{table*}{\@dblfloat{table}}
+\@namedef{endtable*}{\end@dblfloat}
+\def\maketitle{\begin{titlepage}
+ \let\footnotesize\small \let\footnoterule\relax \setcounter{page}{0}
+ \null
+ \vfil
+ \vskip 60pt \begin{center}
+ {\LARGE \@title \par} \vskip 3em {\large \lineskip .75em
+ \begin{tabular}[t]{c}\@author
+ \end{tabular}\par}
+ \vskip 1.5em {\large \@date \par} \end{center} \par
+\@thanks
+\vfil
+\null
+\end{titlepage}
+\setcounter{footnote}{0} \let\thanks\relax
+\gdef\@thanks{}\gdef\@author{}\gdef\@title{}\let\maketitle\relax}
+
+\mark{{}{}}
+
+\def\ps@headings{\let\@mkboth\markboth
+\def\@oddfoot{}\def\@evenfoot{}\def\@evenhead{\rm \thepage\hfil \grsl
+\leftmark}\def\@oddhead{\hbox{}\grsl \rightmark \hfil
+\rm\thepage}\def\chaptermark##1{\markboth {%\uppercase
+{\ifnum \c@secnumdepth
+\gt\m@ne
+ \@chapapp\ \thechapter. \ \fi ##1}}{}}\def\sectionmark##1{\markright
+{%\uppercase
+{\ifnum \c@secnumdepth \gt\z@
+ \thesection. \ \fi ##1}}}}
+\def\ps@myheadings{\let\@mkboth\@gobbletwo
+\def\@oddhead{\hbox{}\grsl\rightmark \hfil
+\rm\thepage}\def\@oddfoot{}\def\@evenhead{\rm \thepage\hfil\grsl\leftmark\hbox
+{}}\def\@evenfoot{}\def\chaptermark##1{}\def\sectionmark##1{}%
+\def\subsectionmark##1{}}
+
+%\def\today{\ifcase\month\or
+% January\or February\or March\or April\or May\or June\or
+% July\or August\or September\or October\or November\or December\fi
+% \space\number\day, \number\year}
+\@addtoreset{equation}{chapter}
+\def\theequation{\thechapter.\arabic{equation}}
+
+\ps@headings \pagenumbering{arabic} \onecolumn
+
+
+
+
diff --git a/fonts/greek/kd/latex/greek.sty b/fonts/greek/kd/latex/greek.sty
new file mode 100644
index 0000000000..eb7fd239dd
--- /dev/null
+++ b/fonts/greek/kd/latex/greek.sty
@@ -0,0 +1,73 @@
+%NAME: greek.sty
+%
+% GREEK.STY Greek Style For LaTeX Files and KD family of greek fonts
+% ~~~~~~~~~
+%
+\typeout{Document Style Option `greek' <Dec 7,1992>}
+\ifx\gr@@kformatloaded\relax\def\d@next{\endinput}
+ \else
+ \let\gr@@kformatloaded\relax
+ \def\d@next{}
+\fi
+\d@next
+%
+\newif\ifdelimsbar\delimsbarfalse % Check for | as delimiter
+\chardef\|=`\| % A way to access |
+\gdef\t@f@nt{\gr} % Remember font used last
+\gdef\t@f@m{\fam\grfam} % Remember family used last
+\newlanguage\greek % Define Greek as a new language
+\def\lt{<} % Remember Less than
+\def\gt{>} % and greater than signs
+
+\def\gr@@km@de{%
+\ifdelimsbar\else\catcode`\|=11\fi% This is to allow the use of | as iota
+\catcode`\<=11%
+\catcode`\>=11%
+\catcode`\'=11%
+\catcode`\`=11%
+\catcode`\~=11%
+\catcode`\"=11%
+\lccode`\<=`\<%
+\lccode`\>=`\>%
+\lccode`\'=`\'%
+\lccode`\~=`\~%
+\lccode`\"=`\"%
+}
+
+\def\l@tinm@de{
+\catcode`\<=12%
+\catcode`\>=12%
+\catcode`\'=12%
+\catcode`\`=12%
+\catcode`\~=12%
+\catcode`\"=12%
+}
+%
+% Create a new LaTeX Environment
+%
+\newenvironment{greektext}{\language\greek\gr@@km@de%
+\t@f@m\t@f@nt\ignorespaces}%
+{\xdef\t@f@nt{\the\font}\xdef\t@f@m{\noexpand\fam\the\fam}}
+
+\gdef\greekdelims#1{\edef\c@mp@re{#1}\def\t@st@a{bar}\def\t@st@b{dollar}%
+\ifx\c@mp@re\t@st@a\gr@@kdelimsbar\else%
+\ifx\c@mp@re\t@st@b\gr@@kdelimsdol\fi\fi}
+%
+% Bar as delimeter
+%
+{\catcode`\|=13\gdef\gr@@kdelimsbar{\catcode`\|=13\delimsbartrue%
+\def|{\ifnum\language=\greek\end{greektext}\else\begin{greektext}\fi}}
+}
+%
+% Dollar as delimiter
+%
+\let\m@thm@de=$
+{\catcode`\$=13%
+\gdef\gr@@kdelimsdol{\catcode`\$=13%
+\def${\ifnum\language=\greek\end{greektext}\else\begin{greektext}\fi}%
+\global\let\math=\m@thm@de%
+\gdef\display{\math\math}\gdef\enddisplay{\math\math}}%
+}
+
+\input grfonts.tex
+%% End of greek.sty
diff --git a/fonts/greek/kd/latex/grfonts.tex b/fonts/greek/kd/latex/grfonts.tex
new file mode 100644
index 0000000000..0bf295b420
--- /dev/null
+++ b/fonts/greek/kd/latex/grfonts.tex
@@ -0,0 +1,303 @@
+% This file is part of the GreekTeX Package
+%
+% File: grfonts.tex
+%
+% This version of grfonts is for KD greek fonts. It is based on the
+% standard LaTeX lfonts.tex which it actually compliments.
+% This version was written by K J Dryllerakis (kd@doc.ic.ac.uk)
+% Dec 7, 1992
+%
+% Important note: This file has to be loaded AFTER the greek mcaros
+% are read so that greek is declared as a new language. If this is NOT
+% the case then simply add a comand:
+% \newlanguage\greek at the beginning of the file
+% Note that lfonts has also to be read in advance!
+%
+% New Families
+% ^^^^^^^^^^^^
+% \gr - greek
+% \grbf - greek bold-face
+% \grit - greek italic
+% \grtt - greek typewriter
+% \grsl - greek slanted
+%
+%
+% Let us define again some of the lfonts macros
+\let\@prtct=\relax
+
+\def\@addfontinfo#1#2{{\def\@prtct{\noexpand\@prtct\noexpand}\def\def{\noexpand
+ \def\noexpand}\xdef#1{#1#2}}}
+
+\def\@getfont#1#2#3#4{\@ifundefined{\string #1\string #3}{\global\expandafter
+ \font \csname \string #1\string #3\endcsname #4\relax
+ \@addfontinfo#3{\textfont #2\csname \string #1\string #3\endcsname
+ \scriptfont #2\csname \string #1\string #3\endcsname
+ \scriptscriptfont #2\csname \string #1\string #3\endcsname
+ \def#1{\fam #2\csname\string #1\string #3\endcsname}}}{}#3#1}
+
+% We need to redifine normalize to take greek into account.
+
+\def\normalsize{\ifx\@currsize\normalsize\ifnum\language=\greek\else\rm\fi %
+ \else \@normalsize\fi}
+
+% Load the main Greek Fonts
+%
+%
+\font\sixgr = kdgr8 scaled 750 % Classic Greek
+\font\sixgrbf = kdbf8 scaled 750 % Boldface Greek
+\font\ningr = kdgr9 % 9 point Classic Greek Font
+\font\eiggr = kdgr8 % 8 point Classic Greek Font
+\font\tengr = kdgr10 % 10 point Classic Greek Font
+\font\tengrsl = kdsl10 % 10 Point Slanted Greek Font
+\font\tengrbf = kdbf10 % 10 Point Boldface Greek Font
+\font\tengri = kdti10 % 10 Point Italic Greek Font
+\font\tengrtt = kdtt10 % 10 Point Typewritter Greek Font
+\font\twlgr = kdgr10 scaled\magstep1 % Classic Greek
+%
+% Greek font changing command as protected
+%
+\def\gr{\protect\pgr}
+\def\grbf{\protect\pgrbf}
+\def\grit{\protect\pgrit}
+\def\grtt{\protect\pgrtt}
+\def\grsl{\protect\pgrsl}
+%
+\def\gr@@k{kdgr10}
+\def\gr@@kb{kdbf10}
+\def\gr@@ki{kdti10}
+\def\gr@@kt{kdtt10}
+\def\gr@@ks{kdsl10}
+\def\@eiggr{kdgr8}
+\def\@ningr{kdgr9}
+\def\@eiggrbf{kdbf8}
+\def\@ningrbf{kdbf9}
+%
+% families
+%
+%
+\newfam\grfam % \gr is family 11
+\newfam\grbfam % \grbf is family 12
+\newfam\grifam % \gri is family 13
+\newfam\grttfam % \grtt is family 14
+\newfam\grsfam % \grs is family 14
+
+% Now add commands to each LaTeX size changing command which defines
+% the Greek font selections to invoke macros which load the font ``on
+% demand''.
+%
+% This hack is needed to reset to a greek font at the font changing commands
+% This command will be included in \@??pt info which has the last word when
+% a font sizing command is executed. In the same command we also reset
+% the t@f@nt info.
+\gdef\@setgr@@k{\gdef\t@f@nt{\gr}\ifnum\language=\greek\gr\fi}
+%
+%
+%
+% We redifine here the setsize macro to take into account the
+% greek language. The main problem was that a \setgreek command
+% must be executed at the end of the setsize command to
+% reset the \t@f@nt command and to switch to gr instead of rm in
+% case we are in greek mode.
+% This is a harmless modification and the command setgreek is appended
+% to setsize
+
+\def\@setsize#1#2#3#4{\@nomath#1\let\@currsize#1\baselineskip
+ #2\setbox\strutbox\hbox{\vrule height.7\baselineskip
+ depth.3\baselineskip width\z@}\baselineskip\baselinestretch\baselineskip
+ \normalbaselineskip\baselineskip#3#4\@setgr@@k}
+
+
+\@addfontinfo\@vpt{\def\pgr{\@prtct\gr@vpt}%
+ \def\pgrbf{\@prtct\grb@vpt}%
+ \def\pgrit{\@prtct\gri@vpt}%
+ \def\pgrtt{\@prtct\grt@vpt}%
+ \def\pgrsl{\@prtct\grs@vpt}%
+ }
+\@addfontinfo\@vipt{\@prtct\textfont\grfam\sixgr%
+ \@prtct\scriptfont\grfam\sixgr%
+ \@prtct\textfont\grbfam\sixgrbf%
+ \@prtct\scriptfont\grbfam\sixgrbf%
+ \def\pgr{\@prtct\gr@vipt}%
+ \def\pgrbf{\@prtct\grb@vipt}%
+ \def\pgrit{\@prtct\gri@vipt}%
+ \def\pgrtt{\@prtct\grt@vipt}%
+ \def\pgrsl{\@prtct\grs@vipt}%
+ }
+\@addfontinfo\@viipt{\def\pgr{\@prtct\gr@viipt}%
+ \def\pgrbf{\@prtct\grb@viipt}%
+ \def\pgrit{\@prtct\gri@viipt}%
+ \def\pgrtt{\@prtct\grt@viipt}
+ \def\pgrsl{\@prtct\grs@viipt}%
+ }
+\@addfontinfo\@viiipt{\@prtct\textfont\grfam\eiggr%
+ \@prtct\scriptfont\grfam\sixgr%
+ \def\pgr{\@prtct\gr@viiipt}%
+ \def\pgrbf{\@prtct\grb@viiipt}%
+ \def\pgrit{\@prtct\gri@viiipt}%
+ \def\pgrtt{\@prtct\grt@viiipt}%
+ \def\pgrsl{\@prtct\grs@viiipt}%
+ }
+\@addfontinfo\@ixpt{\@prtct\textfont\grfam\ningr%
+ \@prtct\scriptfont\grfam\sixgr%
+ \def\pgr{\@prtct\gr@ixpt}%
+ \def\pgrbf{\@prtct\grb@ixpt}%
+ \def\pgrit{\@prtct\gri@ixpt}%
+ \def\pgrtt{\@prtct\grt@ixpt}
+ \def\pgrsl{\@prtct\grs@ixpt}}
+\@addfontinfo\@xpt{\@prtct\textfont\grfam\tengr%
+ \@prtct\scriptfont\grfam\eiggr%
+ \@prtct\scriptscriptfont\grfam\sixgr%
+ \@prtct\textfont\grbfam\tengrbf%
+ \@prtct\textfont\grsfam\tengrsl%
+ \@prtct\textfont\grttfam\tengrtt%
+ \@prtct\textfont\grifam\tengri%
+ \def\pgr{\@prtct\gr@xpt}%
+ \def\pgrbf{\@prtct\grb@xpt}%
+ \def\pgrit{\@prtct\gri@xpt}%
+ \def\pgrtt{\@prtct\grt@xpt}%
+ \def\pgrsl{\@prtct\grs@xpt}%
+ }
+\@addfontinfo\@xipt{\def\pgr{\@prtct\gr@xipt}%
+ \def\pgrbf{\@prtct\grb@xipt}%
+ \def\pgrit{\@prtct\gri@xipt}%
+ \def\pgrtt{\@prtct\grt@xipt}
+ \def\pgrsl{\@prtct\grs@xipt}%
+ }
+\@addfontinfo\@xiipt{\@prtct\textfont\grfam\twlgr%
+ \@prtct\scriptfont\grfam\tengr%
+ \@prtct\scriptscriptfont\grfam\eiggr%
+ \def\pgr{\@prtct\gr@xiipt}%
+ \def\pgrbf{\@prtct\grb@xiipt}%
+ \def\pgrit{\@prtct\gri@xiipt}%
+ \def\pgrtt{\@prtct\grt@xiipt}%
+ \def\pgrsl{\@prtct\grs@xiipt}%
+ }
+\@addfontinfo\@xivpt{\def\pgr{\@prtct\gr@xivpt}%
+ \def\pgrbf{\@prtct\grb@xivpt}%
+ \def\pgrit{\@prtct\gri@xivpt}%
+ \def\pgrtt{\@prtct\grt@xivpt}%
+ \def\pgrsl{\@prtct\grs@xiv}%
+ }
+\@addfontinfo\@xviipt{\def\pgr{\@prtct\gr@xviipt}%
+ \def\pgrbf{\@prtct\grb@xviipt}%
+ \def\pgrit{\@prtct\gri@xviipt}%
+ \def\pgrtt{\@prtct\grt@xviipt}%
+ \def\pgrsl{\@prtct\grs@xviipt}%
+ }
+\@addfontinfo\@xxpt{\def\pgr{\@prtct\gr@xxpt}%
+ \def\pgrbf{\@prtct\grb@xxpt}%
+ \def\pgrit{\@prtct\gri@xxpt}%
+ \def\pgrtt{\@prtct\grt@xxpt}%
+ \def\pgrsl{\@prtct\grs@xxpt}%
+ }
+\@addfontinfo\@xxvpt{\def\pgr{\@prtct\gr@xxvpt}%
+ \def\pgrbf{\@prtct\grb@xxvpt}%
+ \def\pgrit{\@prtct\gri@xxvpt}%
+ \def\pgrtt{\@prtct\grt@xxvpt}%
+ \def\pgrsl{\@prtct\grs@xxvpt}%
+ }
+
+% Finally, we can define WHICH fonts are to be loaded on demand.
+%
+% Classical Greek
+%
+\def\gr@vpt{\@subfont\gr\rm}
+\def\gr@vipt{\fam\grfam\sixgr}
+\def\gr@viipt{\@getfont\pgr\grfam\@viipt{\gr@@k\@ptscale7}}
+\def\gr@viiipt{\fam\grfam\eiggr}
+\def\gr@ixpt{\fam\grfam\ningr}
+\def\gr@xpt{\fam\grfam\tengr}
+\def\gr@xipt{\@getfont\pgr\grfam\@xipt{\gr@@k\@halfmag}}
+\def\gr@xiipt{\fam\grfam\twlgr}
+\def\gr@xivpt{\@getfont\pgr\grfam\@xivpt{\gr@@k\@magscale2}}
+\def\gr@xviipt{\@getfont\pgr\grfam\@xviipt{\gr@@k\@magscale3}}
+\def\gr@xxpt{\@getfont\pgr\grfam\@xxpt{\gr@@k\@magscale4}}
+\def\gr@xxvpt{\@getfont\pgr\grfam\@xxvpt{\gr@@k\@magscale5}}
+%
+% BoldFace Greek
+%
+\def\grb@vpt{\@subfont\grbf\bf}
+\def\grb@vipt{\fam\grbfam\sixgrbf}
+\def\grb@viipt{\@getfont\pgrbf\grbfam\@viipt{\gr@@kb\@ptscale7}}
+\def\grb@viiipt{\@getfont\pgrbf\grbfam\@viiipt{\@eiggrbf}}
+\def\grb@ixpt{\@getfont\pgrbf\grbfam\@ixpt{\@ningrbf}}
+\def\grb@xpt{\fam\grbfam\tengrbf}
+\def\grb@xipt{\@getfont\pgrbf\grbfam\@xipt{\gr@@kb\@halfmag}}
+\def\grb@xiipt{\@getfont\pgrbf\grbfam\@xiipt{\gr@@kb\@magscale1}}
+\def\grb@xivpt{\@getfont\pgrbf\grbfam\@xivpt{\gr@@kb\@magscale2}}
+\def\grb@xviipt{\@getfont\pgrbf\grbfam\@xviipt{\gr@@kb\@magscale3}}
+\def\grb@xxpt{\@getfont\pgrbf\grbfam\@xxpt{\gr@@kb\@magscale4}}
+\def\grb@xxvpt{\@getfont\pgrbf\grbfam\@xxvpt{\gr@@kb\@magscale5}}
+%
+% Greek Italics
+%
+\def\gri@vpt{\@subfont\grit\it}
+\def\gri@vipt{\@getfont\pgrit\grifam\@vipt{\gr@@ki\@ptscale6}}
+\def\gri@viipt{\@getfont\pgrit\grifam\@viipt{\gr@@ki\@ptscale7}}
+\def\gri@viiipt{\@getfont\pgrit\grifam\@viiipt{\gr@@ki\@ptscale8}}
+\def\gri@ixpt{\@getfont\pgrit\grifam\@ixpt{\gr@@ki\@ptscale9}}
+\def\gri@xpt{\fam\grifam\tengri}
+\def\gri@xipt{\@getfont\pgrit\grifam\@xipt{\gr@@ki\@halfmag}}
+\def\gri@xiipt{\@getfont\pgrit\grifam\@xiipt{\gr@@ki\@magscale1}}
+\def\gri@xivpt{\@getfont\pgrit\grifam\@xivpt{\gr@@ki\@magscale2}}
+\def\gri@xviipt{\@getfont\pgrit\grifam\@xviipt{\gr@@ki\@magscale3}}
+\def\gri@xxpt{\@getfont\pgrit\grifam\@xxpt{\gr@@ki\@magscale4}}
+\def\gri@xxvpt{\@getfont\pgrit\grifam\@xxvpt{\gr@@ki\@magscale5}}
+%
+% Slanted Greek
+%
+\def\grs@vpt{\@subfont\grsl\sl}
+\def\grs@vipt{\@getfont\pgrsl\grsfam\@vipt{\gr@@ks\@ptscale6}}
+\def\grs@viipt{\@getfont\pgrsl\grsfam\@viipt{\gr@@ks\@ptscale7}}
+\def\grs@viiipt{\@getfont\pgrsl\grsfam\@viiipt{\gr@@ks\@ptscale8}}
+\def\grs@ixpt{\@getfont\pgrsl\grsfam\@ixpt{\gr@@ks\@ptscale9}}
+\def\grs@xpt{\fam\grsfam\tengrsl}
+\def\grs@xipt{\@getfont\pgrsl\grsfam\@xipt{\gr@@ks\@halfmag}}
+\def\grs@xiipt{\@getfont\pgrsl\grsfam\@xiipt{\gr@@ks\@magscale1}}
+\def\grs@xivpt{\@getfont\pgrsl\grsfam\@xivpt{\gr@@ks\@magscale2}}
+\def\grs@xviipt{\@getfont\pgrsl\grsfam\@xviipt{\gr@@ks\@magscale3}}
+\def\grs@xxpt{\@getfont\pgrsl\grsfam\@xxpt{\gr@@ks\@magscale4}}
+\def\grs@xxvpt{\@getfont\pgrsl\grsfam\@xxvpt{\gr@@ks\@magscale5}}
+%
+% Greek Typewriter
+%
+\def\grt@vpt{\@subfont\grtt\tt}
+\def\grt@vipt{\@getfont\pgrtt\grttfam\@vipt{\gr@@kt\@ptscale6}%
+ \@nohyphens\pgrtt\@vipt}
+\def\grt@viipt{\@getfont\pgrtt\grttfam\@viipt{\gr@@kt\@ptscale7}%
+ \@nohyphens\pgrtt\@viipt}
+\def\grt@viiipt{\@getfont\pgrtt\grttfam\@viiipt{\gr@@kt\@ptscale8}%
+ \@nohyphens\pgrtt\@viiipt}
+\def\grt@ixpt{\@getfont\pgrtt\grttfam\@ixpt{\gr@@kt\@ptscale9}%
+ \@nohyphens\pgrtt\@ixpt}
+\def\grt@xpt{\fam\grttfam\tengrtt}
+\def\grt@xipt{\@getfont\pgrtt\grttfam\@xipt{\gr@@kt\@halfmag}%
+ \@nohyphens\pgrtt\@xipt}
+\def\grt@xiipt{\@getfont\pgrtt\grttfam\@xiipt{\gr@@kt\@magscale1}%
+ \@nohyphens\pgrtt\@xiipt}
+\def\grt@xivpt{\@getfont\pgrtt\grttfam\@xivpt{\gr@@kt\@magscale2}%
+ \@nohyphens\pgrtt\@xivpt}
+\def\grt@xviipt{\@getfont\pgrtt\grttfam\@xviipt{\gr@@kt\@magscale3}%
+ \@nohyphens\pgrtt\@xviipt}
+\def\grt@xxpt{\@getfont\pgrtt\grttfam\@xxpt{\gr@@kt\@magscale4}%
+ \@nohyphens\pgrtt\@xxpt}
+\def\grt@xxvpt{\@getfont\pgrtt\grttfam\@xxvpt{\gr@@kt\@magscale5}%
+ \@nohyphens\pgrtt\@xxvpt}
+
+%% End of grfont.tex
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/fonts/greek/kd/latex/grkhyphen.tex b/fonts/greek/kd/latex/grkhyphen.tex
new file mode 100644
index 0000000000..38880ecc1a
--- /dev/null
+++ b/fonts/greek/kd/latex/grkhyphen.tex
@@ -0,0 +1,1181 @@
+%
+%
+% Hyphenation patterns for modern greek language
+% **********************************************
+%
+\patterns{%
+.>a4
+.>'a4
+.>~a4
+.<a4
+.<'a4
+.<~a4
+.'a4
+.>e4
+.>'e4
+.>~e4
+.<e4
+.<'e4
+.<~e4
+.'e4
+.>h4
+.>'h4
+.>~h4
+.<h4
+.<'h4
+.<~h4
+.'h4
+.>i4
+.>'i4
+.>~i4
+.<i4
+.<'i4
+.<~i4
+.'i4
+.>o4
+.>'o4
+.>~o4
+.<o4
+.<'o4
+.<~o4
+.'o4
+.<u4
+.<'u4
+.<~u4
+.'u4
+.>w4
+.>'w4
+.>~w4
+.<w4
+.<'w4
+.<~w4
+.'w4
+a1
+a2i
+a2'i
+a2~i
+a2>i
+a2>'i
+a2>~i
+a2<i
+a2<'i
+a2<~i
+'a3i
+a3"
+a2u
+a2'u
+a2~u
+a2>u
+a2>'u
+a2>~u
+a2<u
+a2<'u
+a2<~u
+'a3u
+e1
+e2i
+e2'i
+e2~i
+e2>i
+e2>'i
+e2>~i
+e2<i
+e2<'i
+e2<~i
+'e3i
+e3"
+e2u
+e2'u
+e2~u
+e2>u
+e2>'u
+e2>~u
+e2<u
+e2<'u
+e2<~u
+'e3u
+h1
+h2u
+h2'u
+h2~u
+h2>u
+h2>'u
+h2>~u
+h2<u
+h2<'u
+h2<~u
+'h3u
+h3"
+i1
+i2a
+i2'a
+i2~a
+'i3a
+~i3a
+u2'a
+i2e
+i2'e
+'i3e
+~i3e
+u2'e
+i2o
+i2'o
+'i3o
+~i3o
+u2'o
+i2w
+i2'w
+i2~w
+'i3w
+~i3w
+u2'w
+'4'
+''4'
+''4>
+''4<
+'''a4
+''>a'4
+''<a'4
+''>~a4
+''<~a4
+'''e4
+'''>e'4
+'''<e'4
+'''h4
+''>h'4
+''<h'4
+''>~h4
+''<~h4
+'''i4
+''>i'4
+''<i'4
+''>~i4
+''<~i4
+'''o4
+''>o'4
+''<o'4
+'''u4
+''>u'4
+''<u'4
+''>~u4
+''<~u4
+'''w4
+''>w'4
+''<w'4
+''>~w4
+''<~w4
+o1
+o2i
+o2'i
+o2~i
+o2>i
+o2>'i
+o2>~i
+o2<i
+o2<'i
+o2<~i
+'o3i
+o3"
+o2u
+o2'u
+o2~u
+o2>u
+o2>'u
+o2>~u
+o2<u
+o2<'u
+o2<~u
+'o3u
+u1
+u2i
+u2'i
+u2~i
+u2>i
+u2>'i
+u2>~i
+u2<i
+u2<'i
+u2<~i
+u3"
+w1
+~a3i
+~a3u
+~h3u
+a1b
+a1g
+a1d
+a1z
+a1j
+a1k
+a1l
+a1m
+a1n
+a1x
+a1p
+a1r
+a1s
+a1t
+a1f
+a1q
+a1y
+e1b
+e1g
+e1d
+e1z
+e1j
+e1k
+e1l
+e1m
+e1n
+e1x
+e1p
+e1r
+e1s
+e1t
+e1f
+e1q
+e1y
+h1b
+h1g
+h1d
+h1z
+h1j
+h1k
+h1l
+h1m
+h1n
+h1x
+h1p
+h1r
+h1s
+h1t
+h1f
+h1q
+h1y
+i1b
+i1g
+i1d
+i1z
+i1j
+i1k
+i1l
+i1m
+i1n
+i1x
+i1p
+i1r
+i1s
+i1t
+i1f
+i1q
+i1y
+o1b
+o1g
+o1d
+o1z
+o1j
+o1k
+o1l
+o1m
+o1n
+o1x
+o1p
+o1r
+o1s
+o1t
+o1f
+o1q
+o1y
+u1b
+u1g
+u1d
+u1z
+u1j
+u1k
+u1l
+u1m
+u1n
+u1x
+u1p
+u1r
+u1s
+u1t
+u1f
+u1q
+u1y
+w1b
+w1g
+w1d
+w1z
+w1j
+w1k
+w1l
+w1m
+w1n
+w1x
+w1p
+w1r
+w1s
+w1t
+w1f
+w1q
+w1y
+2b1b
+2b1z
+2b1j
+2b1k
+2b1m
+2b1n
+2b1x
+2b1s
+2b1t
+2b1f
+2b1q
+2b1y
+2g1b
+2g1g
+2g1z
+2g1j
+2g1m
+2g1x
+2g1s
+2g1t
+2g1f
+2g1q
+2g1y
+2d1b
+2d1g
+2d1d
+2d1z
+2d1j
+2d1k
+2d1l
+2d1m
+2d1n
+2d1x
+2d1p
+2d1s
+2d1t
+2d1f
+2d1q
+2d1y
+2z1b
+2z1g
+2z1d
+2z1z
+2z1j
+2z1k
+2z1l
+2z1m
+2z1n
+2z1x
+2z1p
+2z1r
+2z1s
+2z1t
+2z1f
+2z1q
+2z1y
+2j1b
+2j1g
+2j1d
+2j1z
+2j1j
+2j1k
+2j1m
+2j1n
+2j1x
+2j1p
+2j1s
+2j1t
+2j1f
+2j1q
+2j1y
+2k1b
+2k1g
+2k1d
+2k1z
+2k1j
+2k1k
+2k1m
+2k1n
+2k1x
+2k1p
+2k1s
+2k1f
+2k1q
+2k1y
+2l1b
+2l1g
+2l1d
+2l1z
+2l1j
+2l1k
+2l1l
+2l1m
+2l1n
+2l1x
+2l1p
+2l1r
+2l1s
+2l1t
+2l1f
+2l1q
+2l1y
+2m1b
+2m1g
+2m1d
+2m1z
+2m1j
+2m1k
+2m1l
+2m1m
+2m1x
+2m1r
+2m1s
+2m1t
+2m1f
+2m1q
+2m1y
+2n1b
+2n1g
+2n1d
+2n1z
+2n1j
+2n1k
+2n1l
+2n1m
+2n1n
+2n1x
+2n1p
+2n1r
+2n1s
+2n1f
+2n1q
+2n1y
+2x1b
+2x1g
+2x1d
+2x1z
+2x1j
+2x1k
+2x1l
+2x1m
+2x1n
+2x1x
+2x1p
+2x1r
+2x1s
+2x1t
+2x1f
+2x1q
+2x1y
+2p1b
+2p1g
+2p1d
+2p1z
+2p1j
+2p1k
+2p1m
+2p1x
+2p1p
+2p1s
+2p1f
+2p1q
+2p1y
+2r1b
+2r1g
+2r1d
+2r1z
+2r1j
+2r1k
+2r1l
+2r1m
+2r1n
+2r1x
+2r1p
+2r1r
+2r1s
+2r1t
+2r1f
+2r1q
+2r1y
+2s1b
+2s1d
+2s1z
+sj2m
+2s1l
+2s1n
+2s1x
+2s1r
+2s1s
+2s1y
+2t1b
+2t1g
+2t1d
+2t1z
+2t1j
+2t1k
+2t1l
+2t1m
+2t1n
+2t1x
+2t1p
+2t1t
+2t1f
+2t1q
+2t1y
+2f1b
+2f1g
+2f1d
+2f1z
+2f1k
+2f1m
+2f1n
+2f1x
+2f1p
+2f1s
+2f1f
+2f1y
+2q1b
+2q1g
+2q1d
+2q1z
+2q1j
+2q1k
+2q1m
+2q1n
+2q1x
+2q1p
+2q1s
+2q1f
+2q1q
+2q1y
+2y1b
+2y1g
+2y1d
+2y1z
+2y1j
+2y1k
+2y1l
+2y1m
+2y1n
+2y1x
+2y1p
+2y1r
+2y1s
+2y1t
+2y1f
+2y1q
+2y1y
+a1"'i
+e1"'i
+o1"'i
+a1"'u
+e1"'u
+o1"'u
+h1"'u
+a1"~1
+e1"~i
+o1"~i
+a1"~u
+e1"~u
+o1"~u
+h1"~u
+4'a.
+4~a.
+4'e.
+4~e.
+4'h.
+4~h.
+4'i.
+4~i.
+4'u.
+4~u.
+4'o.
+4~o.
+4'w.
+4~w.
+4'aa.
+4'ab.
+4'ag.
+4'ad.
+4'ae.
+4'az.
+4'ah.
+4'aj.
+4'ai.
+4'ak.
+4'al.
+4'am.
+4'an.
+4'ax.
+4'ao.
+4'ap.
+4'ar.
+4'ac.
+4'at.
+4'au.
+4'af.
+4'aq.
+4'ay.
+4'aw.
+4'ea.
+4'eb.
+4'eg.
+4'ed.
+4'ee.
+4'ez.
+4'eh.
+4'ej.
+4'ei.
+4'ek.
+4'el.
+4'em.
+4'en.
+4'ex.
+4'eo.
+4'ep.
+4'er.
+4'ec.
+4'et.
+4'eu.
+4'ef.
+4'eq.
+4'ey.
+4'ew.
+4'ha.
+4'hb.
+4'hg.
+4'hd.
+4'he.
+4'hz.
+4'hh.
+4'hj.
+4'hi.
+4'hk.
+4'hl.
+4'hm.
+4'hn.
+4'hx.
+4'ho.
+4'hp.
+4'hr.
+4'hc.
+4'ht.
+4'hu.
+4'hf.
+4'hq.
+4'hy.
+4'hw.
+4'ia.
+4'ib.
+4'ig.
+4'id.
+4'ie.
+4'iz.
+4'ih.
+4'ij.
+4'ii.
+4'ik.
+4'il.
+4'im.
+4'in.
+4'ix.
+4'io.
+4'ip.
+4'ir.
+4'ic.
+4'it.
+4'iu.
+4'if.
+4'iq.
+4'iy.
+4'iw.
+}
+\endinput
+% Problem on number of patterns on TeX's memory!
+4'oa.
+4'ob.
+4'og.
+4'od.
+4'oe.
+4'oz.
+4'oh.
+4'oj.
+4'oi.
+4'ok.
+4'ol.
+4'om.
+4'on.
+4'ox.
+4'oo.
+4'op.
+4'or.
+4'oc.
+4'ot.
+4'ou.
+4'of.
+4'oq.
+4'oy.
+4'ow.
+4'ua.
+4'ub.
+4'ug.
+4'ud.
+4'ue.
+4'uz.
+4'uh.
+4'uj.
+4'ui.
+4'uk.
+4'ul.
+4'um.
+4'un.
+4'ux.
+4'uo.
+4'up.
+4'ur.
+4'uc.
+4'ut.
+4'uu.
+4'uf.
+4'uq.
+4'uy.
+4'uw.
+4'wa.
+4'wb.
+4'wg.
+4'wd.
+4'we.
+4'wz.
+4'wh.
+4'wj.
+4'wi.
+4'wk.
+4'wl.
+4'wm.
+4'wn.
+4'wx.
+4'wo.
+4'wp.
+4'wr.
+4'wc.
+4'wt.
+4'wu.
+4'wf.
+4'wq.
+4'wy.
+4'ww.
+4~aa.
+4~ab.
+4~ag.
+4~ad.
+4~ae.
+4~az.
+4~ah.
+4~aj.
+4~ai.
+4~ak.
+4~al.
+4~am.
+4~an.
+4~ax.
+4~ao.
+4~ap.
+4~ar.
+4~ac.
+4~at.
+4~au.
+4~af.
+4~aq.
+4~ay.
+4~aw.
+4~ha.
+4~hb.
+4~hg.
+4~hd.
+4~he.
+4~hz.
+4~hh.
+4~hj.
+4~hi.
+4~hk.
+4~hl.
+4~hm.
+4~hn.
+4~hx.
+4~ho.
+4~hp.
+4~hr.
+4~hc.
+4~ht.
+4~hu.
+4~hf.
+4~hq.
+4~hy.
+4~hw.
+4~ia.
+4~ib.
+4~ig.
+4~id.
+4~ie.
+4~iz.
+4~ih.
+4~ij.
+4~ii.
+4~ik.
+4~il.
+4~im.
+4~in.
+4~ix.
+4~io.
+4~ip.
+4~ir.
+4~ic.
+4~it.
+4~iu.
+4~if.
+4~iq.
+4~iy.
+4~iw.
+4~ua.
+4~ub.
+4~ug.
+4~ud.
+4~ue.
+4~uz.
+4~uh.
+4~uj.
+4~ui.
+4~uk.
+4~ul.
+4~um.
+4~un.
+4~ux.
+4~uo.
+4~up.
+4~ur.
+4~uc.
+4~ut.
+4~uu.
+4~uf.
+4~uq.
+4~uy.
+4~uw.
+4~wa.
+4~wb.
+4~wg.
+4~wd.
+4~we.
+4~wz.
+4~wh.
+4~wj.
+4~wi.
+4~wk.
+4~wl.
+4~wm.
+4~wn.
+4~wx.
+4~wo.
+4~wp.
+4~wr.
+4~wc.
+4~wt.
+4~wu.
+4~wf.
+4~wq.
+4~wy.
+4~ww.
+4a'a.
+4b'a.
+4g'a.
+4d'a.
+4e'a.
+4z'a.
+4h'a.
+4j'a.
+4i'a.
+4k'a.
+4l'a.
+4m'a.
+4n'a.
+4x'a.
+4o'a.
+4p'a.
+4r'a.
+4s'a.
+4t'a.
+4u'a.
+4f'a.
+4q'a.
+4y'a.
+4w'a.
+4a'e.
+4b'e.
+4g'e.
+4d'e.
+4e'e.
+4z'e.
+4h'e.
+4j'e.
+4i'e.
+4k'e.
+4l'e.
+4m'e.
+4n'e.
+4x'e.
+4o'e.
+4p'e.
+4r'e.
+4s'e.
+4t'e.
+4u'e.
+4f'e.
+4q'e.
+4y'e.
+4w'e.
+4a'h.
+4b'h.
+4g'h.
+4d'h.
+4e'h.
+4z'h.
+4h'h.
+4j'h.
+4i'h.
+4k'h.
+4l'h.
+4m'h.
+4n'h.
+4x'h.
+4o'h.
+4p'h.
+4r'h.
+4s'h.
+4t'h.
+4u'h.
+4f'h.
+4q'h.
+4y'h.
+4w'h.
+4a'i.
+4b'i.
+4g'i.
+4d'i.
+4e'i.
+4z'i.
+4h'i.
+4j'i.
+4i'i.
+4k'i.
+4l'i.
+4m'i.
+4n'i.
+4x'i.
+4o'i.
+4p'i.
+4r'i.
+4s'i.
+4t'i.
+4u'i.
+4f'i.
+4q'i.
+4y'i.
+4w'i.
+4a'o.
+4b'o.
+4g'o.
+4d'o.
+4e'o.
+4z'o.
+4h'o.
+4j'o.
+4i'o.
+4k'o.
+4l'o.
+4m'o.
+4n'o.
+4x'o.
+4o'o.
+4p'o.
+4r'o.
+4s'o.
+4t'o.
+4u'o.
+4f'o.
+4q'o.
+4y'o.
+4w'o.
+4a'u.
+4b'u.
+4g'u.
+4d'u.
+4e'u.
+4z'u.
+4h'u.
+4j'u.
+4i'u.
+4k'u.
+4l'u.
+4m'u.
+4n'u.
+4x'u.
+4o'u.
+4p'u.
+4r'u.
+4s'u.
+4t'u.
+4u'u.
+4f'u.
+4q'u.
+4y'u.
+4w'u.
+4a'w.
+4b'w.
+4g'w.
+4d'w.
+4e'w.
+4z'w.
+4h'w.
+4j'w.
+4i'w.
+4k'w.
+4l'w.
+4m'w.
+4n'w.
+4x'w.
+4o'w.
+4p'w.
+4r'w.
+4s'w.
+4t'w.
+4u'w.
+4f'w.
+4q'w.
+4y'w.
+4w'w.
+4a~a.
+4b~a.
+4g~a.
+4d~a.
+4e~a.
+4z~a.
+4h~a.
+4j~a.
+4i~a.
+4k~a.
+4l~a.
+4m~a.
+4n~a.
+4x~a.
+4o~a.
+4p~a.
+4r~a.
+4s~a.
+4t~a.
+4u~a.
+4f~a.
+4q~a.
+4y~a.
+4w~a.
+4a~h.
+4b~h.
+4g~h.
+4d~h.
+4e~h.
+4z~h.
+4h~h.
+4j~h.
+4i~h.
+4k~h.
+4l~h.
+4m~h.
+4n~h.
+4x~h.
+4o~h.
+4p~h.
+4r~h.
+4s~h.
+4t~h.
+4u~h.
+4f~h.
+4q~h.
+4y~h.
+4w~h.
+4a~i.
+4b~i.
+4g~i.
+4d~i.
+4e~i.
+4z~i.
+4h~i.
+4j~i.
+4i~i.
+4k~i.
+4l~i.
+4m~i.
+4n~i.
+4x~i.
+4o~i.
+4p~i.
+4r~i.
+4s~i.
+4t~i.
+4u~i.
+4f~i.
+4q~i.
+4y~i.
+4w~i.
+4a~u.
+4b~u.
+4g~u.
+4d~u.
+4e~u.
+4z~u.
+4h~u.
+4j~u.
+4i~u.
+4k~u.
+4l~u.
+4m~u.
+4n~u.
+4x~u.
+4o~u.
+4p~u.
+4r~u.
+4s~u.
+4t~u.
+4u~u.
+4f~u.
+4q~u.
+4y~u.
+4w~u.
+4a~w.
+4b~w.
+4g~w.
+4d~w.
+4e~w.
+4z~w.
+4h~w.
+4j~w.
+4i~w.
+4k~w.
+4l~w.
+4m~w.
+4n~w.
+4x~w.
+4o~w.
+4p~w.
+4r~w.
+4s~w.
+4t~w.
+4u~w.
+4f~w.
+4q~w.
+4y~w.
+4w~w.
+}
+\endinput
+
+
diff --git a/fonts/greek/kd/latex/grmode.sty b/fonts/greek/kd/latex/grmode.sty
new file mode 100644
index 0000000000..02ecd5b85e
--- /dev/null
+++ b/fonts/greek/kd/latex/grmode.sty
@@ -0,0 +1,58 @@
+% File: grmode.sty
+% Requirements: LaTeX based on plain TeX 3.0 or later.
+%
+% Oct 13, 1991.
+%
+% Purpose: grmode.sty is a latex include file used in conjuctio with
+% the grlatex package (format lgreek, and files lgreek.tex,
+% grfonts.tex, greek.sty)
+% This file switches grlatex to a global greek mode. A latin mode is defined
+% to access the original latex mode. It is intended as a header file for
+% grlatex style files for typesetting greek texts. (e.g. grarticle,
+% grbook etc.)
+% Note that this file can used under normal latex with the use of
+% the macro definitions greek.sty. The only problem is the lack of hyphenation
+% patterns for greek in that case.
+%
+% Copyright (C) 1991-1992 by K J Dryllerakis (kd@doc.ic.ac.uk)
+%
+% First of all we make sure that the greek macros for KD fonts
+% are loaded.
+%
+\ifx\gr@@kformatloaded\relax
+ \else
+ \input greek.sty
+\fi
+%
+% We need to enter a global greek mode, i.e. define the new catcodes and
+% default language
+%
+\let\~=~ % Save the meaning of ~
+\gr@@km@de % Load the catcode definitions for greek mode
+\language\greek % Switch to greek Hyphenation patterns
+%
+% Remember: We need to inverse the greek-latin modes.
+% This means redefinition of certain things:
+%
+% I. create a latin environment
+% Inside the environemnt everything is like in the standard LaTeX Mode
+%
+\newenvironment{latin}{\language0\l@tinm@de%
+\t@f@m\t@f@nt\ignorespaces}%
+{\xdef\t@f@nt{\the\font}\xdef\t@f@m{\noexpand\fam\the\fam}}
+\gdef\t@f@nt{\rm}
+\gdef\t@f@m{\fam0}
+%
+% Redifine the set greek macro to point to latin instead of greek
+%
+\gdef\@setgr@@k{\gdef\t@f@nt{\rm}\ifnum\language=\greek\gr\else\rm\fi}
+%
+% Finally we need to redifine the today macro
+%
+\def\today{\number\day\space \ifcase\month\or
+ Ianouar'iou\or Febrouar'iou\or Mart'iou\or April'iou\or Ma'iou\or Ioun'iou\or
+ Ioul'iou\or Augo'ustou\or Septembr'iou\or Oktwbr'iou\or Noembr'iou\or
+ Dekembr'iou\fi\space \number\year}
+
+\endinput
+% End of file grmode.sty
diff --git a/fonts/greek/kd/latex/lfonts.tex b/fonts/greek/kd/latex/lfonts.tex
new file mode 100644
index 0000000000..d5b7c3835b
--- /dev/null
+++ b/fonts/greek/kd/latex/lfonts.tex
@@ -0,0 +1,889 @@
+% File LFONTS - Version of 25 November 1991
+%
+% This version of LFONTS.TEX is for the CMR fonts. It was converted
+% from the AMR version by David Fuchs on 18 December 1985.
+% And corrected on 11 Nov 1986 by Leslie Lamport.
+% Last vestige of AMR fonts removed 3 Mar 89 by Leslie Lamport.
+% Added \endinput 10 Oct 91 by RmS.
+% Added some \relax in front of \if's 25 Nov 91 by RmS.
+
+% This file needs to be customized for the fonts available at a particular
+% site. There are three places where changes need to be made. They
+% can be found by searching this file for the string FONT-CUSTOMIZING.
+%
+% FONT CONVENTIONS
+%
+% A TYPESTYLE COMMAND is something like \it that defines a type style.
+% Each style command \xx is defined to be \protect\pxx, where
+% \pxx is defined to choose the correct font for the current size.
+% This allows style commands to appear in 'unsafe' arguments where
+% protection is required.
+%
+% A SIZE COMMAND is something like \normalsize that defines a type size.
+% It is defined by the document style. However, \normalsize is handled
+% somewhat differently because it is called so often--e.g., on every
+% page by the output routine. The document style defines \@normalsize
+% instead of \normalsize.
+%
+% A ONE-SIZE typestyle is one that exists only in the \normalsize size.
+%
+% A FONT-SIZE COMMAND is one that defines \textfont, \scriptfont and
+% \scriptscriptfont for the font families corresponding to preloaded fonts,
+% as well as the typestyle commands for the preloaded fonts. Each
+% font-size command has an associated @fontsize command, having the same
+% name except for an '@' at the front. All font-size commands are defined
+% in LFONTS. The naming convention is that a fifteenpt font has a font-size
+% name \xvpt, and so on.
+%
+% Each size command \SIZE executes the command
+% \@setsize\SIZE{BASELINESKIP}\FONTSIZE\@FONTSIZE
+% which does the following.
+% 0. Executes \@nomath\SIZE to issue warning if in math mode.
+% 1. \let \@currsize = \SIZE
+% 2. Sets \strutbox to a strut of height .7 * BASELINESKIP and
+% depth .3 * BASELINESKIP
+%
+% Note: Charles Karney observed that step 2 is useless, since the
+% \FONTSIZE command executed in step 4 resets \strutbox using
+% the actual baselineskip, which is \baselinestretch * BASELINESKIP.
+% Some day, this step may get removed. (Note made 28 Feb 89)
+%
+% 3. Sets \baselineskip to \baselinestretch * BASELINESKIP
+% and
+% 4. Calls \FONTSIZE
+% 5. Executes the \@FONTSIZE command.
+% It should then define all the typestyle commands not defined by the font-size
+% command, except for the one-size type styles. A typestyle command for which
+% the corresponding font exists but is not preloaded is defined to expand to a
+% \@getfont command. A typestyle whose font does not exist is defined to
+% expand to a \@subfont command.
+%
+% A one-size typestyle whose font is not preloaded is defined to expand to
+% a \@onesizefont command.
+%
+% \em is defined to be \it inside an unslanted style and \rm inside a
+% slanted style. An \em command in a section title will produce a \pem
+% command in the table of contents.
+%
+
+\def\em{\protect\pem{}}
+\def\pem{\relax\ifdim \fontdimen\@ne\font >\z@ \rm \else \it \fi}
+
+\def\normalsize{\relax\ifx\@currsize\normalsize \rm \else \@normalsize\fi}
+
+% \load{SIZE}{STYLE} : Solves anomaly of loaded-on-demand font
+% used for first time in math mode. Give this command outside math
+% mode, before formula using it for first time.
+\def\load#1#2{\let\@tempa\@currsize \let\@currsize\relax #1#2\@tempa}
+
+% \newfont{\CMD}{FONT} defines \CMD to be the font FONT.
+% It is equivalent to \font \CMD = FONT
+% \symbol{NUM} == \char NUM
+
+\def\newfont#1#2{\@ifdefinable #1{\font #1=#2\relax}}
+\def\symbol#1{\char #1\relax}
+
+
+
+% \@getfont \STYLE \FAM \@FONTSIZE{LOADING.INFO}
+% \STYLE = style command
+% \FAM = a control sequence defined by \newfam\FAM
+% \@FONTSIZE = the @fontsize command for the current size.
+% LOADING.INFO = information needed to load the font--e.g.,
+% cmtti10 \magstep 2
+% Does the following, where \FONTNAME denotes a new unique, untypeable
+% font name:
+% 1. Executes \font \FONTNAME = LOADING.INFO
+% 2. Appends '\textfont FAM \FONTNAME \def\STYLE{\fam \FAM \FONTNAME}'
+% to the definition of \@FONTSIZE.
+% 3. Executes \@FONTSIZE \STYLE.
+%
+% \@nohyphens\STYLE\@FONTSIZE
+% Used right after \@getfont to set \hyphenchar of the new font to -1,
+% thereby prohibiting hyphenation. It is used with \tt fonts.
+% (\@nohyphens was added on 12/18/85)
+%
+% \@subfont \STYLE \REPSTYLE
+% \STYLE, \REPSTYLE = type style commands.
+% Types warning message and defines uses \REPSTYLE.
+%
+% \@onesizefont \STYLE {LOADING.INFO}
+% Defines \STYLE to be a typestyle that exists only for the \normalsize
+% size. It produces the font specified by LOADING.INFO
+%
+% \@addfontinfo\@FONTSIZE{DEFS}
+% Expands DEFS and adds to the definition of \@FONTSIZE. Items that should
+% not be expanded should be protected with \@prtct---except no protection
+% is needed for '\def\foo', only for the contents of the definition.
+%
+% \@nomath\CS : Types a warning '\CS used in math mode' if encountered
+% in math mode.
+
+% Remove \outer from definition of \newfam
+\def\newfam{\alloc@8\fam\chardef\sixt@@n}
+
+\def\@setsize#1#2#3#4{\@nomath#1\let\@currsize#1\baselineskip
+ #2\setbox\strutbox\hbox{\vrule height.7\baselineskip
+ depth.3\baselineskip width\z@}\baselineskip\baselinestretch\baselineskip
+ \normalbaselineskip\baselineskip#3#4}
+
+\newif\if@bold
+
+\let\@prtct=\relax
+
+\def\@addfontinfo#1#2{{\def\@prtct{\noexpand\@prtct\noexpand}\def\def{\noexpand
+ \def\noexpand}\xdef#1{#1#2}}}
+
+\def\@getfont#1#2#3#4{\@ifundefined{\string #1\string #3}{\global\expandafter
+ \font \csname \string #1\string #3\endcsname #4\relax
+ \@addfontinfo#3{\textfont #2\csname \string #1\string #3\endcsname
+ \scriptfont #2\csname \string #1\string #3\endcsname
+ \scriptscriptfont #2\csname \string #1\string #3\endcsname
+ \def#1{\fam #2\csname\string #1\string #3\endcsname}}}{}#3#1}
+
+\def\@nohyphens#1#2{\global\expandafter \hyphenchar\csname
+ \string #1\string #2\endcsname \m@ne}
+
+\def\@subfont#1#2{\@warning{No \string#1\space typeface in
+ this size, using \string#2}#2}
+
+\def\@onesizefont#1#2{\expandafter\newfam\csname fm\string#1\endcsname
+ \global\expandafter\font\csname ft\string#1\endcsname #2\relax
+ \gdef#1{\relax\ifx \@currsize\normalsize \@ftfam#1\else
+ \@warning{Typeface \string#1\space available only in
+ \string\normalsize, using \string\rm}\gdef #1{\relax\ifx \@currsize\normalsize
+ \textfont\@fontfam#1 \scriptfont\@fontfam#1 \scriptscriptfont
+ \@fontfam#1\@ftfam#1\else \rm\fi}#1\fi}#1}
+
+\def\@ftfam#1{\fam\csname fm\string#1\endcsname\csname ft\string#1\endcsname}
+
+\def\@nomath#1{\relax\ifmmode \@warning{\string#1\space in math mode.}\fi}
+\def\@nomathbold{\relax\ifmmode
+ \@warning{\string\mathbold\space in math mode.}\fi}
+
+% The following definitions save token space. E.g., using \@height
+% instead of height saves 5 tokens at the cost in time of one macro
+% expansion.
+
+\def\@height{height}
+\def\@depth{depth}
+\def\@width{width}
+
+\def\@magscale#1{ scaled \magstep #1}
+\def\@halfmag{ scaled \magstephalf}
+\def\@ptscale#1{ scaled #100}
+
+
+%% FONT-CUSTOMIZING: The following \font commands define the
+%% preloaded LaTeX fonts. Font names should be changed to cause
+%% different fonts to be loaded in place of these particular AMR fonts.
+%% \font commands should be added or deleted to change which fonts
+%% are preloaded.
+
+% five point
+ \font\fivrm = cmr5 % roman
+ \font\fivmi = cmmi5 % math italic
+ \skewchar\fivmi ='177 % for placement of accents
+%\font\fivmib = cmmib10 \@ptscale5 % bold math italic
+ \font\fivsy = cmsy5 % math symbols
+ \skewchar\fivsy ='60 % for placement of math accents
+%\font\fivsyb = cmbsy10 \@ptscale5 % bold math symbols
+%\font\fivit = cmti7 scaled 714 % text italic
+%\font\fivsl = cmsl10 \@ptscale5 % slanted
+%\font\fivbf = cmbx7 scaled 714 % extended bold
+%\font\fivbfs = cmbxsl10\@ptscale5 % extended bold slanted
+%\font\fivtt = cmtt10 \@ptscale5 % typewriter
+%\font\fivtti = cmitt10 \@ptscale5 % italic typewriter
+%\font\fivtts = cmsltt10\@ptscale5 % slanted typewriter
+%\font\fivsf = cmss10 \@ptscale5 % sans serif
+%\font\fivsfi = cmssi10 \@ptscale5 % italic sans serif
+%\font\fivsfb = cmssbx10\@ptscale5 % bold sans serif
+%\font\fivsc = cmcsc10 \@ptscale5 % small caps
+ \font\fivly = lasy5 % LaTeX symbols
+%\font\fivlyb = lasyb10 \@ptscale5 % LaTeX symbols
+%\font\fivuit = cmu10 \@ptscale5 % unslanted italic
+
+% six point
+ \font\sixrm = cmr6 % roman
+ \font\sixmi = cmmi6 % math italic
+ \skewchar\sixmi ='177 % for placement of accents
+%\font\sixmib = cmmib10 \@ptscale6 % bold math italic
+ \font\sixsy = cmsy6 % math symbols
+ \skewchar\sixsy ='60 % for placement of math accents
+%\font\sixsyb = cmbsy10 \@ptscale6 % bold math symbols
+%\font\sixit = cmti7 scaled 857 % text italic
+%\font\sixsl = cmsl10 \@ptscale6 % slanted
+%\font\sixbf = cmbx7 scaled 857 % extended bold
+%\font\sixbfs = cmbxsl10\@ptscale6 % extended bold slanted
+%\font\sixtt = cmtt10 \@ptscale6 % typewriter
+%\font\sixtti = cmitt10 \@ptscale6 % italic typewriter
+%\font\sixtts = cmsltt10\@ptscale6 % slanted typewriter
+%\font\sixsf = cmss10 \@ptscale6 % sans serif
+%\font\sixsfi = cmssi10 \@ptscale6 % italic sans serif
+%\font\sixsfb = cmssbx10\@ptscale6 % bold sans serif
+%\font\sixsc = cmcsc10 \@ptscale6 % small caps
+ \font\sixly = lasy6 % LaTeX symbols
+%\font\sixlyb = lasyb10 \@ptscale6 % LaTeX symbols
+%\font\sixuit = cmu10 \@ptscale6 % unslanted italic
+
+% seven point
+ \font\sevrm = cmr7 % roman
+ \font\sevmi = cmmi7 % math italic
+ \skewchar\sevmi ='177 % for placement of accents
+%\font\sevmib = cmmib10 \@ptscale7 % bold math italic
+ \font\sevsy = cmsy7 % math symbols
+ \skewchar\sevsy ='60 % for placement of math accents
+%\font\sevsyb = cmbsy10 \@ptscale7 % bold math symbols
+ \font\sevit = cmti7 % text italic
+%\font\sevsl = cmsl10 \@ptscale7 % slanted
+%\font\sevbf = cmbx7 % extended bold
+%\font\sevbfs = cmbxsl10\@ptscale7 % extended bold slanted
+%\font\sevtt = cmtt10 \@ptscale7 % typewriter
+%\font\sevtti = cmitt10 \@ptscale7 % italic typewriter
+%\font\sevtts = cmsltt10\@ptscale7 % slanted typewriter
+%\font\sevsf = cmss10 \@ptscale7 % sans serif
+%\font\sevsfi = cmssi10 \@ptscale7 % italic sans serif
+%\font\sevsfb = cmssbx10\@ptscale7 % bold sans serif
+%\font\sevsc = cmcsc10 \@ptscale7 % small caps
+ \font\sevly = lasy7 % LaTeX symbols
+%\font\sevlyb = lasyb10 \@ptscale7 % LaTeX symbols
+%\font\sevuit = cmu10 \@ptscale7 % unslanted italic
+
+% eight point
+ \font\egtrm = cmr8 % roman
+ \font\egtmi = cmmi8 % math italic
+ \skewchar\egtmi ='177 % for placement of accents
+%\font\egtmib = cmmib10 \@ptscale8 % bold math italic
+ \font\egtsy = cmsy8 % math symbols
+ \skewchar\egtsy ='60 % for placement of math accents
+%\font\egtsyb = cmbsy10 \@ptscale8 % bold math symbols
+ \font\egtit = cmti8 % text italic
+%\font\egtsl = cmsl8 % slanted
+%\font\egtbf = cmbx8 % extended bold
+%\font\egtbfs = cmbxsl10\@ptscale8 % extended bold slanted
+%\font\egttt = cmtt8 % typewriter
+%\font\egttti = cmitt10 \@ptscale8 % italic typewriter
+%\font\egttts = cmsltt10\@ptscale8 % slanted typewriter
+%\font\egtsf = cmss10 \@ptscale8 % sans serif
+%\font\egtsfi = cmssi10 \@ptscale8 % italic sans serif
+%\font\egtsfb = cmssbx10\@ptscale8 % bold sans serif
+%\font\egtsc = cmcsc10 \@ptscale8 % small caps
+ \font\egtly = lasy8 % LaTeX symbols
+%\font\egtlyb = lasyb10 \@ptscale8 % LaTeX symbols
+%\font\egtuit = cmu10 \@ptscale8 % unslanted italic
+
+
+% nine point
+ \font\ninrm = cmr9 % roman
+ \font\ninmi = cmmi9 % math italic
+ \skewchar\ninmi ='177 % for placement of accents
+%\font\ninmib = cmmib10 \@ptscale9 % bold math italic
+ \font\ninsy = cmsy9 % math symbols
+ \skewchar\ninsy ='60 % for placement of math accents
+%\font\ninsyb = cmbsy10 \@ptscale9 % bold math symbols
+ \font\ninit = cmti9 % text italic
+%\font\ninsl = cmsl9 % slanted
+ \font\ninbf = cmbx9 % extended bold
+%\font\ninbfs = cmbxsl10\@ptscale9 % extended bold slanted
+ \font\nintt = cmtt9 % typewriter
+ \hyphenchar\nintt = -1 % suppress hyphenation in \tt font
+%\font\nintti = cmitt10 \@ptscale9 % italic typewriter
+%\font\nintts = cmsltt10\@ptscale9 % slanted typewriter
+%\font\ninsf = cmss10 \@ptscale9 % sans serif
+%\font\ninsfi = cmssi10 \@ptscale9 % italic sans serif
+%\font\ninsfb = cmssbx10\@ptscale9 % bold sans serif
+%\font\ninsc = cmcsc10 \@ptscale9 % small caps
+ \font\ninly = lasy9 % LaTeX symbols
+%\font\ninlyb = lasyb10 \@ptscale9 % LaTeX symbols
+%\font\ninuit = cmu10 \@ptscale9 % unslanted italic
+
+% ten point
+ \font\tenrm = cmr10 % roman
+ \font\tenmi = cmmi10 % math italic
+ \skewchar\tenmi ='177 % for placement of accents
+%\font\tenmib = cmmib10 % bold math italic
+ \font\tensy = cmsy10 % math symbols
+ \skewchar\tensy ='60 % for placement of math accents
+%\font\tensyb = cmbsy10 % bold symbols
+ \font\tenit = cmti10 % text italic
+ \font\tensl = cmsl10 % slanted
+ \font\tenbf = cmbx10 % extended bold
+%\font\tenbfs = cmbxsl10 % extended bold slanted
+ \font\tentt = cmtt10 % typewriter
+ \hyphenchar\tentt = -1 % suppress hyphenation in \tt font
+%\font\tentti = cmitt10 % italic typewriter
+%\font\tentts = cmsltt10 % slanted typewriter
+ \font\tensf = cmss10 % sans serif
+%\font\tensfi = cmssi10 % italic sans serif
+%\font\tensfb = cmssbx10 % bold sans serif
+%\font\tensc = cmcsc10 % small caps
+ \font\tenly = lasy10 % LaTeX symbols
+%\font\tenlyb = lasyb10 % bold LaTeX symbols
+%\font\tenuit = cmu10 % unslanted italic
+
+% eleven point
+ \font\elvrm = cmr10 \@halfmag % roman
+ \font\elvmi = cmmi10 \@halfmag % math italic
+ \skewchar\elvmi ='177 % for placement of accents
+%\font\elvmib = cmmib10 \@halfmag % bold math italic
+ \font\elvsy = cmsy10 \@halfmag % math symbols
+ \skewchar\elvsy ='60 % for placement of math accents
+%\font\elvsyb = cmbsy10 \@halfmag % bold symbols
+ \font\elvit = cmti10 \@halfmag % text italic
+ \font\elvsl = cmsl10 \@halfmag % slanted
+ \font\elvbf = cmbx10 \@halfmag % exelvded bold
+%\font\elvbfs = cmbxsl10 \@halfmag % exelvded bold slanted
+ \font\elvtt = cmtt10 \@halfmag % typewriter
+ \hyphenchar\elvtt = -1 % suppress hyphenation in \tt font
+%\font\elvtti = cmitt10 \@halfmag % italic typewriter
+%\font\elvtts = cmsltt10 \@halfmag % slanted typewriter
+ \font\elvsf = cmss10 \@halfmag % sans serif
+%\font\elvsfi = cmssi10 \@halfmag % italic sans serif
+%\font\elvsfb = cmssbx10 \@halfmag % bold sans serif
+%\font\elvsc = cmcsc10 \@halfmag % small caps
+ \font\elvly = lasy10 \@halfmag % LaTeX symbols
+%\font\elvlyb = lasyb10 \@halfmag % bold LaTeX symbols
+%\font\elvuit = cmu10 \@halfmag % unslanted italic
+
+% twelve point
+ \font\twlrm = cmr12 % roman
+ \font\twlmi = cmmi12 % math italic
+ \skewchar\twlmi ='177 % for placement of accents
+%\font\twlmib = cmmib10 \@magscale1 % bold math italic
+ \font\twlsy = cmsy10 \@magscale1 % math symbols
+ \skewchar\twlsy ='60 % for placement of math accents
+%\font\twlsyb = cmbsy10 \@magscale1 % bold symbols
+ \font\twlit = cmti12 % text italic
+ \font\twlsl = cmsl12 % slanted
+ \font\twlbf = cmbx12 % extended bold
+%\font\twlbfs = cmbxsl10 \@magscale1 % extended bold slanted
+ \font\twltt = cmtt12 % typewriter
+ \hyphenchar\twltt = -1 % suppress hyphenation in \tt font
+%\font\twltti = cmitt10 \@magscale1 % italic typewriter
+%\font\twltts = cmsltt10 \@magscale1 % slanted typewriter
+ \font\twlsf = cmss12 % sans serif
+%\font\twlsfi = cmssi10 \@magscale1 % italic sans serif
+%\font\twlsfb = cmssbx10 \@magscale1 % bold sans serif
+%\font\twlsc = cmcsc10 \@magscale1 % small caps
+ \font\twlly = lasy10 \@magscale1 % LaTeX symbols
+%\font\twllyb = lasyb10 \@magscale1 % bold LaTeX symbols
+%\font\twluit = cmu10 \@magscale1 % unslanted italic
+
+% fourteen point
+ \font\frtnrm = cmr10 \@magscale2 % roman
+ \font\frtnmi = cmmi10 \@magscale2 % math italic
+ \skewchar\frtnmi ='177 % for placement of accents
+%\font\frtnmib = cmmib10 \@magscale2 % bold math italic
+ \font\frtnsy = cmsy10 \@magscale2 % math symbols
+ \skewchar\frtnsy ='60 % for placement of math accents
+%\font\frtnsyb = cmbsy10 \@magscale2 % bold symbols
+%\font\frtnit = cmti10 \@magscale2 % text italic
+%\font\frtnsl = cmsl10 \@magscale2 % slanted
+ \font\frtnbf = cmbx10 \@magscale2 % extended bold
+%\font\frtnbfs = cmbxsl10 \@magscale2 % extended bold slanted
+%\font\frtntt = cmtt10 \@magscale2 % typewriter
+%\font\frtntti = cmitt10 \@magscale2 % italic typewriter
+%\font\frtntts = cmsltt10 \@magscale2 % slanted typewriter
+%\font\frtnsf = cmss10 \@magscale2 % sans serif
+%\font\frtnsfi = cmssi10 \@magscale2 % italic sans serif
+%\font\frtnsfb = cmssbx10 \@magscale2 % bold sans serif
+%\font\frtnsc = cmcsc10 \@magscale2 % small caps
+ \font\frtnly = lasy10 \@magscale2 % LaTeX symbols
+%\font\frtnlyb = lasyb10 \@magscale2 % bold LaTeX symbols
+%\font\frtnuit = cmu10 \@magscale2 % unslanted italic
+
+% seventeen point
+ \font\svtnrm = cmr17 % roman
+ \font\svtnmi = cmmi10 \@magscale3 % math italic
+ \skewchar\svtnmi ='177 % for placement of accents
+%\font\svtnmib = cmmib10 \@magscale3 % bold math italic
+ \font\svtnsy = cmsy10 \@magscale3 % math symbols
+ \skewchar\svtnsy ='60 % for placement of math accents
+%\font\svtnsyb = cmbsy10 \@magscale3 % bold symbols
+%\font\svtnit = cmti10 \@magscale3 % text italic
+%\font\svtnsl = cmsl10 \@magscale3 % slanted
+ \font\svtnbf = cmbx10 \@magscale3 % extended bold
+%\font\svtnbfs = cmbxsl10 \@magscale3 % extended bold slanted
+%\font\svtntt = cmtt10 \@magscale3 % typewriter
+%\font\svtntti = cmitt10 \@magscale3 % italic typewriter
+%\font\svtntts = cmsltt10 \@magscale3 % slanted typewriter
+%\font\svtnsf = cmss10 \@magscale3 % sans serif
+%\font\svtnsfi = cmssi10 \@magscale3 % italic sans serif
+%\font\svtnsfb = cmssbx10 \@magscale3 % bold sans serif
+%\font\svtnsc = cmcsc10 \@magscale3 % small caps
+ \font\svtnly = lasy10 \@magscale3 % LaTeX symbols
+%\font\svtnlyb = lasyb10 \@magscale3 % bold LaTeX symbols
+%\font\svtnuit = cmu10 \@magscale3 % unslanted italic
+
+% twenty point
+ \font\twtyrm = cmr10 \@magscale4 % roman
+ \font\twtymi = cmmi10 \@magscale4 % math italic
+ \skewchar\twtymi ='177 % for placement of accents
+%\font\twtymib = cmmib10 \@magscale4 % bold math italic
+ \font\twtysy = cmsy10 \@magscale4 % math symbols
+ \skewchar\twtysy ='60 % for placement of math accents
+%\font\twtysyb = cmbsy10 \@magscale4 % bold symbols
+%\font\twtyit = cmti10 \@magscale4 % text italic
+%\font\twtysl = cmsl10 \@magscale4 % slanted
+%\font\twtybf = cmbx10 \@magscale4 % extended bold
+%\font\twtybfs = cmbxsl10 \@magscale4 % extended bold slanted
+%\font\twtytt = cmtt10 \@magscale4 % typewriter
+%\font\twtytti = cmitt10 \@magscale4 % italic typewriter
+%\font\twtytts = cmsltt10 \@magscale4 % slanted typewriter
+%\font\twtysf = cmss10 \@magscale4 % sans serif
+%\font\twtysfi = cmssi10 \@magscale4 % italic sans serif
+%\font\twtysfb = cmssbx10 \@magscale4 % bold sans serif
+%\font\twtysc = cmcsc10 \@magscale4 % small caps
+ \font\twtyly = lasy10 \@magscale4 % LaTeX symbols
+%\font\twtylyb = lasyb10 \@magscale4 % bold LaTeX symbols
+%\font\twtyuit = cmu10 \@magscale4 % unslanted italic
+
+% twenty-five point
+ \font\twfvrm = cmr10 \@magscale5 % roman
+%\font\twfvmi = cmmi10 \@magscale5 % math italic
+%\font\twfvmib = cmmib10 \@magscale5 % bold math italic
+%\font\twfvsy = cmsy10 \@magscale5 % math symbols
+%\font\twfvsyb = cmbsy10 \@magscale5 % bold symbols
+%\font\twfvit = cmti10 \@magscale5 % text italic
+%\font\twfvsl = cmsl10 \@magscale5 % slanted
+%\font\twfvbf = cmbx10 \@magscale5 % extended bold
+%\font\twfvbfs = cmbxsl10 \@magscale5 % extended bold slanted
+%\font\twfvtt = cmtt10 \@magscale5 % typewriter
+%\font\twfvtti = cmitt10 \@magscale5 % italic typewriter
+%\font\twfvtts = cmsltt10 \@magscale5 % slanted typewriter
+%\font\twfvsf = cmss10 \@magscale5 % sans serif
+%\font\twfvsfi = cmssi10 \@magscale5 % italic sans serif
+%\font\twfvsfb = cmssbx10 \@magscale5 % bold sans serif
+%\font\twfvsc = cmcsc10 \@magscale5 % small caps
+%\font\twfvly = lasy10 \@magscale5 % LaTeX symbols
+%\font\twfvlyb = lasyb10 \@magscale5 % bold LaTeX symbols
+%\font\twfvuit = cmu10 \@magscale5 % unslanted italic
+
+% Math extension
+ \font\tenex = cmex10
+
+% line & circle fonts
+\font\tenln = line10
+\font\tenlnw = linew10
+\font\tencirc = lcircle10 % 21 Nov 89 : circle10 -> lcircle10
+\font\tencircw = lcirclew10 % 21 Nov 89 : circlew10 -> lcirclew10
+
+% Change made 6 May 86: `\@warning' replaced by `\immediate\write 15'
+% since it's not defined when lfonts.tex is read by lplain.tex.
+%
+\ifnum\fontdimen8\tenln=\fontdimen8\tencirc \else
+ \immediate\write 15{Incompatible thin line and circle fonts}\fi
+\ifnum\fontdimen8\tenlnw=\fontdimen8\tencircw \else
+ \immediate\write 15{Incompatible thick line and circle fonts}\fi
+
+
+% protected font names
+\def\rm{\protect\prm}
+\def\it{\protect\pit}
+\def\bf{\protect\pbf}
+\def\sl{\protect\psl}
+\def\sf{\protect\psf}
+\def\sc{\protect\psc}
+\def\tt{\protect\ptt}
+
+%% FONT-CUSTOMIZING: The following definitions define certain commands
+%% to be abbreviations for certain font names. These commands are used
+%% below in \@getfont commands, which load the loaded-on-demand fonts.
+%% This is done only to save space. To change the fonts that are loaded
+%% on demand, one can either change these definitions or else change
+%% the arguments of the \@getfont commands.
+%%
+\def\@mbi{cmmib10}
+\def\@mbsy{cmbsy10}
+\def\@mcsc{cmcsc10}
+\def\@mss{cmss10}
+\def\@lasyb{lasyb10}
+
+% families
+
+\newfam\itfam % \it is family 4
+\newfam\slfam % \sl is family 5
+\newfam\bffam % \bf is family 6
+\newfam\ttfam % \tt is family 7
+\newfam\sffam % \sf is family 8
+\newfam\scfam % \sc is family 9
+\newfam\lyfam % \ly is family 10
+
+\def\cal{\fam\tw@}
+\def\mit{\fam\@ne}
+
+\def\@setstrut{\setbox\strutbox=\hbox{\vrule \@height .7\baselineskip
+ \@depth .3\baselineskip \@width\z@}}
+
+
+%% FONT-CUSTOMIZING: The commands \vpt, \vipt, ... , \xxvpt perform all
+%% the declarations needed to change the type size to 5pt, 6pt, ... ,
+%% 25pt. To see how this works, consider the definition of \viipt,
+%% which determines the fonts used in a 7pt type size. The command
+%% \def\pit{\fam\itfam\sevit}
+%% means that the \it command causes the preloaded \sevit font to
+%% be used--this font was defined earlier with a \font\sevit...
+%% command. The commands
+%% \textfont\itfam\sevit
+%% \scriptfont\itfam\sevit
+%% \scriptscriptfont\itfam\sevit
+%% tell TeX to use the \sevit font for all three math-mode sizes
+%% (text, script, and scriptscript) for the 7pt size.
+%% The fonts appearing in these commands must be preloaded.
+%%
+%% The command
+%% \def\pbf{\@getfont\pbf\bffam\@viipt{ambx7}}
+%% declares \bf to use a loaded-on-demand font--namely, the font
+%% ambx7.
+%%
+%% The command
+%% \def\ptt{\@subfont\tt\rm}
+%% declares that the \tt font is unavailable in the 7pt size, so
+%% the \rm font is used instead. (The substituted type style should
+%% correspond to a preloaded size.)
+
+\def\vpt{\textfont\z@\fivrm
+ \scriptfont\z@\fivrm \scriptscriptfont\z@\fivrm
+\textfont\@ne\fivmi \scriptfont\@ne\fivmi \scriptscriptfont\@ne\fivmi
+\textfont\tw@\fivsy \scriptfont\tw@\fivsy \scriptscriptfont\tw@\fivsy
+\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
+\def\prm{\fam\z@\fivrm}%
+\def\unboldmath{\everymath{}\everydisplay{}\@nomath
+ \unboldmath\fam\@ne\@boldfalse}\@boldfalse
+\def\boldmath{\@subfont\boldmath\unboldmath}%
+\def\pit{\@subfont\it\rm}%
+\def\psl{\@subfont\sl\rm}%
+\def\pbf{\@getfont\pbf\bffam\@vpt{cmbx5}}%
+\def\ptt{\@subfont\tt\rm}%
+\def\psf{\@subfont\sf\rm}%
+\def\psc{\@subfont\sc\rm}%
+\def\ly{\fam\lyfam\fivly}\textfont\lyfam\fivly
+ \scriptfont\lyfam\fivly \scriptscriptfont\lyfam\fivly
+\@setstrut\rm}
+
+\def\@vpt{}
+
+\def\vipt{\textfont\z@\sixrm
+ \scriptfont\z@\sixrm \scriptscriptfont\z@\sixrm
+\textfont\@ne\sixmi \scriptfont\@ne\sixmi \scriptscriptfont\@ne\sixmi
+\textfont\tw@\sixsy \scriptfont\tw@\sixsy \scriptscriptfont\tw@\sixsy
+\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
+\def\prm{\fam\z@\sixrm}%
+\def\unboldmath{\everymath{}\everydisplay{}\@nomath
+ \unboldmath\@boldfalse}\@boldfalse
+\def\boldmath{\@subfont\boldmath\unboldmath}%
+\def\pit{\@subfont\it\rm}%
+\def\psl{\@subfont\sl\rm}%
+\def\pbf{\@getfont\pbf\bffam\@vipt{cmbx6}}%
+\def\ptt{\@subfont\tt\rm}%
+\def\psf{\@subfont\sf\rm}%
+\def\psc{\@subfont\sc\rm}%
+\def\ly{\fam\lyfam\sixly}\textfont\lyfam\sixly
+ \scriptfont\lyfam\sixly \scriptscriptfont\lyfam\sixly
+\@setstrut\rm}
+
+\def\@vipt{}
+
+\def\viipt{\textfont\z@\sevrm
+ \scriptfont\z@\sixrm \scriptscriptfont\z@\fivrm
+\textfont\@ne\sevmi \scriptfont\@ne\fivmi \scriptscriptfont\@ne\fivmi
+\textfont\tw@\sevsy \scriptfont\tw@\fivsy \scriptscriptfont\tw@\fivsy
+\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
+\def\prm{\fam\z@\sevrm}%
+\def\unboldmath{\everymath{}\everydisplay{}\@nomath
+\unboldmath\@boldfalse}\@boldfalse
+\def\boldmath{\@subfont\boldmath\unboldmath}%
+\def\pit{\fam\itfam\sevit}\textfont\itfam\sevit
+ \scriptfont\itfam\sevit \scriptscriptfont\itfam\sevit
+\def\psl{\@subfont\sl\it}%
+\def\pbf{\@getfont\pbf\bffam\@viipt{cmbx7}}%
+\def\ptt{\@subfont\tt\rm}%
+\def\psf{\@subfont\sf\rm}%
+\def\psc{\@subfont\sc\rm}%
+\def\ly{\fam\lyfam\sevly}\textfont\lyfam\sevly
+ \scriptfont\lyfam\fivly \scriptscriptfont\lyfam\fivly
+\@setstrut \rm}
+
+\def\@viipt{}
+
+\def\viiipt{\textfont\z@\egtrm
+ \scriptfont\z@\sixrm \scriptscriptfont\z@\fivrm
+\textfont\@ne\egtmi \scriptfont\@ne\sixmi \scriptscriptfont\@ne\fivmi
+\textfont\tw@\egtsy \scriptfont\tw@\sixsy \scriptscriptfont\tw@\fivsy
+\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
+\def\prm{\fam\z@\egtrm}%
+\def\unboldmath{\everymath{}\everydisplay{}\@nomath
+\unboldmath\@boldfalse}\@boldfalse
+\def\boldmath{\@subfont\boldmath\unboldmath}%
+\def\pit{\fam\itfam\egtit}\textfont\itfam\egtit
+ \scriptfont\itfam\sevit \scriptscriptfont\itfam\sevit
+\def\psl{\@getfont\psl\slfam\@viiipt{cmsl8}}%
+\def\pbf{\@getfont\pbf\bffam\@viiipt{cmbx8}}%
+\def\ptt{\@getfont\ptt\ttfam\@viiipt{cmtt8}\@nohyphens\ptt\@viiipt}%
+\def\psf{\@getfont\psf\sffam\@viiipt{cmss8}}%
+\def\psc{\@getfont\psc\scfam\@viiipt{\@mcsc \@ptscale8}}%
+\def\ly{\fam\lyfam\egtly}\textfont\lyfam\egtly
+ \scriptfont\lyfam\sixly \scriptscriptfont\lyfam\fivly
+\@setstrut \rm}
+
+\def\@viiipt{}
+
+\def\ixpt{\textfont\z@\ninrm
+ \scriptfont\z@\sixrm \scriptscriptfont\z@\fivrm
+\textfont\@ne\ninmi \scriptfont\@ne\sixmi \scriptscriptfont\@ne\fivmi
+\textfont\tw@\ninsy \scriptfont\tw@\sixsy \scriptscriptfont\tw@\fivsy
+\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
+\def\prm{\fam\z@\ninrm}%
+\def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
+ \@boldfalse}\@boldfalse
+\def\boldmath{\@subfont\boldmath\unboldmath}%
+\def\pit{\fam\itfam\ninit}\textfont\itfam\ninit
+ \scriptfont\itfam\sevit \scriptscriptfont\itfam\sevit
+\def\psl{\@getfont\psl\slfam\@ixpt{cmsl9}}%
+\def\pbf{\fam\bffam\ninbf}\textfont\bffam\ninbf
+ \scriptfont\bffam\ninbf \scriptscriptfont\bffam\ninbf
+\def\ptt{\fam\ttfam\nintt}\textfont\ttfam\nintt
+ \scriptfont\ttfam\nintt \scriptscriptfont\ttfam\nintt
+\def\psf{\@getfont\psf\sffam\@ixpt{cmss9}}%
+\def\psc{\@getfont\psc\scfam\@ixpt{\@mcsc \@ptscale9}}%
+\def\ly{\fam\lyfam\ninly}\textfont\lyfam\ninly
+ \scriptfont\lyfam\sixly \scriptscriptfont\lyfam\fivly
+\@setstrut \rm}
+
+\def\@ixpt{}
+
+\def\xpt{\textfont\z@\tenrm
+ \scriptfont\z@\sevrm \scriptscriptfont\z@\fivrm
+\textfont\@ne\tenmi \scriptfont\@ne\sevmi \scriptscriptfont\@ne\fivmi
+\textfont\tw@\tensy \scriptfont\tw@\sevsy \scriptscriptfont\tw@\fivsy
+\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
+\def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
+ \textfont\@ne\tenmi
+ \textfont\tw@\tensy \textfont\lyfam\tenly
+ \@boldfalse}\@boldfalse
+\def\boldmath{\@ifundefined{tenmib}{\global\font\tenmib\@mbi
+ \global\font\tensyb\@mbsy
+ \global\font\tenlyb\@lasyb\relax\@addfontinfo\@xpt
+ {\def\boldmath{\everymath{\mit}\everydisplay{\mit}\@prtct\@nomathbold
+ \textfont\@ne\tenmib \textfont\tw@\tensyb
+ \textfont\lyfam\tenlyb \@prtct\@boldtrue}}}{}\@xpt\boldmath}%
+\def\prm{\fam\z@\tenrm}%
+\def\pit{\fam\itfam\tenit}\textfont\itfam\tenit \scriptfont\itfam\sevit
+ \scriptscriptfont\itfam\sevit
+\def\psl{\fam\slfam\tensl}\textfont\slfam\tensl
+ \scriptfont\slfam\tensl \scriptscriptfont\slfam\tensl
+\def\pbf{\fam\bffam\tenbf}\textfont\bffam\tenbf
+ \scriptfont\bffam\tenbf \scriptscriptfont\bffam\tenbf
+\def\ptt{\fam\ttfam\tentt}\textfont\ttfam\tentt
+ \scriptfont\ttfam\tentt \scriptscriptfont\ttfam\tentt
+\def\psf{\fam\sffam\tensf}\textfont\sffam\tensf
+ \scriptfont\sffam\tensf \scriptscriptfont\sffam\tensf
+\def\psc{\@getfont\psc\scfam\@xpt{\@mcsc}}%
+\def\ly{\fam\lyfam\tenly}\textfont\lyfam\tenly
+ \scriptfont\lyfam\sevly \scriptscriptfont\lyfam\fivly
+\@setstrut \rm}
+
+\def\@xpt{}
+
+\def\xipt{\textfont\z@\elvrm
+ \scriptfont\z@\egtrm \scriptscriptfont\z@\sixrm
+\textfont\@ne\elvmi \scriptfont\@ne\egtmi \scriptscriptfont\@ne\sixmi
+\textfont\tw@\elvsy \scriptfont\tw@\egtsy \scriptscriptfont\tw@\sixsy
+\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
+\def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
+ \textfont\@ne\elvmi \textfont\tw@\elvsy
+ \textfont\lyfam\elvly \@boldfalse}\@boldfalse
+\def\boldmath{\@ifundefined{elvmib}{\global\font\elvmib\@mbi\@halfmag
+ \global\font\elvsyb\@mbsy\@halfmag
+ \global\font\elvlyb\@lasyb\@halfmag\relax\@addfontinfo\@xipt
+ {\def\boldmath{\everymath{\mit}\everydisplay{\mit}\@prtct\@nomathbold
+ \textfont\@ne\elvmib \textfont\tw@\elvsyb
+ \textfont\lyfam\elvlyb\@prtct\@boldtrue}}}{}\@xipt\boldmath}%
+\def\prm{\fam\z@\elvrm}%
+\def\pit{\fam\itfam\elvit}\textfont\itfam\elvit
+ \scriptfont\itfam\egtit \scriptscriptfont\itfam\sevit
+\def\psl{\fam\slfam\elvsl}\textfont\slfam\elvsl
+ \scriptfont\slfam\tensl \scriptscriptfont\slfam\tensl
+\def\pbf{\fam\bffam\elvbf}\textfont\bffam\elvbf
+ \scriptfont\bffam\ninbf \scriptscriptfont\bffam\ninbf
+\def\ptt{\fam\ttfam\elvtt}\textfont\ttfam\elvtt
+ \scriptfont\ttfam\nintt \scriptscriptfont\ttfam\nintt
+\def\psf{\fam\sffam\elvsf}\textfont\sffam\elvsf
+ \scriptfont\sffam\tensf \scriptscriptfont\sffam\tensf
+\def\psc{\@getfont\psc\scfam\@xipt{\@mcsc\@halfmag}}%
+\def\ly{\fam\lyfam\elvly}\textfont\lyfam\elvly
+ \scriptfont\lyfam\egtly \scriptscriptfont\lyfam\sixly
+\@setstrut \rm}
+
+\def\@xipt{}
+
+\def\xiipt{\textfont\z@\twlrm
+ \scriptfont\z@\egtrm \scriptscriptfont\z@\sixrm
+\textfont\@ne\twlmi \scriptfont\@ne\egtmi \scriptscriptfont\@ne\sixmi
+\textfont\tw@\twlsy \scriptfont\tw@\egtsy \scriptscriptfont\tw@\sixsy
+\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
+\def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
+ \textfont\@ne\twlmi
+ \textfont\tw@\twlsy \textfont\lyfam\twlly
+ \@boldfalse}\@boldfalse
+\def\boldmath{\@ifundefined{twlmib}{\global\font\twlmib\@mbi\@magscale1\global
+ \font\twlsyb\@mbsy \@magscale1\global\font
+ \twllyb\@lasyb\@magscale1\relax\@addfontinfo\@xiipt
+ {\def\boldmath{\everymath
+ {\mit}\everydisplay{\mit}\@prtct\@nomathbold
+ \textfont\@ne\twlmib \textfont\tw@\twlsyb
+ \textfont\lyfam\twllyb\@prtct\@boldtrue}}}{}\@xiipt\boldmath}%
+\def\prm{\fam\z@\twlrm}%
+\def\pit{\fam\itfam\twlit}\textfont\itfam\twlit \scriptfont\itfam\egtit
+ \scriptscriptfont\itfam\sevit
+\def\psl{\fam\slfam\twlsl}\textfont\slfam\twlsl
+ \scriptfont\slfam\tensl \scriptscriptfont\slfam\tensl
+\def\pbf{\fam\bffam\twlbf}\textfont\bffam\twlbf
+ \scriptfont\bffam\ninbf \scriptscriptfont\bffam\ninbf
+\def\ptt{\fam\ttfam\twltt}\textfont\ttfam\twltt
+ \scriptfont\ttfam\nintt \scriptscriptfont\ttfam\nintt
+\def\psf{\fam\sffam\twlsf}\textfont\sffam\twlsf
+ \scriptfont\sffam\tensf \scriptscriptfont\sffam\tensf
+\def\psc{\@getfont\psc\scfam\@xiipt{\@mcsc\@magscale1}}%
+\def\ly{\fam\lyfam\twlly}\textfont\lyfam\twlly
+ \scriptfont\lyfam\egtly \scriptscriptfont\lyfam\sixly
+ \@setstrut \rm}
+
+\def\@xiipt{}
+
+\def\xivpt{\textfont\z@\frtnrm
+ \scriptfont\z@\tenrm \scriptscriptfont\z@\sevrm
+\textfont\@ne\frtnmi \scriptfont\@ne\tenmi \scriptscriptfont\@ne\sevmi
+\textfont\tw@\frtnsy \scriptfont\tw@\tensy \scriptscriptfont\tw@\sevsy
+\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
+\def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
+ \textfont\@ne\frtnmi \textfont\tw@\frtnsy
+ \textfont\lyfam\frtnly \@boldfalse}\@boldfalse
+\def\boldmath{\@ifundefined{frtnmib}{\global\font
+ \frtnmib\@mbi\@magscale2\global\font\frtnsyb\@mbsy\@magscale2
+ \global\font\frtnlyb\@lasyb\@magscale2\relax\@addfontinfo\@xivpt
+ {\def\boldmath{\everymath
+ {\mit}\everydisplay{\mit}\@prtct\@nomathbold
+ \textfont\@ne\frtnmib \textfont\tw@\frtnsyb
+ \textfont\lyfam\frtnlyb\@prtct\@boldtrue}}}{}\@xivpt\boldmath}%
+\def\prm{\fam\z@\frtnrm}%
+\def\pit{\@getfont\pit\itfam\@xivpt{cmti10\@magscale2}}%
+\def\psl{\@getfont\psl\slfam\@xivpt{cmsl10\@magscale2}}%
+\def\pbf{\fam\bffam\frtnbf}\textfont\bffam\frtnbf
+ \scriptfont\bffam\tenbf \scriptscriptfont\bffam\ninbf
+\def\ptt{\@getfont\ptt\ttfam\@xivpt{cmtt10\@magscale2}\@nohyphens\ptt\@xivpt}%
+\def\psf{\@getfont\psf\sffam\@xivpt{\@mss\@magscale2}}%
+\def\psc{\@getfont\psc\scfam\@xivpt{\@mcsc\@magscale2}}%
+\def\ly{\fam\lyfam\frtnly}\textfont\lyfam\frtnly
+ \scriptfont\lyfam\tenly \scriptscriptfont\lyfam\sevly
+\@setstrut \rm}
+
+\def\@xivpt{}
+
+\def\xviipt{\textfont\z@\svtnrm
+ \scriptfont\z@\twlrm \scriptscriptfont\z@\tenrm
+\textfont\@ne\svtnmi \scriptfont\@ne\twlmi \scriptscriptfont\@ne\tenmi
+\textfont\tw@\svtnsy \scriptfont\tw@\twlsy \scriptscriptfont\tw@\tensy
+\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
+\def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
+ \textfont\@ne\svtnmi \textfont\tw@\svtnsy \textfont\lyfam\svtnly
+ \@boldfalse}\@boldfalse
+\def\boldmath{\@subfont\boldmath\unboldmath}%
+\def\prm{\fam\z@\svtnrm}%
+\def\pit{\@getfont\pit\itfam\@xviipt{cmti10\@magscale3}}%
+\def\psl{\@getfont\psl\slfam\@xviipt{cmsl10\@magscale3}}%
+\def\pbf{\fam\bffam\svtnbf}\textfont\bffam\svtnbf
+ \scriptfont\bffam\twlbf \scriptscriptfont\bffam\tenbf
+\def\ptt{\@getfont\ptt\ttfam\@xviipt{cmtt10\@magscale3}\@nohyphens
+ \ptt\@xviipt}%
+\def\psf{\@getfont\psf\sffam\@xviipt{cmss17}}%
+\def\psc{\@getfont\psc\scfam\@xviipt{\@mcsc\@magscale3}}%
+\def\ly{\fam\lyfam\svtnly}\textfont\lyfam\svtnly
+ \scriptfont\lyfam\twlly \scriptscriptfont\lyfam\tenly
+\@setstrut \rm}
+
+\def\@xviipt{}
+
+\def\xxpt{\textfont\z@\twtyrm
+ \scriptfont\z@\frtnrm \scriptscriptfont\z@\twlrm
+\textfont\@ne\twtymi \scriptfont\@ne\frtnmi \scriptscriptfont\@ne\twlmi
+\textfont\tw@\twtysy \scriptfont\tw@\frtnsy \scriptscriptfont\tw@\twlsy
+\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
+\def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
+ \textfont\@ne\twtymi \textfont\tw@\twtysy \textfont\lyfam\twtyly
+ \@boldfalse}\@boldfalse
+\def\boldmath{\@subfont\boldmath\unboldmath}%
+\def\prm{\fam\z@\twtyrm}%
+\def\pit{\@getfont\pit\itfam\@xxpt{cmti10\@magscale4}}%
+\def\psl{\@getfont\psl\slfam\@xxpt{cmsl10\@magscale4}}%
+\def\pbf{\@getfont\pbf\bffam\@xxpt{cmbx10\@magscale4}}%
+\def\ptt{\@getfont\ptt\ttfam\@xxpt{cmtt10\@magscale4}\@nohyphens\ptt\@xxpt}%
+\def\psf{\@getfont\psf\sffam\@xxpt{\@mss\@magscale4}}%
+\def\psc{\@getfont\psc\scfam\@xxpt{\@mcsc\@magscale4}}%
+\def\ly{\fam\lyfam\twtyly}\textfont\lyfam\twtyly
+ \scriptfont\lyfam\frtnly \scriptscriptfont\lyfam\twlly
+\@setstrut \rm}
+
+\def\@xxpt{}
+
+\def\xxvpt{\textfont\z@\twfvrm
+ \scriptfont\z@\twtyrm \scriptscriptfont\z@\svtnrm
+\textfont\@ne\twtymi \scriptfont\@ne\twtymi \scriptscriptfont\@ne\svtnmi
+\textfont\tw@\twtysy \scriptfont\tw@\twtysy \scriptscriptfont\tw@\svtnsy
+\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
+\def\unboldmath{\everymath{}\everydisplay{}\@nomath\unboldmath
+ \textfont\@ne\twtymi \textfont\tw@\twtysy \textfont\lyfam\twtyly
+ \@boldfalse}\@boldfalse
+\def\boldmath{\@subfont\boldmath\unboldmath}%
+\def\prm{\fam\z@\twfvrm}%
+\def\pit{\@subfont\it\rm}%
+\def\psl{\@subfont\sl\rm}%
+\def\pbf{\@getfont\pbf\bffam\@xxvpt{cmbx10\@magscale5}}%
+\def\ptt{\@subfont\tt\rm}%
+\def\psf{\@subfont\sf\rm}%
+\def\psc{\@subfont\sc\rm}%
+\def\ly{\fam\lyfam\twtyly}\textfont\lyfam\twtyly
+ \scriptfont\lyfam\twtyly \scriptscriptfont\lyfam\svtnly
+\@setstrut \rm}
+
+\def\@xxvpt{}
+
+% SPECIAL LaTeX character definitions
+
+% Definitions of math operators added by LaTeX
+\mathchardef\mho"0A30
+\mathchardef\Join"3A31
+\mathchardef\Box"0A32
+\mathchardef\Diamond"0A33
+\mathchardef\leadsto"3A3B
+\mathchardef\sqsubset"3A3C
+\mathchardef\sqsupset"3A3D
+\def\lhd{\mathbin{< \hbox to -.43em{}\hbox{\vrule
+ \@width .065em \@height .55em \@depth .05em}\hbox to .2em{}}}
+\def\rhd{\mathbin{\hbox to .3em{}\hbox{\vrule \@width .065em \@height
+ .55em \@depth .05em}\hbox to -.43em{}>}}
+\def\unlhd{\mathbin{\leq \hbox to -.43em{}\hbox
+ {\vrule \@width .065em \@height .63em \@depth -.08em}\hbox to .2em{}}}
+\def\unrhd{\mathbin{ \hbox to .3em{}\hbox
+ {\vrule \@width .065em \@height .63em \@depth -.08em}\hbox to -.43em{}\geq}}
+
+% Definition of \$ to work in italic font (since it produces a pound sterling
+% sign in the cmit font.
+
+\def\${\protect\pdollar}
+\def\pdollar{{\ifdim \fontdimen\@ne\font >\z@ \sl \fi\char`\$}}
+
+% Definition of pound sterling sign.
+% Modified 10 Apr 89 to work in math mode.
+
+\def\pounds{\protect\ppounds}
+\def\ppounds{\relax\ifmmode\mathchar"424\else{\it \char'44}\fi}
+
+
+% Definition of \copyright changed so it works in other type styles,
+% and so it is robust
+\def\copyright{\protect\pcopyright}
+\def\pcopyright{{\rm\ooalign{\hfil
+ \raise.07ex\hbox{c}\hfil\crcr\mathhexbox20D}}}
+
+\endinput
diff --git a/fonts/greek/kd/latex/lgreek.3.0c b/fonts/greek/kd/latex/lgreek.3.0c
new file mode 100644
index 0000000000..f5506d2bec
--- /dev/null
+++ b/fonts/greek/kd/latex/lgreek.3.0c
@@ -0,0 +1,415 @@
+%
+% LGREEK.TEX
+% ---------
+%
+% K J Dryllerakis
+%
+% Sep 18, 1991
+%
+% VERSION: 3.0c
+%
+% This is the source file for building the greek format for the
+% kd fsmily of fonts.
+% This is based on Greek.tex
+%
+% Greek is defined to be language 1 or actually last_language+1.
+%
+% Pleaaaaaaaaase don't modify this file
+%
+% Note: Used in conjunction with KD Fonts
+%
+%
+% \input plain% Load the standard macro package
+% For GreekLatex we need to preload the lplain format
+\input lplain%
+%
+% Add some LaTeX Information
+%
+\everyjob{\typeout{Greek LaTeX Version 2.09-3.0[c] <9 Oct 1991>}}
+\immediate\write10{Greek LaTeX Version 2.09-3.0[c] <9 Oct 1991>}
+%
+\message{Greek Definitions:}
+%
+\message{general definitions,}
+%
+\catcode`\@=11 % We will access TeX private macros
+%\newwrite\@screen % Define a screen ouput
+%\def\showstring#1{\immediate\write\@screen{#1}}
+\let\showstring\typeout
+\def\sp@{ }\def\sp@s{\sp@\sp@\sp@\sp@\sp@\sp@\sp@\sp@\sp@}
+\def\c@p{\showstring{}\showstring{\sp@s\sp@s\sp@s GreekTeX -- Version 3.0[c]}%
+\showstring{\sp@s\sp@s\sp@s ---------------------------}
+\showstring{\sp@s GreekTeX is a macro package for typesetting greek texts.}
+\showstring{\sp@s It is maily compatible with the haralambous package,}
+\showstring{\sp@s from which it inherits the top level macros.}
+\showstring{\sp@s GreekTeX includes easy access to font families, a choise}
+\showstring{\sp@s of delimiters, and makes typesetting scientific papers}
+\showstring{\sp@s in greek as easy as in TeX itself.}
+\showstring{\sp@s}
+\showstring{\sp@s\sp@s\sp@s Copyright K J Dryllerakis 1991}
+\showstring{\sp@s\sp@s\sp@s ------------------------------}%
+}
+\c@p
+%
+% A List of Reserved Keywords that should not be redefined
+% ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
+%
+% a. accesible from the document
+%
+% \| The character |
+% \begingreek Begin a group of greek text
+% \endgreek End a group of greek text
+% \greek A new language definition
+% \gr switch to classical greek font
+% \gbf switch to classical boldface font
+% \git switch to classical italics font
+% \gsl switch to classical slanted font
+% \gtt switch to classical typewritter font
+% \gt Greater than > symbol
+% \lt Less than < symbol
+% \math If we are using $ as del. it is equiv to $
+% \setgreek Select greek mode to be the primary mode
+% \setlatin Restore standard mode (at any stage)
+% \showstring Log a string on the terminal
+%
+% b. Internal Control Sequences
+%
+% \gr@@kdelimsbar Use | as begin- and end-greek
+% \gr@@kdelimsdol Use $ as begin- and end-greek
+% \@ldend A copy of plain TeX's \end
+% \@screen Screen Output for messages
+% \t@f@nt Remembers greek font used last
+% \t@f@m Remembers greek family used last
+% \t@size Remembers greek point size used last
+% \c@p Product Copyright Notice
+% \grfam Greek classic font family register
+% \grslfam Greek slanted font family register
+% \grttfam Greek typewriter font family register
+% \grbffam Greek boldface font family register
+% \grifam Greek italics font family register
+% \l@tinm@de Definition to restore plain TeX's mode
+%
+% Start Up Definitions
+% --------------------
+%
+\ifx\gr@@kformatloaded\relax\catcode`\@=\active%
+ \endinput\else\let\gr@@kformatloaded\relax\fi
+\newif\ifdelimsbar\delimsbarfalse % Check for | as delimiter
+\chardef\|=`\| % A way to access |
+\gdef\t@f@nt{\gr} % Remember font used last
+%\gdef\t@size{\grtenpoint} % Remember size used last
+%
+\gdef\t@f@m{\fam\grfam} % Remember family used last
+% ^ THESE ARE INITIAL VALUES. DO NOT ALTER!
+\newlanguage\greek % Define Greek as a new language
+\def\lt{<} % Remember Less than
+\def\gt{>} % and greater than signs
+\language0 % Switch to default language
+%
+\message{fonts,}
+%
+\input grfonts.tex
+%
+% Greek Font Bits
+% _______________
+%
+% First we load the greek fonts and declare the families
+% Then we define point sizes for typesetting greek texts
+%
+% Classic Greek Family
+% ^^^^^^^^^^^^^^^^^^^^
+%\newfam\grfam
+%\font\tengr=kdgr10 % 10 point Classic Greek Font
+%\font\ninegr=kdgr9 % 9 point Classic Greek Font
+%\font\eightgr=kdgr8 % 8 point Classic Greek Font
+%\font\sixgr=kdgr8 at 6truept % 6 point simulated Classic Greek (x.75)
+%\def\gr{\tengr\fam\grfam}
+%%
+% Slanted Greek Family
+% ^^^^^^^^^^^^^^^^^^^^
+%\newfam\grslfam
+%\font\tengrsl=kdsl10 % 10 Point Slanted Greek Font
+%\font\ninegrsl=kdsl10 at 9truept% 9 point (sim.) Slanted Greek
+%\font\eightgrsl=kdsl10 at 8truept%8 point (sim.) Slanted Greek
+%\def\gsl{\tengrsl\fam\grslfam}
+%%
+% Boldface Greek Family
+% ^^^^^^^^^^^^^^^^^^^^^
+%\newfam\grbffam
+%\font\tengrbf=kdbf10 % 10 Point Boldface Greek Font
+%\font\ninegrbf=kdbf10 at 9truept% 9 Point (sim.) Boldface Greek
+%\font\eightgrbf=kdbf10 at 8truept% 8 Point (sim.) Boldface Greek
+%\def\gbf{\tengrbf\fam\grbffam}
+%
+% Italic Greek Family
+% ^^^^^^^^^^^^^^^^^^^
+%\newfam\grifam
+%\font\tengri=kdti10 % 10 Point Italic Greek Font
+%\font\ninegri=kdti10 at 9truept % 9 Point (sim.) Italic Greek
+%\font\eightgri=kdti10 at 8truept% 8 Point (sim.) Italic Greek
+%\def\git{\tengri\fam\grifam}
+%
+% Typerwriter Greek Family
+% ^^^^^^^^^^^^^^^^^^^^^^^^
+%\newfam\grttfam
+%\font\tengrtt=kdtt10 % 10 Point Typewritter Greek Font
+%\font\ninegrtt=kdtt10 at 9truept% 9 Point (sim.) Typewritter Greek
+%\font\eightgrtt=kdtt10 at 8truept% 8 Point (sim.) Typewritter Greek
+%\hyphenchar\eightgrtt=-1 \hyphenchar\tengrtt=-1
+%\hyphenchar\ninegrtt=-1 % Supress Hyphenation
+%\def\gtt{\tengrtt\fam\grttfam}
+%
+% Greek Point Size Conventions
+% ^^^^^^^^^^^^^^^^^^^^^^^^^^^^
+%
+%\def\grtenpoint{% GREEK TENPOINT
+%\gdef\t@size{\grtenpoint}% Make a note of the font size
+%\textfont\grfam=\tengr\scriptfont\grfam=\eightgr\scriptscriptfont\grfam=\sixgr%
+%\textfont\grbffam=\tengrbf\scriptfont\grbffam=\ninegrbf%
+%\textfont\grifam=\tengri\scriptfont\grbffam=\ninegri%
+%\textfont\grttfam=\tengrtt%
+%\textfont\grslfam=\tengrsl%
+%\def\gr{\fam\grfam\tengr}% Switch for classic greek
+%\let\rg\gr% Also rg for compatibility
+%\def\it{\fam\grifam\tengri}% Switch for Greek Italics
+%\def\sl{\fam\grslfam\tengrsl}% Switch for Greek Slanted
+%\def\tt{\fam\grttfam\tengrtt}% Switch for Greek Typerwriter
+%\def\bf{\fam\grbffam\tengrbf}% Switch for Greek Boldface
+%\let\git\it\let\gsl\sl%
+%\let\gbf\bf\let\gtt\tt% Retain LaTeX compatibility
+%\def\rm{\fam0\tenrm}% Switch For latin roman
+%\def\lit{\fam\itfam\tenit}% Switch for latin italics
+%\def\lsl{\fam\slfam\tensl}% Switch for latin slanted
+%\def\ltt{\fam\ttfam\tentt}% Switch for latin typewriter
+%\def\lbf{\fam\bffam\tenbf}% Switch for latin boldface
+%\normalbaselineskip=.6cm% Normal Base Line distance
+%\setbox\strutbox=\hbox{\vrule height8.5pt width0pt depth4.5pt}%
+%\normalbaselines\gr%
+%}
+%\def\grninepoint{% GREEK NINEPOINT
+%\%gdef\t@size{\grninepoint}% Make a note of the font size
+%\textfont\grfam=\ninegr\scriptfont\grfam=\eightgr\scriptscriptfont\grfam=\sixgr%
+%\textfont\grbffam=\ninegrbf\scriptfont\grbffam=\eightgrbf%
+%\%textfont\grifam=\ninegri\scriptfont\grbffam=\eightgri%
+%\textfont\grttfam=\ninegrtt%
+%\textfont\grslfam=\ninegrsl%
+%\def\gr{\fam\grfam\ninegr}% Switch for classic greek
+%\let\rg\gr% Also rg for compatibility
+%\def\it{\fam\grifam\ninegri}% Switch for Greek Italics
+%\def\sl{\fam\grslfam\ninegrsl}% Switch for Greek Slanted
+%\def\tt{\fam\grttfam\ninegrtt}% Switch for Greek Typerwriter
+%\def\bf{\fam\grbffam\ninegrbf}% Switch for Greek Boldface
+%\let\git\it\let\gsl\sl%
+%\let\gbf\bf\let\gtt\tt% Retain LaTeX compatibility
+%\def\rm{\fam0\tenrm}% Switch For latin roman
+%\def\lit{\fam\itfam\nineit}% Switch for latin italics
+%\def\lsl{\fam\slfam\ninesl}% Switch for latin slanted
+%\def\ltt{\fam\ttfam\ninett}% Switch for latin typewriter
+%\def\lbf{\fam\bffam\ninebf}% Switch for latin boldface
+%\normalbaselineskip=.52cm% Normal Base Line distance
+%\setbox\strutbox=\hbox{\vrule height8pt width0pt depth3pt}%
+%\normalbaselines\gr%
+%}
+%\def\greightpoint{% GREEK EIGHTPOINT
+%\gdef\t@size{\greightpoint}% Make a note of the font size
+%\textfont\grfam=\eightgr\scriptfont\grfam=\sixgr\scriptscriptfont\grfam=\sixgr%
+%\textfont\grbffam=\eightgrbf\scriptfont\grbffam=\eightgrbf%
+%\textfont\grifam=\eightgri\scriptfont\grbffam=\eightgri%
+%\textfont\grttfam=\eightgrtt%
+%\textfont\grslfam=\eightgrsl%
+%\def\gr{\fam\grfam\eightgr}% Switch for classic greek
+%\let\rg\gr% Also rg for compatibility
+%\def\it{\fam\grifam\eightgri}% Switch for Greek Italics
+%\def\sl{\fam\grslfam\eightgrsl}% Switch for Greek Slanted
+%\def\tt{\fam\grttfam\eightgrtt}% Switch for Greek Typerwriter
+%\def\bf{\fam\grbffam\eightgrbf}% Switch for Greek Boldface
+%\let\git\it\let\gsl\sl%
+%\let\gbf\bf\let\gtt\tt% Retain LaTeX compatibility
+%\def\rm{\fam0\eightrm}% Switch For latin roman
+%\def\lit{\fam\itfam\eightit}% Switch for latin italics
+%\def\lsl{\fam\slfam\eightsl}% Switch for latin slanted
+%\def\ltt{\fam\ttfam\eighttt}% Switch for latin typewriter
+%\def\lbf{\fam\bffam\eightbf}% Switch for latin boldface
+%\normalbaselineskip=.35cm% Normal Base Line distance
+%\setbox\strutbox=\hbox{\vrule height7pt width0pt depth2pt}%
+%\normalbaselines\gr%
+%}
+%%
+%% Hyphenation Patterns
+%% ^^^^^^^^^^^^^^^^^^^^
+\message{hyphenation,}
+%
+{\language\greek
+\lefthyphenmin=2 \righthyphenmin=2 % disallow x- or -x breaks
+\def\lt{<}%
+\def\gt{>}%
+\catcode`\|=11%
+\catcode`\<=11%
+\catcode`\>=11%
+\catcode`\'=11%
+\catcode`\~=11%
+\catcode`\"=11%
+\lccode`\<=`\<%
+\lccode`\>=`\>%
+\lccode`\'=`\'%
+\lccode`\~=`\~%
+\lccode`\"=`\"%
+\lccode`\|=`\|%
+%
+\input grkhyphen%
+\catcode`\~=13%
+}
+%
+\def\showgreekhyphens#1{{\setbox0\vbox{\parfillskip\z@skip\hsize\maxdimen%
+\language\greek\tengr\pretolerance\m@ne\hbadness0\showboxdepth0\ #1}}}
+%
+%
+\message{miscellaneous macros}
+%
+% Macros For entering greek mode,
+% and delimiter preferences.
+% -------------------------------
+%
+% \begingreek : Begin a group of Greek Text.
+% ^^^^^^^^^^^^ Everything is enclosed in a group to keep
+% changes local. Then we switch to greek hyphenation
+% and iniciate the greekmode. This assigns the correct
+% \catcode values to punctuation and accentuation marks.
+% We then reload the information of the point
+% size used last and switch to the family needed.
+% The \t@f@nt and \t@f@m macro is used to ensure that
+% or fonts and families are remembered.
+%
+% \endgreek : Ends a group of Greek Text.
+% ^^^^^^^^^^ Before ending the group we save information
+% about the current font, to be used when we re-enter
+% greek mode.
+%
+% \gr@@km@de : Switches to greek interpretation of ascii characters
+% ^^^^^^^^^^^ Normally changes are kept local but can be used
+% as a general macro to obtain a global greek mode.
+% Note the different use of | if this is chosen
+% to be a delimiter.
+%
+%\def\begingreek{\bgroup\language\greek\gr@@km@de%
+%\t@size\t@f@m\t@f@nt\ignorespaces}
+% We add the currentsize info
+%\def\endgreek{\xdef\t@f@nt{\the\font}\xdef\t@f@m{\noexpand\fam\the\fam}%
+%\xdef\t@size{\@currsize}\egroup}
+%
+% Create a new LaTeX Environment
+%
+\newenvironment{greektext}{\language\greek\gr@@km@de%
+\t@f@m\t@f@nt\ignorespaces}%
+{\xdef\t@f@nt{\the\font}\xdef\t@f@m{\noexpand\fam\the\fam}}
+
+\def\gr@@km@de{%
+\ifdelimsbar\else\catcode`\|=11\fi%
+\catcode`\<=11% Turn Everything to letters!
+\catcode`\>=11% All accents are done through ligatures
+\catcode`\'=11%
+\catcode`\`=11%
+\catcode`\~=11%
+\catcode`\"=11%
+\lccode`\<=`\<%
+\lccode`\>=`\>%
+\lccode`\'=`\'%
+\lccode`\~=`\~%
+\lccode`\"=`\"%
+}
+%
+\def\l@tinm@de{%
+\catcode`\|=12%
+\catcode`\<=12% Turn Everything to what plain tex has
+\catcode`\>=12%
+\catcode`\'=12%
+\catcode`\`=12%
+\catcode`\~=13%
+\catcode`\"=12%
+\catcode`\$=3% % Restore the math symbol!
+}
+%
+% Switch Permenantly do greek mode
+%
+\def\setgreek{\delimsbarfalse\gr@@km@de\language\greek}
+%
+% and to latin as well
+%
+\def\setlatin{\l@tinm@de\language0}
+%
+% It is very frequent that the user will ask to \end the document
+% before a greek group was closed. In order to prevent this we
+% redefine the \end command after saving the old one in \@ldend.
+% The new \end checks for un-ended greek groups and if it is found
+% a warning message is issued and the group is automatically closed.
+%
+% LaTeX: This is not needed in Latex since the greek environment is
+% defined to be a LaTeX Environment so that Latex takes care of that.
+%\let\@ldend=\end
+%\gdef\end{\ifnum\language=\greek\endgreek%
+%\showstring{GreekTeX Warning: A group of greek text was automatically closed}%
+%\fi\@ldend}
+%
+% Since it is possible that switching from one language to
+% the other is very frequent, a special way to avoid \begingreek
+% and \endgreek is defined. This is done through the definition of
+% delimiters; available delims are | and $. If \greekdelims{bar}
+% is chosen then a greek block is marked as | ..greek text.. |
+% In order to access |, use \|.
+% If $ is used, use \math for math mode and \math\math for
+% display mode.
+%
+\gdef\greekdelims#1{\edef\c@mp@re{#1}\def\t@st@a{bar}\def\t@st@b{dollar}%
+\ifx\c@mp@re\t@st@a\gr@@kdelimsbar\else%
+\ifx\c@mp@re\t@st@b\gr@@kdelimsdol\fi\fi}
+%
+% Bar as delimeter
+%
+{\catcode`\|=13\gdef\gr@@kdelimsbar{\catcode`\|=13\delimsbartrue%
+\def|{\ifnum\language=\greek\end{greektext}\else\begin{greektext}\fi}}
+}
+%
+% Dollar as delimiter
+%
+\let\m@thm@de=$
+{\catcode`\$=13%
+\gdef\gr@@kdelimsdol{\catcode`\$=13%
+\def${\ifnum\language=\greek\end{greektext}\else\begin{greektext}\fi}%
+\global\let\math=\m@thm@de%
+\gdef\display{\math\math}\gdef\enddisplay{\math\math}}%
+}
+
+% Here we define some handy LaTeX Use macros
+\message{LaTeX greek macros,}
+%
+% List Enumeration. For more details see the LaTeX explanations
+%
+\def\alphgr#1{\@alph{\@nameuse{c@#1}}}
+\def\Alphgr#1{\@Alph{\@nameuse{c@#1}}}
+
+\def\@alphgr#1{\ifcase#1\or a\or b\or g\or d\else\@ialphgr{#1}\fi}
+\def\@ialphgr#1{\ifcase#1\or \or \or \or \or e\or st\or z\or h\or j\or i\or
+ k\or l\or m\or n\or x\or o\or p\or r\or s\or t\or u\or f\or q\or y\or
+ w\else\@ctrerr\fi}
+\def\@Alphgr#1{\ifcase#1\or A\or B\or G\or D\else\@Ialphgr{#1}\fi}
+\def\@Ialphgr#1{\ifcase#1\or \or \or \or \or E\or ST\or Z\or H\or J\or I\or
+ K\or L\or M\or N\or X\or O\or P\or R\or S\or T\or U\or F\or Q\or Y\or
+ W\else\@ctrerr\fi}
+
+
+
+
+
+
+\catcode`\@=12 % at signs are no longer letters
+
+%
+\def\fmtname{lgreek}\def\fmtversion{LaTeX 2.09 - Greek 3.0[c]} % identifies the current format
+
+\message{version \fmtversion .)}
+
+
+
+
+
+
diff --git a/fonts/greek/kd/latex/lgreek.tex b/fonts/greek/kd/latex/lgreek.tex
new file mode 100644
index 0000000000..29effd2148
--- /dev/null
+++ b/fonts/greek/kd/latex/lgreek.tex
@@ -0,0 +1,410 @@
+%
+% LGREEK.TEX
+% ---------
+%
+% K J Dryllerakis
+%
+% Dec 7, 1992
+%
+% VERSION: 3.1
+%
+% This is the source file for building the greek format for the
+% kd family of fonts.
+% This is based on Greek.tex
+%
+% Greek is defined to be language 1 or actually last_language+1.
+%
+% Pleaaaaaaaaase don't modify this file
+%
+% Note: Used in conjunction with KD Fonts
+%
+% Revision History:
+% VERSION 3.1
+% Level a. Official Release
+% Ver 3.0
+% Level c. Official Release
+% Level d. Corrected alphgr mistake (KJD 2.11.91)
+%
+%
+% \input plain% Load the standard macro package
+% For GreekLatex we need to preload the lplain format
+\input lplain%
+%
+% Add some LaTeX Information
+%
+\everyjob{\typeout{Greek LaTeX Version 2.09-3.1 <7 Dec 1992>}}
+\immediate\write10{Greek LaTeX Version 2.09-3.1 <7 Dec 1992>}
+%
+\message{Greek Definitions:}
+%
+\message{general definitions,}
+%
+\catcode`\@=11 % We will access TeX private macros
+%\newwrite\@screen % Define a screen ouput
+%\def\showstring#1{\immediate\write\@screen{#1}}
+\let\showstring\typeout
+\def\sp@{ }\def\sp@s{\sp@\sp@\sp@\sp@\sp@\sp@\sp@\sp@\sp@}
+\def\c@p{\showstring{}\showstring{\sp@s\sp@s\sp@s GreekTeX -- Version 3.1}%
+\showstring{\sp@s\sp@s\sp@s ---------------------------}
+\showstring{\sp@s GreekTeX is a macro package for typesetting greek texts.}
+\showstring{\sp@s It is maily compatible with the haralambous package,}
+\showstring{\sp@s from which it inherits the top level macros.}
+\showstring{\sp@s GreekTeX includes easy access to font families, a choise}
+\showstring{\sp@s of delimiters, and makes typesetting scientific papers}
+\showstring{\sp@s in greek as easy as in TeX itself.}
+\showstring{\sp@s}
+\showstring{\sp@s\sp@s\sp@s Copyright K J Dryllerakis 1991-1992}
+\showstring{\sp@s\sp@s\sp@s ------------------------------}%
+}
+\c@p
+%
+% A List of Reserved Keywords that should not be redefined
+% ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
+%
+% a. accesible from the document
+%
+% \| The character |
+% \begingreek Begin a group of greek text
+% \endgreek End a group of greek text
+% \greek A new language definition
+% \gr switch to classical greek font
+% \gbf switch to classical boldface font
+% \git switch to classical italics font
+% \gsl switch to classical slanted font
+% \gtt switch to classical typewritter font
+% \gt Greater than > symbol
+% \lt Less than < symbol
+% \math If we are using $ as del. it is equiv to $
+% \setgreek Select greek mode to be the primary mode
+% \setlatin Restore standard mode (at any stage)
+% \showstring Log a string on the terminal
+%
+% b. Internal Control Sequences
+%
+% \gr@@kdelimsbar Use | as begin- and end-greek
+% \gr@@kdelimsdol Use $ as begin- and end-greek
+% \@ldend A copy of plain TeX's \end
+% \@screen Screen Output for messages
+% \t@f@nt Remembers greek font used last
+% \t@f@m Remembers greek family used last
+% \t@size Remembers greek point size used last
+% \c@p Product Copyright Notice
+% \grfam Greek classic font family register
+% \grslfam Greek slanted font family register
+% \grttfam Greek typewriter font family register
+% \grbffam Greek boldface font family register
+% \grifam Greek italics font family register
+% \l@tinm@de Definition to restore plain TeX's mode
+%
+% Start Up Definitions
+% --------------------
+%
+\ifx\gr@@kformatloaded\relax\catcode`\@=\active%
+ \endinput\else\let\gr@@kformatloaded\relax\fi
+\newif\ifdelimsbar\delimsbarfalse % Check for | as delimiter
+\chardef\|=`\| % A way to access |
+\gdef\t@f@nt{\gr} % Remember font used last
+%\gdef\t@size{\grtenpoint} % Remember size used last
+%
+\gdef\t@f@m{\fam\grfam} % Remember family used last
+% ^ THESE ARE INITIAL VALUES. DO NOT ALTER!
+\newlanguage\greek % Define Greek as a new language
+\def\lt{<} % Remember Less than
+\def\gt{>} % and greater than signs
+\language0 % Switch to default language
+%
+\message{fonts,}
+%
+\input grfonts.tex
+%
+% Greek Font Bits
+% _______________
+%
+% First we load the greek fonts and declare the families
+% Then we define point sizes for typesetting greek texts
+%
+% Classic Greek Family
+% ^^^^^^^^^^^^^^^^^^^^
+%\newfam\grfam
+%\font\tengr=kdgr10 % 10 point Classic Greek Font
+%\font\ninegr=kdgr9 % 9 point Classic Greek Font
+%\font\eightgr=kdgr8 % 8 point Classic Greek Font
+%\font\sixgr=kdgr8 at 6truept % 6 point simulated Classic Greek (x.75)
+%\def\gr{\tengr\fam\grfam}
+%%
+% Slanted Greek Family
+% ^^^^^^^^^^^^^^^^^^^^
+%\newfam\grslfam
+%\font\tengrsl=kdsl10 % 10 Point Slanted Greek Font
+%\font\ninegrsl=kdsl10 at 9truept% 9 point (sim.) Slanted Greek
+%\font\eightgrsl=kdsl10 at 8truept%8 point (sim.) Slanted Greek
+%\def\gsl{\tengrsl\fam\grslfam}
+%%
+% Boldface Greek Family
+% ^^^^^^^^^^^^^^^^^^^^^
+%\newfam\grbffam
+%\font\tengrbf=kdbf10 % 10 Point Boldface Greek Font
+%\font\ninegrbf=kdbf10 at 9truept% 9 Point (sim.) Boldface Greek
+%\font\eightgrbf=kdbf10 at 8truept% 8 Point (sim.) Boldface Greek
+%\def\gbf{\tengrbf\fam\grbffam}
+%
+% Italic Greek Family
+% ^^^^^^^^^^^^^^^^^^^
+%\newfam\grifam
+%\font\tengri=kdti10 % 10 Point Italic Greek Font
+%\font\ninegri=kdti10 at 9truept % 9 Point (sim.) Italic Greek
+%\font\eightgri=kdti10 at 8truept% 8 Point (sim.) Italic Greek
+%\def\git{\tengri\fam\grifam}
+%
+% Typerwriter Greek Family
+% ^^^^^^^^^^^^^^^^^^^^^^^^
+%\newfam\grttfam
+%\font\tengrtt=kdtt10 % 10 Point Typewritter Greek Font
+%\font\ninegrtt=kdtt10 at 9truept% 9 Point (sim.) Typewritter Greek
+%\font\eightgrtt=kdtt10 at 8truept% 8 Point (sim.) Typewritter Greek
+%\hyphenchar\eightgrtt=-1 \hyphenchar\tengrtt=-1
+%\hyphenchar\ninegrtt=-1 % Supress Hyphenation
+%\def\gtt{\tengrtt\fam\grttfam}
+%
+% Greek Point Size Conventions
+% ^^^^^^^^^^^^^^^^^^^^^^^^^^^^
+%
+%\def\grtenpoint{% GREEK TENPOINT
+%\gdef\t@size{\grtenpoint}% Make a note of the font size
+%\textfont\grfam=\tengr\scriptfont\grfam=\eightgr\scriptscriptfont\grfam=\sixgr%
+%\textfont\grbffam=\tengrbf\scriptfont\grbffam=\ninegrbf%
+%\textfont\grifam=\tengri\scriptfont\grbffam=\ninegri%
+%\textfont\grttfam=\tengrtt%
+%\textfont\grslfam=\tengrsl%
+%\def\gr{\fam\grfam\tengr}% Switch for classic greek
+%\let\rg\gr% Also rg for compatibility
+%\def\it{\fam\grifam\tengri}% Switch for Greek Italics
+%\def\sl{\fam\grslfam\tengrsl}% Switch for Greek Slanted
+%\def\tt{\fam\grttfam\tengrtt}% Switch for Greek Typerwriter
+%\def\bf{\fam\grbffam\tengrbf}% Switch for Greek Boldface
+%\let\git\it\let\gsl\sl%
+%\let\gbf\bf\let\gtt\tt% Retain LaTeX compatibility
+%\def\rm{\fam0\tenrm}% Switch For latin roman
+%\def\lit{\fam\itfam\tenit}% Switch for latin italics
+%\def\lsl{\fam\slfam\tensl}% Switch for latin slanted
+%\def\ltt{\fam\ttfam\tentt}% Switch for latin typewriter
+%\def\lbf{\fam\bffam\tenbf}% Switch for latin boldface
+%\normalbaselineskip=.6cm% Normal Base Line distance
+%\setbox\strutbox=\hbox{\vrule height8.5pt width0pt depth4.5pt}%
+%\normalbaselines\gr%
+%}
+%\def\grninepoint{% GREEK NINEPOINT
+%\%gdef\t@size{\grninepoint}% Make a note of the font size
+%\textfont\grfam=\ninegr\scriptfont\grfam=\eightgr\scriptscriptfont\grfam=\sixgr%
+%\textfont\grbffam=\ninegrbf\scriptfont\grbffam=\eightgrbf%
+%\%textfont\grifam=\ninegri\scriptfont\grbffam=\eightgri%
+%\textfont\grttfam=\ninegrtt%
+%\textfont\grslfam=\ninegrsl%
+%\def\gr{\fam\grfam\ninegr}% Switch for classic greek
+%\let\rg\gr% Also rg for compatibility
+%\def\it{\fam\grifam\ninegri}% Switch for Greek Italics
+%\def\sl{\fam\grslfam\ninegrsl}% Switch for Greek Slanted
+%\def\tt{\fam\grttfam\ninegrtt}% Switch for Greek Typerwriter
+%\def\bf{\fam\grbffam\ninegrbf}% Switch for Greek Boldface
+%\let\git\it\let\gsl\sl%
+%\let\gbf\bf\let\gtt\tt% Retain LaTeX compatibility
+%\def\rm{\fam0\tenrm}% Switch For latin roman
+%\def\lit{\fam\itfam\nineit}% Switch for latin italics
+%\def\lsl{\fam\slfam\ninesl}% Switch for latin slanted
+%\def\ltt{\fam\ttfam\ninett}% Switch for latin typewriter
+%\def\lbf{\fam\bffam\ninebf}% Switch for latin boldface
+%\normalbaselineskip=.52cm% Normal Base Line distance
+%\setbox\strutbox=\hbox{\vrule height8pt width0pt depth3pt}%
+%\normalbaselines\gr%
+%}
+%\def\greightpoint{% GREEK EIGHTPOINT
+%\gdef\t@size{\greightpoint}% Make a note of the font size
+%\textfont\grfam=\eightgr\scriptfont\grfam=\sixgr\scriptscriptfont\grfam=\sixgr%
+%\textfont\grbffam=\eightgrbf\scriptfont\grbffam=\eightgrbf%
+%\textfont\grifam=\eightgri\scriptfont\grbffam=\eightgri%
+%\textfont\grttfam=\eightgrtt%
+%\textfont\grslfam=\eightgrsl%
+%\def\gr{\fam\grfam\eightgr}% Switch for classic greek
+%\let\rg\gr% Also rg for compatibility
+%\def\it{\fam\grifam\eightgri}% Switch for Greek Italics
+%\def\sl{\fam\grslfam\eightgrsl}% Switch for Greek Slanted
+%\def\tt{\fam\grttfam\eightgrtt}% Switch for Greek Typerwriter
+%\def\bf{\fam\grbffam\eightgrbf}% Switch for Greek Boldface
+%\let\git\it\let\gsl\sl%
+%\let\gbf\bf\let\gtt\tt% Retain LaTeX compatibility
+%\def\rm{\fam0\eightrm}% Switch For latin roman
+%\def\lit{\fam\itfam\eightit}% Switch for latin italics
+%\def\lsl{\fam\slfam\eightsl}% Switch for latin slanted
+%\def\ltt{\fam\ttfam\eighttt}% Switch for latin typewriter
+%\def\lbf{\fam\bffam\eightbf}% Switch for latin boldface
+%\normalbaselineskip=.35cm% Normal Base Line distance
+%\setbox\strutbox=\hbox{\vrule height7pt width0pt depth2pt}%
+%\normalbaselines\gr%
+%}
+%%
+%% Hyphenation Patterns
+%% ^^^^^^^^^^^^^^^^^^^^
+\message{hyphenation,}
+%
+{\language\greek
+\lefthyphenmin=2 \righthyphenmin=2 % disallow x- or -x breaks
+\def\lt{<}%
+\def\gt{>}%
+\catcode`\|=11%
+\catcode`\<=11%
+\catcode`\>=11%
+\catcode`\'=11%
+\catcode`\~=11%
+\catcode`\"=11%
+\lccode`\<=`\<%
+\lccode`\>=`\>%
+\lccode`\'=`\'%
+\lccode`\~=`\~%
+\lccode`\"=`\"%
+\lccode`\|=`\|%
+%
+\input grkhyphen%
+\catcode`\~=13%
+}
+%
+\def\showgreekhyphens#1{{\setbox0\vbox{\parfillskip\z@skip\hsize\maxdimen%
+\language\greek\tengr\pretolerance\m@ne\hbadness0\showboxdepth0\ #1}}}
+%
+%
+\message{miscellaneous macros}
+%
+% Macros For entering greek mode,
+% and delimiter preferences.
+% -------------------------------
+%
+% \begingreek : Begin a group of Greek Text.
+% ^^^^^^^^^^^^ Everything is enclosed in a group to keep
+% changes local. Then we switch to greek hyphenation
+% and iniciate the greekmode. This assigns the correct
+% \catcode values to punctuation and accentuation marks.
+% We then reload the information of the point
+% size used last and switch to the family needed.
+% The \t@f@nt and \t@f@m macro is used to ensure that
+% or fonts and families are remembered.
+%
+% \endgreek : Ends a group of Greek Text.
+% ^^^^^^^^^^ Before ending the group we save information
+% about the current font, to be used when we re-enter
+% greek mode.
+%
+% \gr@@km@de : Switches to greek interpretation of ascii characters
+% ^^^^^^^^^^^ Normally changes are kept local but can be used
+% as a general macro to obtain a global greek mode.
+% Note the different use of | if this is chosen
+% to be a delimiter.
+%
+%\def\begingreek{\bgroup\language\greek\gr@@km@de%
+%\t@size\t@f@m\t@f@nt\ignorespaces}
+% We add the currentsize info
+%\def\endgreek{\xdef\t@f@nt{\the\font}\xdef\t@f@m{\noexpand\fam\the\fam}%
+%\xdef\t@size{\@currsize}\egroup}
+%
+% Create a new LaTeX Environment
+%
+\newenvironment{greektext}{\language\greek\gr@@km@de%
+\t@f@m\t@f@nt\ignorespaces}%
+{\xdef\t@f@nt{\the\font}\xdef\t@f@m{\noexpand\fam\the\fam}}
+
+\def\gr@@km@de{%
+\ifdelimsbar\else\catcode`\|=11\fi%
+\catcode`\<=11% Turn Everything to letters!
+\catcode`\>=11% All accents are done through ligatures
+\catcode`\'=11%
+\catcode`\`=11%
+\catcode`\~=11%
+\catcode`\"=11%
+\lccode`\<=`\<%
+\lccode`\>=`\>%
+\lccode`\'=`\'%
+\lccode`\~=`\~%
+\lccode`\"=`\"%
+}
+%
+\def\l@tinm@de{%
+\catcode`\|=12%
+\catcode`\<=12% Turn Everything to what plain tex has
+\catcode`\>=12%
+\catcode`\'=12%
+\catcode`\`=12%
+\catcode`\~=13%
+\catcode`\"=12%
+\catcode`\$=3% % Restore the math symbol!
+}
+%
+% Switch Permenantly do greek mode
+%
+\def\setgreek{\delimsbarfalse\gr@@km@de\language\greek}
+%
+% and to latin as well
+%
+\def\setlatin{\l@tinm@de\language0}
+%
+% It is very frequent that the user will ask to \end the document
+% before a greek group was closed. In order to prevent this we
+% redefine the \end command after saving the old one in \@ldend.
+% The new \end checks for un-ended greek groups and if it is found
+% a warning message is issued and the group is automatically closed.
+%
+% LaTeX: This is not needed in Latex since the greek environment is
+% defined to be a LaTeX Environment so that Latex takes care of that.
+%\let\@ldend=\end
+%\gdef\end{\ifnum\language=\greek\endgreek%
+%\showstring{GreekTeX Warning: A group of greek text was automatically closed}%
+%\fi\@ldend}
+%
+% Since it is possible that switching from one language to
+% the other is very frequent, a special way to avoid \begingreek
+% and \endgreek is defined. This is done through the definition of
+% delimiters; available delims are | and $. If \greekdelims{bar}
+% is chosen then a greek block is marked as | ..greek text.. |
+% In order to access |, use \|.
+% If $ is used, use \math for math mode and \math\math for
+% display mode.
+%
+\gdef\greekdelims#1{\edef\c@mp@re{#1}\def\t@st@a{bar}\def\t@st@b{dollar}%
+\ifx\c@mp@re\t@st@a\gr@@kdelimsbar\else%
+\ifx\c@mp@re\t@st@b\gr@@kdelimsdol\fi\fi}
+%
+% Bar as delimeter
+%
+{\catcode`\|=13\gdef\gr@@kdelimsbar{\catcode`\|=13\delimsbartrue%
+\def|{\ifnum\language=\greek\end{greektext}\else\begin{greektext}\fi}}
+}
+%
+% Dollar as delimiter
+%
+\let\m@thm@de=$
+{\catcode`\$=13%
+\gdef\gr@@kdelimsdol{\catcode`\$=13%
+\def${\ifnum\language=\greek\end{greektext}\else\begin{greektext}\fi}%
+\global\let\math=\m@thm@de%
+\gdef\display{\math\math}\gdef\enddisplay{\math\math}}%
+}
+
+% Here we define some handy LaTeX Use macros
+\message{LaTeX greek macros,}
+%
+% List Enumeration. For more details see the LaTeX explanations
+%
+\def\alphgr#1{\@alphgr{\@nameuse{c@#1}}}
+\def\Alphgr#1{\@Alphgr{\@nameuse{c@#1}}}
+
+\def\@alphgr#1{\ifcase#1\or a\or b\or g\or d\else\@ialphgr{#1}\fi}
+\def\@ialphgr#1{\ifcase#1\or \or \or \or \or e\or st\or z\or h\or j\or i\or
+ k\or l\or m\or n\or x\or o\or p\or r\or s\or t\or u\or f\or q\or y\or
+ w\else\@ctrerr\fi}
+\def\@Alphgr#1{\ifcase#1\or A\or B\or G\or D\else\@Ialphgr{#1}\fi}
+\def\@Ialphgr#1{\ifcase#1\or \or \or \or \or E\or ST\or Z\or H\or J\or I\or
+ K\or L\or M\or N\or X\or O\or P\or R\or S\or T\or U\or F\or Q\or Y\or
+ W\else\@ctrerr\fi}
+
+\catcode`\@=12 % at signs are no longer letters
+%
+\def\fmtname{lgreek}\def\fmtversion{LaTeX 2.09 - Greek 3.1} % identifies the current format
+
+\message{version \fmtversion .)}