% greekctr.sty % 15. Juni 1990, revised 3-jan-1996, 1999-02-14 % (c) Copyright 1990-1999 J"org Knappen % Licence: GNU licence Version 2 % For additional information look after \endinput \NeedsTeXFormat{LaTeX2e} \ProvidesPackage{greekctr}[1999/02/14 Greek Counterstyle v3.0 (jk)] \def\greek#1{\@greek{\@nameuse{c@#1}}} \def\@greek#1{\ifcase#1\or\ensuremath{\alpha}\or\ensuremath{\beta}\or% \ensuremath{\gamma}\or\ensuremath{\delta}\else\@igreek{#1}\fi} \def\@igreek#1{\ifcase#1\or\or\or\or\or\ensuremath{\varepsilon}% \or\ensuremath{\zeta}\or\ensuremath{\eta}\or\ensuremath{\vartheta}% \or\ensuremath{\iota}\or\ensuremath{\kappa}\or\ensuremath{\lambda}\or% \ensuremath{\mu}\or\ensuremath{\nu}\or% \ensuremath{\xi}\or\ensuremath{o}\or\ensuremath{\pi}\or% \ensuremath{\varrho}% \or\ensuremath{\sigma}\or\ensuremath{\tau}\or\ensuremath{\upsilon}\or% \ensuremath{\varphi}\or\ensuremath{\chi}\or% \ensuremath{\psi}\or\ensuremath{\omega}\else% \ensuremath{\omega}\@ctrerr\fi} \def\Greek#1{\@Greek{\@nameuse{c@#1}}} \def\@Greek#1{\ifcase#1\or A\or B\or\ensuremath{\Gamma}\or% \ensuremath{\Delta}\else\@iGreek{#1}\fi} \def\@iGreek#1{\ifcase#1\or\or\or\or\or E\or Z\or H\or\ensuremath{\Theta}\or% I\or K\or\ensuremath{\Lambda}\or M\or N\or\ensuremath{\Xi}\or O\or% \ensuremath{\Pi}\or P\or\ensuremath{\Sigma}\or T\or% \ensuremath{\Upsilon}\or% \ensuremath{\Phi}\or X\or\ensuremath{\Psi}\or% \ensuremath{\Omega}\else\ensuremath{\Omega}\@ctrerr\fi} \endinput Usage: \renewcommand{\the}{\greek{}} \renewcommand{\the}{\Greek{}} e.g. \renewcommand{\theenumi}{\greek{enumi}} Provides \greek and \Greek for counters just like \alph. No switch to math mode is needed. \varepsilon, \vartheta and \varphi are preferred, but \pi and \sigma. Version 3 doesn't need the package amstxt any longer, since it relies on \ensuremath. Also fixed a bug in the handling of Omega. J"org Knappen, Barbarossaring 43, D-55118 Mainz, Allemagne.