diff options
author | Karl Berry <karl@freefriends.org> | 2006-01-11 23:52:48 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-01-11 23:52:48 +0000 |
commit | 16ac8348bacde6d6f553362bad641464ea2a8aab (patch) | |
tree | 3f50daf1728e67e885d485c02a14aeab85898662 /Master/texmf-dist/source/latex/epiolmec | |
parent | 5880a42898586c8a33c80704be446f52eedff303 (diff) |
trunk/Master/texmf-dist/source/latex/epiolmec
git-svn-id: svn://tug.org/texlive/trunk@252 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/source/latex/epiolmec')
-rw-r--r-- | Master/texmf-dist/source/latex/epiolmec/epiolmec.dtx | 811 | ||||
-rw-r--r-- | Master/texmf-dist/source/latex/epiolmec/epiolmec.ins | 55 |
2 files changed, 866 insertions, 0 deletions
diff --git a/Master/texmf-dist/source/latex/epiolmec/epiolmec.dtx b/Master/texmf-dist/source/latex/epiolmec/epiolmec.dtx new file mode 100644 index 00000000000..3315961bc27 --- /dev/null +++ b/Master/texmf-dist/source/latex/epiolmec/epiolmec.dtx @@ -0,0 +1,811 @@ +%% \CharacterTable +%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z +%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z +%% Digits \0\1\2\3\4\5\6\7\8\9 +%% Exclamation \! Double quote \" Hash (number) \# +%% Dollar \$ Percent \% Ampersand \& +%% Acute accent \' Left paren \( Right paren \) +%% Asterisk \* Plus \+ Comma \, +%% Minus \- Point \. Solidus \/ +%% Colon \: Semicolon \; Less than \< +%% Equals \= Greater than \> Question mark \? +%% Commercial at \@ Left bracket \[ Backslash \\ +%% Right bracket \] Circumflex \^ Underscore \_ +%% Grave accent \` Left brace \{ Vertical bar \| +%% Right brace \} Tilde \~} +%\iffalse +% +% (c) Copyright 2003 Apostolos Syropoulos +% This program can be redistributed and/or modified under the terms +% of the LaTeX Project Public License Distributed from CTAN +% archives in directory macros/latex/base/lppl.txt; either +% version 1 of the License, or any later version. +% +% Please report errors or suggestions for improvement to +% +% Apostolos Syropoulos +% 366, 28th October Str. +% GR-671 00 Xanthi, GREECE +% apostolo@ocean1.ee.duth.gr or apostolo@obelix.ee.duth.gr +% +%\fi +% \CheckSum{859} +% \iffalse This is a Metacomment +% +%<epiolmec, >\ProvidesFile{epiolmec.sty} +%<epiolmec, > [2003/11/05 v1.0 Package `epiolmec.sty'] +% +% \begin{macrocode} +%<*driver> +\documentclass{ltxdoc} +\usepackage{url} +\GetFileInfo{epiolmec.drv} +\begin{document} + \DocInput{epiolmec.dtx} +\end{document} +%</driver> +% \end{macrocode} +% \fi +% +% \title{The \textsf{epiolmec} package} +% \author{Apostolos Syropoulos\\366, 28th October Str.\\ +% GR-671 00 Xanthi, HELLAS\\ +% Email:\texttt{apostolo@obelix.ee.duth.gr}} +% \date{2003/11/05} +% \maketitle +% +%\MakeShortVerb{\|} +%\StopEventually{} +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \section{Introduction} +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% +% The \textsf{epiolmec} package defines the necessary \LaTeX\ interface to +% the Epi-Olmec font, which consists of all known glyphs of the Epi-Olmec +% script. The Epi-Olmec script is an ancient Mesoamerican logosyllabic +% script, which has been recently deciphered by Terrence Kaufman and John +% Justeson. A complete description of the script can be found in +% {\em Epi-Olmec Hieroglyphic Writing and Texts} (by Kaufman and Justeson) +% available from \url{http://www.albany.edu/anthro/maldp/EOTEXTS.pdf}. +% In addition, the reader is refereed to the article {\em Replicating Archaic +% Documents: A Typographic Challenge} (which was presented by the author of +% this package at the Euro\TeX2003 conference in Brest, France and will appear +% in TUGboat) for more information regarding the Epi-Olmec script and the +% Epi-Olmec font. +% +% Although, it is a common practice to have different files for the +% font encoding, the glyph access commands and the various support commands, +% we opted to put everything in just one file. Initially, we describe the +% source code of the package, then we provide some usage information and +% we conclude with some notes concerning our future plans. +% +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \section{The Source Code} +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% +% The first thing we need to define is a new local font encoding. The +% following code is not much of a font encoding, nevertheless it is +% required to have these minimum declarations in order to use the +% ``font encoding.'' +% \begin{macrocode} +%<*epiolmec> +\DeclareFontEncoding{LEO}{}{} +\DeclareFontSubstitution{LEO}{cmr}{m}{n} +\DeclareFontFamily{LEO}{cmr}{\hyphenchar\font=-1} +% \end{macrocode} +% Clearly, it makes no sense to have any series other than normal. So all +% of the following definitions default to the first case. +% \begin{macrocode} +\DeclareFontShape{LEO}{cmr}{m}{n}{% + <-> EpiOlmec }{} + +\DeclareFontShape{LEO}{cmr}{m}{sc}{% + <-> ssub * EO/m/n}{} + +\DeclareFontShape{LEO}{cmr}{m}{sl}{% + <-> ssub * cmr/m/n}{} + +\DeclareFontShape{LEO}{cmr}{m}{it}{% + <-> ssub * cmr/m/n}{} + +\DeclareFontShape{LEO}{cmr}{bx}{n}{% + <-> ssub * cmr/m/n}{} + +\DeclareFontShape{LEO}{cmr}{bx}{sc}{% + <-> ssub * cmr/m/n}{} + +\DeclareFontShape{LEO}{cmr}{bx}{sl}{% + <-> ssub * cmr/m/n}{} + +\DeclareFontShape{LEO}{cmr}{bx}{it}{% + <-> ssub * cmr/m/n}{} +% \end{macrocode} +% Let us now proceed with the definition of the various glyph access +% commands. First, we define the commands that can be used to access +% the various digits. Note that there is written evidence that the +% Epi-Olmec used the digit zero. However, since their numbering system +% is identical to the numbering system of the Maya people, we have +% ``borrowed'' the most common form of the Maya zero digit. +% \begin{macrocode} +\DeclareTextSymbol{\EOi}{LEO}{'00} +\DeclareTextSymbolDefault{\EOi}{LEO} + +\DeclareTextSymbol{\EOii}{LEO}{'01} +\DeclareTextSymbolDefault{\EOii}{LEO} + +\DeclareTextSymbol{\EOiii}{LEO}{'02} +\DeclareTextSymbolDefault{\EOiii}{LEO} + +\DeclareTextSymbol{\EOiv}{LEO}{'03} +\DeclareTextSymbolDefault{\EOiv}{LEO} + +\DeclareTextSymbol{\EOv}{LEO}{'04} +\DeclareTextSymbolDefault{\EOv}{LEO} + +\DeclareTextSymbol{\EOvi}{LEO}{'05} +\DeclareTextSymbolDefault{\EOvi}{LEO} + +\DeclareTextSymbol{\EOvii}{LEO}{'06} +\DeclareTextSymbolDefault{\EOvii}{LEO} + +\DeclareTextSymbol{\EOviii}{LEO}{'07} +\DeclareTextSymbolDefault{\EOviii}{LEO} + +\DeclareTextSymbol{\EOix}{LEO}{'10} +\DeclareTextSymbolDefault{\EOix}{LEO} + +\DeclareTextSymbol{\EOx}{LEO}{'11} +\DeclareTextSymbolDefault{\EOx}{LEO} + +\DeclareTextSymbol{\EOxi}{LEO}{'12} +\DeclareTextSymbolDefault{\EOxi}{LEO} + +\DeclareTextSymbol{\EOxii}{LEO}{'13} +\DeclareTextSymbolDefault{\EOxii}{LEO} + +\DeclareTextSymbol{\EOxiii}{LEO}{'14} +\DeclareTextSymbolDefault{\EOxiii}{LEO} + +\DeclareTextSymbol{\EOxiv}{LEO}{'15} +\DeclareTextSymbolDefault{\EOxiv}{LEO} + +\DeclareTextSymbol{\EOxv}{LEO}{'16} +\DeclareTextSymbolDefault{\EOxv}{LEO} + +\DeclareTextSymbol{\EOxvi}{LEO}{'17} +\DeclareTextSymbolDefault{\EOxvi}{LEO} + +\DeclareTextSymbol{\EOxvii}{LEO}{'20} +\DeclareTextSymbolDefault{\EOxvii}{LEO} + +\DeclareTextSymbol{\EOxviii}{LEO}{'21} +\DeclareTextSymbolDefault{\EOxviii}{LEO} + +\DeclareTextSymbol{\EOxix}{LEO}{'22} +\DeclareTextSymbolDefault{\EOxix}{LEO} + +\DeclareTextSymbol{\EOxx}{LEO}{'23} +\DeclareTextSymbolDefault{\EOxx}{LEO} + +\DeclareTextSymbol{\EOzero}{LEO}{'24} +\DeclareTextSymbolDefault{\EOzero}{LEO} +% \end{macrocode} +% +% The commands that follow can be used to access the glyphs that are shown +% in Figure~4 on page~5 of the text by Kaufman and Justeson. Somehow, we +% can claim that this is the basic set of glyphs of the Epi-Olmec script. +% +% \begin{macrocode} +\DeclareTextSymbol{\EOpi}{LEO}{'60} +\DeclareTextSymbolDefault{\EOpi}{LEO} + +\DeclareTextSymbol{\EOpe}{LEO}{'61} +\DeclareTextSymbolDefault{\EOpe}{LEO} + +\DeclareTextSymbol{\EOpuu}{LEO}{'62} +\DeclareTextSymbolDefault{\EOpuu}{LEO} + +\DeclareTextSymbol{\EOpa}{LEO}{'63} +\DeclareTextSymbolDefault{\EOpa}{LEO} + +\DeclareTextSymbol{\EOvarpa}{LEO}{'64} +\DeclareTextSymbolDefault{\EOvarpa}{LEO} + +\DeclareTextSymbol{\EOpu}{LEO}{'65} +\DeclareTextSymbolDefault{\EOpu}{LEO} + +\DeclareTextSymbol{\EOpo}{LEO}{'66} +\DeclareTextSymbolDefault{\EOpo}{LEO} + +\DeclareTextSymbol{\EOti}{LEO}{'67} +\DeclareTextSymbolDefault{\EOti}{LEO} + +\DeclareTextSymbol{\EOte}{LEO}{'70} +\DeclareTextSymbolDefault{\EOte}{LEO} + +\DeclareTextSymbol{\EOtuu}{LEO}{'71} +\DeclareTextSymbolDefault{\EOtuu}{LEO} + +\DeclareTextSymbol{\EOta}{LEO}{'72} +\DeclareTextSymbolDefault{\EOta}{LEO} + +\DeclareTextSymbol{\EOtu}{LEO}{'73} +\DeclareTextSymbolDefault{\EOtu}{LEO} + +\DeclareTextSymbol{\EOto}{LEO}{'74} +\DeclareTextSymbolDefault{\EOto}{LEO} + +\DeclareTextSymbol{\EOtzi}{LEO}{'75} +\DeclareTextSymbolDefault{\EOtzi}{LEO} + +\DeclareTextSymbol{\EOtze}{LEO}{'76} +\DeclareTextSymbolDefault{\EOtze}{LEO} + +\DeclareTextSymbol{\EOtzuu}{LEO}{'77} +\DeclareTextSymbolDefault{\EOtzuu}{LEO} + +\DeclareTextSymbol{\EOtza}{LEO}{'100} +\DeclareTextSymbolDefault{\EOtza}{LEO} + +\DeclareTextSymbol{\EOvartza}{LEO}{'101} +\DeclareTextSymbolDefault{\EOvartza}{LEO} + +\DeclareTextSymbol{\EOtzu}{LEO}{'102} +\DeclareTextSymbolDefault{\EOtzu}{LEO} + +\DeclareTextSymbol{\EOki}{LEO}{'103} +\DeclareTextSymbolDefault{\EOki}{LEO} + +\DeclareTextSymbol{\EOke}{LEO}{'104} +\DeclareTextSymbolDefault{\EOke}{LEO} + +\DeclareTextSymbol{\EOkuu}{LEO}{'105} +\DeclareTextSymbolDefault{\EOkuu}{LEO} + +\DeclareTextSymbol{\EOvarkuu}{LEO}{'106} +\DeclareTextSymbolDefault{\EOvarkuu}{LEO} + +\DeclareTextSymbol{\EOku}{LEO}{'107} +\DeclareTextSymbolDefault{\EOku}{LEO} + +\DeclareTextSymbol{\EOko}{LEO}{'110} +\DeclareTextSymbolDefault{\EOko}{LEO} + +\DeclareTextSymbol{\EOSi}{LEO}{'111} +\DeclareTextSymbolDefault{\EOSi}{LEO} + +\DeclareTextSymbol{\EOvarSi}{LEO}{'112} +\DeclareTextSymbolDefault{\EOvarSi}{LEO} + +\DeclareTextSymbol{\EOSuu}{LEO}{'113} +\DeclareTextSymbolDefault{\EOSuu}{LEO} + +\DeclareTextSymbol{\EOSa}{LEO}{'114} +\DeclareTextSymbolDefault{\EOSa}{LEO} + +\DeclareTextSymbol{\EOSu}{LEO}{'115} +\DeclareTextSymbolDefault{\EOSu}{LEO} + +\DeclareTextSymbol{\EOSo}{LEO}{'116} +\DeclareTextSymbolDefault{\EOSo}{LEO} + +\DeclareTextSymbol{\EOsi}{LEO}{'117} +\DeclareTextSymbolDefault{\EOsi}{LEO} + +\DeclareTextSymbol{\EOvarsi}{LEO}{'120} +\DeclareTextSymbolDefault{\EOvarsi}{LEO} + +\DeclareTextSymbol{\EOsuu}{LEO}{'121} +\DeclareTextSymbolDefault{\EOsuu}{LEO} + +\DeclareTextSymbol{\EOsa}{LEO}{'122} +\DeclareTextSymbolDefault{\EOsa}{LEO} + +\DeclareTextSymbol{\EOsu}{LEO}{'123} +\DeclareTextSymbolDefault{\EOsu}{LEO} + +\DeclareTextSymbol{\EOji}{LEO}{'124} +\DeclareTextSymbolDefault{\EOji}{LEO} + +\DeclareTextSymbol{\EOje}{LEO}{'125} +\DeclareTextSymbolDefault{\EOje}{LEO} + +\DeclareTextSymbol{\EOja}{LEO}{'126} +\DeclareTextSymbolDefault{\EOja}{LEO} + +\DeclareTextSymbol{\EOvarja}{LEO}{'127} +\DeclareTextSymbolDefault{\EOvarja}{LEO} + +\DeclareTextSymbol{\EOju}{LEO}{'130} +\DeclareTextSymbolDefault{\EOju}{LEO} + +\DeclareTextSymbol{\EOjo}{LEO}{'131} +\DeclareTextSymbolDefault{\EOjo}{LEO} + +\DeclareTextSymbol{\EOmi}{LEO}{'132} +\DeclareTextSymbolDefault{\EOmi}{LEO} + +\DeclareTextSymbol{\EOme}{LEO}{'133} +\DeclareTextSymbolDefault{\EOme}{LEO} + +\DeclareTextSymbol{\EOmuu}{LEO}{'134} +\DeclareTextSymbolDefault{\EOmuu}{LEO} + +\DeclareTextSymbol{\EOma}{LEO}{'135} +\DeclareTextSymbolDefault{\EOma}{LEO} + +\DeclareTextSymbol{\EOni}{LEO}{'136} +\DeclareTextSymbolDefault{\EOni}{LEO} + +\DeclareTextSymbol{\EOvarni}{LEO}{'137} +\DeclareTextSymbolDefault{\EOvarni}{LEO} + +\DeclareTextSymbol{\EOne}{LEO}{'140} +\DeclareTextSymbolDefault{\EOne}{LEO} + +\DeclareTextSymbol{\EOnuu}{LEO}{'141} +\DeclareTextSymbolDefault{\EOnuu}{LEO} + +\DeclareTextSymbol{\EOna}{LEO}{'142} +\DeclareTextSymbolDefault{\EOna}{LEO} + +\DeclareTextSymbol{\EOnu}{LEO}{'143} +\DeclareTextSymbolDefault{\EOnu}{LEO} + +\DeclareTextSymbol{\EOwi}{LEO}{'144} +\DeclareTextSymbolDefault{\EOwi}{LEO} + +\DeclareTextSymbol{\EOwe}{LEO}{'145} +\DeclareTextSymbolDefault{\EOwe}{LEO} + +\DeclareTextSymbol{\EOwuu}{LEO}{'146} +\DeclareTextSymbolDefault{\EOwuu}{LEO} + +\DeclareTextSymbol{\EOvarwuu}{LEO}{'147} +\DeclareTextSymbolDefault{\EOvarwuu}{LEO} + +\DeclareTextSymbol{\EOwa}{LEO}{'150} +\DeclareTextSymbolDefault{\EOwa}{LEO} + +\DeclareTextSymbol{\EOwo}{LEO}{'151} +\DeclareTextSymbolDefault{\EOwo}{LEO} + +\DeclareTextSymbol{\EOye}{LEO}{'152} +\DeclareTextSymbolDefault{\EOye}{LEO} + +\DeclareTextSymbol{\EOyuu}{LEO}{'153} +\DeclareTextSymbolDefault{\EOyuu}{LEO} + +\DeclareTextSymbol{\EOya}{LEO}{'154} +\DeclareTextSymbolDefault{\EOya}{LEO} +% \end{macrocode} +% +% The commands that follow can be used to access glyphs that are unusual or +% alternative forms of common glyphs. +% +% \begin{macrocode} +\DeclareTextSymbol{\EOSpan}{LEO}{'54} +\DeclareTextSymbolDefault{\EOSpan}{LEO} + +\DeclareTextSymbol{\EOJI}{LEO}{'55} +\DeclareTextSymbolDefault{\EOJI}{LEO} + +\DeclareTextSymbol{\EOvarji}{LEO}{'56} +\DeclareTextSymbolDefault{\EOvarji}{LEO} + +\DeclareTextSymbol{\EOvarki}{LEO}{'57} +\DeclareTextSymbolDefault{\EOvarki}{LEO} + +\DeclareTextSymbol{\EOkak}{LEO}{'155} +\DeclareTextSymbolDefault{\EOkak}{LEO} + +\DeclareTextSymbol{\EOpak}{LEO}{'156} +\DeclareTextSymbolDefault{\EOpak}{LEO} + +\DeclareTextSymbol{\EOpuuk}{LEO}{'157} +\DeclareTextSymbolDefault{\EOpuuk}{LEO} + +\DeclareTextSymbol{\EOyaj}{LEO}{'160} +\DeclareTextSymbolDefault{\EOyaj}{LEO} + +\DeclareTextSymbol{\EOScorpius}{LEO}{'161} +\DeclareTextSymbolDefault{\EOScorpius}{LEO} + +\DeclareTextSymbol{\EODealWith}{LEO}{'162} +\DeclareTextSymbolDefault{\EODealWith}{LEO} + +\DeclareTextSymbol{\EOYear}{LEO}{'163} +\DeclareTextSymbolDefault{\EOYear}{LEO} + +\DeclareTextSymbol{\EOBeardMask}{LEO}{'164} +\DeclareTextSymbolDefault{\EOBeardMask}{LEO} + +\DeclareTextSymbol{\EOBlood}{LEO}{'165} +\DeclareTextSymbolDefault{\EOBlood}{LEO} + +\DeclareTextSymbol{\EOBundle}{LEO}{'166} +\DeclareTextSymbolDefault{\EOBundle}{LEO} + +\DeclareTextSymbol{\EOChop}{LEO}{'167} +\DeclareTextSymbolDefault{\EOChop}{LEO} + +\DeclareTextSymbol{\EOCloth}{LEO}{'170} +\DeclareTextSymbolDefault{\EOCloth}{LEO} + +\DeclareTextSymbol{\EOSaw}{LEO}{'171} +\DeclareTextSymbolDefault{\EOSaw}{LEO} + +\DeclareTextSymbol{\EOGuise}{LEO}{'172} +\DeclareTextSymbolDefault{\EOGuise}{LEO} + +\DeclareTextSymbol{\EOofficerI}{LEO}{'173} +\DeclareTextSymbolDefault{\EOofficerI}{LEO} + +\DeclareTextSymbol{\EOofficerII}{LEO}{'174} +\DeclareTextSymbolDefault{\EOofficerII}{LEO} + +\DeclareTextSymbol{\EOofficerIII}{LEO}{'175} +\DeclareTextSymbolDefault{\EOofficerIII}{LEO} + +\DeclareTextSymbol{\EOofficerIV}{LEO}{'176} +\DeclareTextSymbolDefault{\EOofficerIV}{LEO} + +\DeclareTextSymbol{\EOKing}{LEO}{'200} +\DeclareTextSymbolDefault{\EOKing}{LEO} + +\DeclareTextSymbol{\EOloinCloth}{LEO}{'201} +\DeclareTextSymbolDefault{\EOloinCloth}{LEO} + +\DeclareTextSymbol{\EOlongLipII}{LEO}{'202} +\DeclareTextSymbolDefault{\EOlongLipII}{LEO} + +\DeclareTextSymbol{\EOLose}{LEO}{'203} +\DeclareTextSymbolDefault{\EOLose}{LEO} + +\DeclareTextSymbol{\EOmexNew}{LEO}{'204} +\DeclareTextSymbolDefault{\EOmexNew}{LEO} + +\DeclareTextSymbol{\EOMiddle}{LEO}{'205} +\DeclareTextSymbolDefault{\EOMiddle}{LEO} + +\DeclareTextSymbol{\EOPlant}{LEO}{'206} +\DeclareTextSymbolDefault{\EOPlant}{LEO} + +\DeclareTextSymbol{\EOPlay}{LEO}{'207} +\DeclareTextSymbolDefault{\EOPlay}{LEO} + +\DeclareTextSymbol{\EOPrince}{LEO}{'210} +\DeclareTextSymbolDefault{\EOPrince}{LEO} + +\DeclareTextSymbol{\EOSky}{LEO}{'211} +\DeclareTextSymbolDefault{\EOSky}{LEO} + +\DeclareTextSymbol{\EOskyPillar}{LEO}{'212} +\DeclareTextSymbolDefault{\EOskyPillar}{LEO} + +\DeclareTextSymbol{\EOSprinkle}{LEO}{'213} +\DeclareTextSymbolDefault{\EOSprinkle}{LEO} + +\DeclareTextSymbol{\EOstarWarrior}{LEO}{'214} +\DeclareTextSymbolDefault{\EOstarWarrior}{LEO} + +\DeclareTextSymbol{\EOTitleII}{LEO}{'215} +\DeclareTextSymbolDefault{\EOTitleII}{LEO} + +\DeclareTextSymbol{\EOtuki}{LEO}{'216} +\DeclareTextSymbolDefault{\EOtuki}{LEO} + +\DeclareTextSymbol{\EOtzetze}{LEO}{'217} +\DeclareTextSymbolDefault{\EOtzetze}{LEO} + +\DeclareTextSymbol{\EOChronI}{LEO}{'220} +\DeclareTextSymbolDefault{\EOChronI}{LEO} + +\DeclareTextSymbol{\EOPatron}{LEO}{'221} +\DeclareTextSymbolDefault{\EOPatron}{LEO} + +\DeclareTextSymbol{\EOandThen}{LEO}{'222} +\DeclareTextSymbolDefault{\EOandThen}{LEO} + +\DeclareTextSymbol{\EOAppear}{LEO}{'223} +\DeclareTextSymbolDefault{\EOAppear}{LEO} + +\DeclareTextSymbol{\EODeer}{LEO}{'224} +\DeclareTextSymbolDefault{\EODeer}{LEO} + +\DeclareTextSymbol{\EOeat}{LEO}{'225} +\DeclareTextSymbolDefault{\EOeat}{LEO} + +\DeclareTextSymbol{\EOPatronII}{LEO}{'226} +\DeclareTextSymbolDefault{\EOPatronII}{LEO} + +\DeclareTextSymbol{\EOPierce}{LEO}{'227} +\DeclareTextSymbolDefault{\EOPierce}{LEO} + +\DeclareTextSymbol{\EOkij}{LEO}{'230} +\DeclareTextSymbolDefault{\EOkij}{LEO} + +\DeclareTextSymbol{\EOstar}{LEO}{'231} +\DeclareTextSymbolDefault{\EOstar}{LEO} + +\DeclareTextSymbol{\EOsnake}{LEO}{'232} +\DeclareTextSymbolDefault{\EOsnake}{LEO} + +\DeclareTextSymbol{\EOtime}{LEO}{'233} +\DeclareTextSymbolDefault{\EOtime}{LEO} + +\DeclareTextSymbol{\EOtukpa}{LEO}{'234} +\DeclareTextSymbolDefault{\EOtukpa}{LEO} + +\DeclareTextSymbol{\EOflint}{LEO}{'235} +\DeclareTextSymbolDefault{\EOflint}{LEO} + +\DeclareTextSymbol{\EOafter}{LEO}{'236} +\DeclareTextSymbolDefault{\EOafter}{LEO} + +\DeclareTextSymbol{\EOvarBeardMask}{LEO}{'237} +\DeclareTextSymbolDefault{\EOvarBeardMask}{LEO} + +\DeclareTextSymbol{\EOBedeck}{LEO}{'240} +\DeclareTextSymbolDefault{\EOBedeck}{LEO} + +\DeclareTextSymbol{\EObrace}{LEO}{'241} +\DeclareTextSymbolDefault{\EObrace}{LEO} + +\DeclareTextSymbol{\EOflower}{LEO}{'242} +\DeclareTextSymbolDefault{\EOflower}{LEO} + +\DeclareTextSymbol{\EOGod}{LEO}{'243} +\DeclareTextSymbolDefault{\EOGod}{LEO} + +\DeclareTextSymbol{\EOMountain}{LEO}{'244} +\DeclareTextSymbolDefault{\EOMountain}{LEO} + +\DeclareTextSymbol{\EOgovernor}{LEO}{'245} +\DeclareTextSymbolDefault{\EOgovernor}{LEO} + +\DeclareTextSymbol{\EOHallow}{LEO}{'246} +\DeclareTextSymbolDefault{\EOHallow}{LEO} + +\DeclareTextSymbol{\EOjaguar}{LEO}{'247} +\DeclareTextSymbolDefault{\EOjaguar}{LEO} + +\DeclareTextSymbol{\EOSini}{LEO}{'250} +\DeclareTextSymbolDefault{\EOSini}{LEO} + +\DeclareTextSymbol{\EOknottedCloth}{LEO}{'251} +\DeclareTextSymbolDefault{\EOknottedCloth}{LEO} + +\DeclareTextSymbol{\EOknottedClothStraps}{LEO}{'252} +\DeclareTextSymbolDefault{\EOknottedClothStraps}{LEO} + +\DeclareTextSymbol{\EOLord}{LEO}{'253} +\DeclareTextSymbolDefault{\EOLord}{LEO} + +\DeclareTextSymbol{\EOmacaw}{LEO}{'254} +\DeclareTextSymbolDefault{\EOmacaw}{LEO} + +\DeclareTextSymbol{\EOmonster}{LEO}{'255} +\DeclareTextSymbolDefault{\EOmonster}{LEO} + +\DeclareTextSymbol{\EOmacawI}{LEO}{'256} +\DeclareTextSymbolDefault{\EOmacawI}{LEO} + +\DeclareTextSymbol{\EOskyAnimal}{LEO}{'257} +\DeclareTextSymbolDefault{\EOskyAnimal}{LEO} + +\DeclareTextSymbol{\EOnow}{LEO}{'260} +\DeclareTextSymbolDefault{\EOnow}{LEO} + +\DeclareTextSymbol{\EOTitleIV}{LEO}{'261} +\DeclareTextSymbolDefault{\EOTitleIV}{LEO} + +\DeclareTextSymbol{\EOpenis}{LEO}{'262} +\DeclareTextSymbolDefault{\EOpenis}{LEO} + +\DeclareTextSymbol{\EOpriest}{LEO}{'263} +\DeclareTextSymbolDefault{\EOpriest}{LEO} + +\DeclareTextSymbol{\EOstep}{LEO}{'264} +\DeclareTextSymbolDefault{\EOstep}{LEO} + +\DeclareTextSymbol{\EOsing}{LEO}{'265} +\DeclareTextSymbolDefault{\EOsing}{LEO} + +\DeclareTextSymbol{\EOskin}{LEO}{'266} +\DeclareTextSymbolDefault{\EOskin}{LEO} + +\DeclareTextSymbol{\EOStarWarrior}{LEO}{'267} +\DeclareTextSymbolDefault{\EOStarWarrior}{LEO} + +\DeclareTextSymbol{\EOsun}{LEO}{'270} +\DeclareTextSymbolDefault{\EOsun}{LEO} + +\DeclareTextSymbol{\EOthrone}{LEO}{'271} +\DeclareTextSymbolDefault{\EOthrone}{LEO} + +\DeclareTextSymbol{\EOTime}{LEO}{'272} +\DeclareTextSymbolDefault{\EOTime}{LEO} + +\DeclareTextSymbol{\EOHallow}{LEO}{'273} +\DeclareTextSymbolDefault{\EOHallow}{LEO} + +\DeclareTextSymbol{\EOTitle}{LEO}{'274} +\DeclareTextSymbolDefault{\EOTitle}{LEO} + +\DeclareTextSymbol{\EOturtle}{LEO}{'275} +\DeclareTextSymbolDefault{\EOturtle}{LEO} + +\DeclareTextSymbol{\EOundef}{LEO}{'276} +\DeclareTextSymbolDefault{\EOundef}{LEO} + +\DeclareTextSymbol{\EOGoUp}{LEO}{'277} +\DeclareTextSymbolDefault{\EOGoUp}{LEO} + +\DeclareTextSymbol{\EOLetBlood}{LEO}{'300} +\DeclareTextSymbolDefault{\EOLetBlood}{LEO} + +\DeclareTextSymbol{\EORain}{LEO}{'301} +\DeclareTextSymbolDefault{\EORain}{LEO} + +\DeclareTextSymbol{\EOset}{LEO}{'302} +\DeclareTextSymbolDefault{\EOset}{LEO} + +\DeclareTextSymbol{\EOvarYear}{LEO}{'303} +\DeclareTextSymbolDefault{\EOvarYear}{LEO} + +\DeclareTextSymbol{\EOFold}{LEO}{'304} +\DeclareTextSymbolDefault{\EOFold}{LEO} + +\DeclareTextSymbol{\EOsacrifice}{LEO}{'305} +\DeclareTextSymbolDefault{\EOsacrifice}{LEO} + +\DeclareTextSymbol{\EObuilding}{LEO}{'306} +\DeclareTextSymbolDefault{\EObuilding}{LEO} +% \end{macrocode} +% As we mentioned above, the Epi-Olmec people used the same numbering system +% as the Maya people did. Their numbering system was a vigesimal system and +% the digits were written in a top-down fashion. Thus, we need a macro +% that will typeset numbers in this fashion when it is used with \LaTeX\ +% (actually $\epsilon$-\LaTeX). In addition, we need a macro that will +% just output the vigesimal digits. Such a macro could be used with +% $\Lambda$ with the |LTL| text and paragraph directions. To recapitulate, +% we need to define two macros that will basically typeset vigesimal numbers +% in either horizontal or vertical mode. +% +% For the various calculations that are performed, we need at least three +% counter variables. The fourth is needed for the macro that typesets the +% vigesimal numbers vertically and its usage is explained below. +% \begin{macrocode} +\newcount\EO@n +\newcount\EO@m +\newcount\EO@k +\newcount\EO@l +% \end{macrocode} +% Although we do not foresee any complicated usage of these macros, we opted +% to design them in such a way that they can have as argument either a +% counter or a number. For this reason, we need to make sure the argument +% is stored to one of our counter variables. Next, we pass the counter +% to an auxiliary macro, described below. +% \begin{macrocode} +\def\vigesimal#1{% + \EO@n#1\relax + \@vigesimal{\EO@n}} +% \end{macrocode} +% The macro |\@vigesimal| is just an auxiliary macro that is used to +% set the correct value to the counter |\EO@n|. +% \begin{macrocode} +\def\@vigesimal#1{% + \EO@n\expandafter=\the#1\relax + \@vig} +% \end{macrocode} +% The following macro is based on the macro |\hex|, whose definition +% can be found on page~219 of the \TeX{book}. Therefore, the reader should +% consult his/her copy of the \TeX{book} for more information regarding +% the functionality of the following macro. +% \begin{macrocode} +\def\@vig{{\EO@m=\EO@n \divide\EO@n by20 + \ifnum\EO@n>0 \@vig\fi \EO@k=\EO@n + \multiply\EO@k by-20 + \advance\EO@m by \EO@k \@vigdigit}} +% \end{macrocode} +% The macro that follows is used to get the name of the digit. Note +% that all digits greater than one can be accessed with a command of +% the form |\EOzz|, where |zz| is the Roman numeral that corresponds +% the current value of counter |\EO@m|. +% \begin{macrocode} +\def\@vigdigit{\ifnum\EO@m=0\EOzero% + \else \csname EO\@roman{\EO@m}\endcsname\fi} +% \end{macrocode} +% The macro |\StackedVigesimal| takes the same argument as the macro +% |\vigesimal| and operates similarly. However, this macro should be used +% when we want the ``stacked'' version of the number (i.e., the +% typographically correct version). +% \begin{macrocode} +\def\StackedVigesimal#1{% + \EO@n#1\relax + \s@vigesimal{\EO@n}} +% \end{macrocode} +% The macro |\s@vigesimal| assigns to counter |\EO@n| the value of the +% number or counter that the user has supplied. In order to typeset the +% number in a top-down fashion, we use a list structure, which is initially +% set to empty. The number will be typeset inside a vertical box that has +% a rather strange baseline skip. The macro |\s@vig| constructs the list +% of digits, which, in turn, will be typeset inside a horizontal +% alignment command. +% \begin{macrocode} +\def\s@vigesimal#1{% + \EO@n\expandafter=\the#1\relax + \global\let\epi@lmecDigits\empty + \vbox{\baselineskip=-1000\p@\lineskip=3\p@ + \let\\=\cr% + \s@vig% + \halign{\hfil##\hfil\cr \epi@lmecDigits\cr}}} +% \end{macrocode} +% Now let us see how we construct the list that contains the various digits. +% First we need some auxiliary macros that can be used to append elements +% to a list. The two macros that follow have been designed after two macros +% that are part of the PiC\TeX\ distribution. The second argument of the first +% macro is the list and the first argument is the element that will be +% appended to the list. Note that the list is actually augmented by calling +% the second macro. This macro creates a new global macro that expands to +% the list element and the list itself separated by the |\\| token. +% \begin{macrocode} +\def\@rightappend#1\t@#2{\expandafter\@@rightappend#2\t@{#1}#2} +\def\@@rightappend#1\t@#2#3{\gdef#3{#1\\{#2}}} +% \end{macrocode} +% The macro |\s@vig| is the crux of the package! This macro builds the +% list that contains the Epi-Olmec digits of the vigesimal representation +% of the number. Each digit is ``stored'' in a global macro the name of which +% has the form \texttt{\char`\\EO@d\textit{i}}, where \texttt{\textit{i}} +% is a roman numeral that corresponds to the current value of the counter +% |\EO@l|. Note that this counter is increased each time we execute this +% macro. Each of the \texttt{\char`\\EO@d\textit{i}} macros is constructed +% in a rather peculiar way: not only its expansion is constructed +% ``on-the-fly'' but its name too! Clearly, if the reader is not a somehow +% advanced \TeX\ programmer, he should not make any attempt to study the +% code that follows as it is particularly complex, but not tricky at all. +% \begin{macrocode} +\def\s@vig{{\EO@m=\EO@n% + \divide\EO@n by20 + \ifnum\EO@n>0\s@vig\fi% + \EO@k=\EO@n\relax + \multiply\EO@k by-20\relax + \advance\EO@m by \EO@k\relax + \global\advance\EO@l by \@ne% + \expandafter\xdef\csname EO@d\@roman{\EO@l}\endcsname{% + \ifnum\EO@m=0\noexpand\noexpand\EOzero% + \else\expandafter\noexpand% + \expandafter\csname EO\@roman{\EO@m}\endcsname\fi} + \expandafter\@rightappend\csname EO@d\@roman{\EO@l}\endcsname + \t@\epi@lmecDigits}} +%</epiolmec> +% \end{macrocode} +% +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \section{Usage Examples} +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% If one wishes to use the package with $\Lambda$, then the easiest way to +% correctly typeset Epi-Olmec text is to have a minipage and set +% accordingly the text and paragraph directions: +% \begin{center} +% \verb|\begin{minipage}{80pt} |\\ +% \verb| \textdir LTL\pardir LTL|\\ +% \verb|\EOku \EOji \EOkuu |\\ +% \verb|\EOtze\\ \EOstep |\\ +% \verb|\end{minipage} |\\ +% \end{center} +% With \LaTeX\ one can typeset Epi-Olmec text using a construct like the +% following one: +% \begin{center} +% \verb| \begin{minipage}{80pt}|\\ +% \verb| \begin{multicols}{3}|\\ +% \verb| \EOku\\ \EOji\\ |\\ +% \verb| \EOtze\\ \EOstep |\\ +% \verb| \end{multicols} |\\ +% \verb|\end{minipage} |\\ +% \end{center} +% Note that one cannot correctly typeset numbers using thse constructs. One +% has to redefine the macro |\@vigdigit| so that it appends the |\\| token +% to each digit that it computes. +%\Finale
\ No newline at end of file diff --git a/Master/texmf-dist/source/latex/epiolmec/epiolmec.ins b/Master/texmf-dist/source/latex/epiolmec/epiolmec.ins new file mode 100644 index 00000000000..afd7a6dd000 --- /dev/null +++ b/Master/texmf-dist/source/latex/epiolmec/epiolmec.ins @@ -0,0 +1,55 @@ +%% Copyright 2003 Apostolos Syropoulos +%% +%% This file is part of the `epiolmec' package. +%% You are not allowed to modify its contents. +%% +\def\filedate{2003/11/05} +\def\batchfile{epiolmec.ins} +\input docstrip.tex + +{\ifx\generate\undefined +\Msg{**********************************************} +\Msg{*} +\Msg{* This installation requires docstrip} +\Msg{* version 2.3c or later.} +\Msg{*} +\Msg{* An older version of docstrip has been input} +\Msg{*} +\Msg{**********************************************} +\errhelp{Move or rename old docstrip.tex.} +\errmessage{Old docstrip in input path} +\batchmode +\csname @@end\endcsname +\fi} + +\preamble + + (c) Copyright 2003 Apostolos Syropoulos + This program can be redistributed and/or modified under the terms + of the LaTeX Project Public License Distributed from CTAN + archives in directory macros/latex/base/lppl.txt; either + version 1 of the License, or any later version. + + Please report errors or suggestions for improvement to + + Apostolos Syropoulos + 366, 28th October Str. + GR-671 00 Xanthi, GREECE + apostolo@ocean1.ee.duth.gr or apostolo@obelix.ee.duth.gr + +\endpreamble + + +\keepsilent + +\generate{\generateFile{epiolmec.sty}{f}{\from{epiolmec.dtx}{epiolmec}}} +\postamble +\endpostamble +\Msg{**********************************************************} +\Msg{* To finish installation you have to copy} +\Msg{* the .sty files in the appropriate directory} +\Msg{* an to rehash your TeX, if it is required to do so.} +\Msg{* Do not forget to install the font!} +\Msg{* Happy Epi-Olmec TeXing!} +\Msg{**********************************************************} +\endinput |