% 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