%% %% This is file `greek4cbc.sty', %% generated with the docstrip utility. %% %% The original source files were: %% %% greek4cbc.dtx (with options: `usc') %% ------------------------------------------------------------------ %% Author: Peter Wilson (Herries Press) herries dot press at earthlink dot net %% Copyright 1999--2005 Peter R. Wilson %% %% This work may be distributed and/or modified under the %% conditions of the Latex Project Public License, either %% version 1.3 of this license or (at your option) any %% later version. %% The latest version of the license is in %% http://www.latex-project.org/lppl.txt %% and version 1.3 or later is part of all distributions of %% LaTeX version 2003/06/01 or later. %% %% This work has the LPPL maintenance status "author-maintained". %% %% This work consists of the files listed in the README file. %% ------------------------------------------------------------------ \NeedsTeXFormat{LaTeX2e} \ProvidesPackage{greek4cbc}[2000/10/22 v1.1 package for 4th century BC Greek fonts] \newcommand{\givbcfamily}{\usefont{T1}{givbc}{m}{n}} \DeclareTextFontCommand{\textgivbc}{\givbcfamily} \chardef\Aalpha=`a \chardef\Abeta=`b \chardef\Agamma=`g \chardef\Adelta=`d \chardef\Aepsilon=`e \chardef\Azeta=`z \chardef\Aeta=`h \chardef\Atheta=`T \chardef\Aiota=`i \chardef\Akappa=`k \chardef\Alambda=`l \chardef\Amu=`m \chardef\Anu=`n \chardef\Axi=`x \chardef\Aomicron=`o \chardef\Api=`p \chardef\Arho=`r \chardef\Asigma=`s \chardef\Atau=`t \chardef\Aupsilon=`y \chardef\Achi=`X \chardef\Aphi=`f \chardef\Apsi=`P \chardef\Aomega=`O \chardef\ARalpha=`a \chardef\ARbeta=`B \chardef\ARgamma=`g \chardef\ARdelta=`d \chardef\ARepsilon=`e \chardef\ARzeta=`z \chardef\AReta=`h \chardef\ARtheta=`T \chardef\ARiota=`i \chardef\ARkappa=`k \chardef\ARlambda=`l \chardef\ARmu=`M \chardef\ARnu=`N \chardef\ARxi=`x \chardef\ARomicron=`o \chardef\ARpi=`p \chardef\ARrho=`R \chardef\ARsigma=`s \chardef\ARtau=`t \chardef\ARupsilon=`Y \chardef\ARchi=`X \chardef\ARphi=`F \chardef\ARpsi=`Q \chardef\ARomega=`O \newcommand{\translitgivbc}[1]{{% \@translitGiv #1}} \newcommand{\translitgivbcfont}{\mathrm} \newcommand{\@translitGiv}{% \def\Aalpha{\ensuremath{\translitgivbcfont{A}}}\def\ARalpha{\Aalpha}% \def\Abeta{\ensuremath{\translitgivbcfont{B}}}\def\ARbeta{\Abeta}% \def\Agamma{\ensuremath{\translitgivbcfont{\Gamma}}}\def\ARgamma{\Agamma}% \def\Adelta{\ensuremath{\translitgivbcfont{\Delta}}}\def\ARdelta{\Adelta}% \def\Aepsilon{\ensuremath{\translitgivbcfont{E}}}\def\ARepsilon{\Aepsilon}% \def\Azeta{\ensuremath{\translitgivbcfont{Z}}}\def\ARzeta{\Azeta}% \def\Aeta{\ensuremath{\translitgivbcfont{H}}}\def\AReta{\Aeta}% \def\Atheta{\ensuremath{\translitgivbcfont{\Theta}}}\def\ARtheta{\Atheta}% \def\Aiota{\ensuremath{\translitgivbcfont{I}}}\def\ARiota{\Aiota}% \def\Akappa{\ensuremath{\translitgivbcfont{K}}}\def\ARkappa{\Akappa}% \def\Alambda{\ensuremath{\translitgivbcfont{\Lambda}}}\def\ARlambda{\Alambda}% \def\Amu{\ensuremath{\translitgivbcfont{M}}}\def\ARmu{\Amu}% \def\Anu{\ensuremath{\translitgivbcfont{N}}}\def\ARnu{\Anu}% \def\Axi{\ensuremath{\translitgivbcfont{\Xi}}}\def\ARxi{\Axi}% \def\Aomicron{\ensuremath{\translitgivbcfont{O}}}\def\ARomicron{\Aomicron}% \def\Api{\ensuremath{\translitgivbcfont{\Pi}}}\def\ARpi{\Api}% \def\Arho{\ensuremath{\translitgivbcfont{R}}}\def\ARrho{\Arho}% \def\Asigma{\ensuremath{\translitgivbcfont{\Sigma}}}\def\ARsigma{\Asigma}% \def\Atau{\ensuremath{\translitgivbcfont{T}}}\def\ARtau{\Atau}% \def\Aupsilon{\ensuremath{\translitgivbcfont{\Upsilon}}}\def\ARupsilon{\Aupsilon}% \def\Achi{\ensuremath{\translitgivbcfont{X}}}\def\ARchi{\Achi}% \def\Aphi{\ensuremath{\translitgivbcfont{\Phi}}}\def\ARphi{\Aphi}% \def\Apsi{\ensuremath{\translitgivbcfont{\Psi}}}\def\ARpsi{\Apsi}% \def\Aomega{\ensuremath{\translitgivbcfont{\Omega}}}\def\ARomega{\Aomega}% } \endinput %% %% End of file `greek4cbc.sty'.