summaryrefslogtreecommitdiff
path: root/info/digests/tex88/exotex
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 /info/digests/tex88/exotex
Initial commit
Diffstat (limited to 'info/digests/tex88/exotex')
-rw-r--r--info/digests/tex88/exotex/diatop.tex10
-rw-r--r--info/digests/tex88/exotex/exotex.tex335
-rw-r--r--info/digests/tex88/exotex/greek.tex190
3 files changed, 535 insertions, 0 deletions
diff --git a/info/digests/tex88/exotex/diatop.tex b/info/digests/tex88/exotex/diatop.tex
new file mode 100644
index 0000000000..f7819f2be2
--- /dev/null
+++ b/info/digests/tex88/exotex/diatop.tex
@@ -0,0 +1,10 @@
+% File: DIATOP.TEX (c) Christina Thiele, Ottawa. (from TeXniques 5)
+% Tested by Peter J. Olivier. Last change: 4th August 1988.
+%
+\def\diatop[#1|#2]{{\leavevmode\setbox1=\hbox{{#1{}}}\setbox2=\hbox{{#2{}}}%
+ \dimen0=\ifdim\wd1>\wd2\wd1\else\wd2\fi%
+ \dimen1=\ht2\advance\dimen1by-1ex%
+ \setbox1=\hbox to1\dimen0{\hss#1\hss}%
+ \rlap{\raise1\dimen1\box1}%
+ \hbox to1\dimen0{\hss#2\hss}}}%
+
diff --git a/info/digests/tex88/exotex/exotex.tex b/info/digests/tex88/exotex/exotex.tex
new file mode 100644
index 0000000000..83a13ea54d
--- /dev/null
+++ b/info/digests/tex88/exotex/exotex.tex
@@ -0,0 +1,335 @@
+% Input-File EXOTEX.TEX (V 0.4) (c) Peter J. Olivier, Frankfurt 1988
+% Letzte Aenderung: 8.8.88 (OL) (auf Atari ST)
+%
+% Makropaket fuer "exotische" Sprachen.
+% Enthaelt bereits Definitionen von diakritischen Zeichen fuer folgende
+% Sprachen: Indogermanisch, Indisch (Vedisch und klassisches
+% Sanskrit, Mittelindisch, Pali, Neuindisch, Hindi u.a.), Altiranisch,
+% Tocharisch, Hethitisch, Orientalische Sprachen (Arabisch, Hebraeisch,
+% usw.), Altgermanisch (mit Islaendisch), Romanisch, Keltisch, Slavisch,
+% Baltisch, Armenisch, Albanisch, Griechisch uvm.
+%
+% Definition des "ExoTeX"-Logos (c) Peter J. Olivier, Frankfurt <--
+% -----------------------------
+\def\ExoTeX{E\kern-.12em\lower.5ex\hbox{X}\kern-.2em\lower.5ex
+ \hbox{O}\kern-.24em\TeX}
+%
+\font\csc=cmcsc10
+%
+\def\amstex{$\cal A\kern-.1667em%
+\lower.5ex\hbox{$\cal M$}\kern-.075emS$-\TeX{}} % <== AMS-TeX-Logo
+\def\latex{\LaTeX{}} % <== LaTeX-Logo (leichter zu tippen!)
+\def\tex{\TeX{}} % <== TeX-Logo ( " " " )
+\def\exotex{\ExoTeX{}} % <== ExoTeX-Logo ( " " " )
+\def\pctex{{\csc pc}\TeX{}}% <== PCTeX-Logo ( " " " )
+\def\sttex{{\csc st}\TeX{}}% <== STTeX-Logo ( " " " )
+\def\turbotex{Turbo\TeX{}}% <== TurboTeX-Logo ( " " " )
+%\font\man=manual
+%\def\MF{{\man META\-FONT{}}}%<== METAFONT-Logo ( " " " )
+%
+\font\mitfiv=cmmi5 \font\mitsix=cmmi6 \font\mitsvn=cmmi7
+\font\mitegt=cmmi8 % \font\mitnin=cmmi9
+\font\mitten=cmmi10 % ****** Math-Italic-Fonts <==
+\font\itsvn=cmti7 \font\itegt=cmti8 \font\itnin=cmti9
+\font\itten=cmti10 % ****** Text-Italic-Fonts <==
+\font\sfi=cmssi10 % ****** Sans Serif-Font <==
+\font\symegt=cmsy8 % ****** Symbol-Font <==
+%
+\newdimen\hh
+\hh=6.9444pt
+\newbox\alif
+\newbox\ayin
+\setbox\alif=\hbox{{\mitten \char'055}}
+\setbox\ayin=\hbox{{\mitten \char'054}}
+\advance\hh by -\ht\alif
+\def\){\leavevmode\kern+.1em \raise\hh \copy\alif} % \) hamza (alif) <--
+\def\({\leavevmode\kern+.1em \raise\hh \copy\ayin} % \( ayin <--
+%
+% * andere Definition von "alef" und "ain":
+\mathchardef\lhook="012C \mathchardef\rhook="012D
+\def\ain{\kern+1pt$\lhook$} \def\alef{\kern+1pt$\rhook$} % <--
+%
+%
+\def\rlap#1{\hbox to 0pt{#1\hss}} % <--
+%
+\def\llap#1{\hbox to 0pt{\hss#1}} % <--
+%
+%
+% brv = Breve ueber Langvokal <--
+%
+\def\brv#1{\leavevmode\setbox0=\hbox{#1}\dimen0=\ht0\advance\dimen0 by-1ex%
+\rlap{\raise\dimen0\hbox{\char'25}}\box0{}}
+%
+\def\loka{\brv{\=a}} % loka = Lang- oder Kurz-"a" <--
+\def\loke{\brv{\=e}} % loke = Lang- oder Kurz-"e" <--
+\def\loki{\brv{\=\i}} % loki = Lang- oder Kurz-"i" <--
+\def\loko{\brv{\=o}} % loko = Lang- oder Kurz-"o" <--
+\def\loku{\brv{\=u}} % loku = Lang- oder Kurz-"u" <--
+%
+% "U" stellt Breve u n t e r ein Zeichen <--
+%
+\def\U#1{\oalign{#1\crcr\hidewidth
+ \kern-.4em \vbox to .2ex{\hbox{\char'25}\vss}\hidewidth}}
+%
+% ist fuer "italic" definiert!! <--
+%
+\def\hu{\U{h}} % "hu" fuer das hethitische "h" <--
+%
+% "lak" fuer Lang-Vokal Akut <--
+%
+\def\lak#1{\leavevmode\setbox0=\hbox{#1}\dimen0=\ht0\advance\dimen0 by-1ex%
+ \rlap{\raise\dimen0\hbox{\char'23}}\box0{}}
+%
+\def\laka{\lak{\=a}} % laka = Laenge + Akut ueber "a" <--
+\def\lake{\lak{\=e}} % lake = Laenge + Akut ueber "e" <--
+\def\laki{\lak{\={\i}}} % laki = Laenge + Akut ueber "i" <--
+\def\lako{\lak{\=o}} % lako = Laenge + Akut ueber "o" <--
+\def\laku{\lak{\=u}} % laku = Laenge + Akut ueber "u" <--
+%
+% "trak" fuer Trema-Vokal Akut <--
+%
+\def\traka{\lak{\"a}} % traka = Trema + Akut ueber "a" <--
+\def\trake{\lak{\"e}} % trake = Trema + Akut ueber "e" <--
+\def\traki{\lak{\"{\i}}} % traki = Trema + Akut ueber "i" <--
+\def\trako{\lak{\"o}} % trako = Trema + Akut ueber "o" <--
+\def\traku{\lak{\"u}} % traku = Trema + Akut ueber "u" <--
+%
+% "lgr" fuer Lang-Vokal Gravis <--
+%
+\def\lgr#1{\leavevmode\setbox0=\hbox{#1}\dimen0=\ht0\advance\dimen0 by-1ex%
+ \rlap{\raise\dimen0\hbox{\char'22}}\box0{}}
+%
+\def\lgra{\lgr{\=a}} % lgra = Laenge + Gravis ueber "a" <--
+\def\lgre{\lgr{\=e}} % lgre = Laenge + Gravis ueber "e" <--
+\def\lgri{\lgr{\={\i}}} % lgri = Laenge + Gravis ueber "i" <--
+\def\lgro{\lgr{\=o}} % lgro = Laenge + Gravis ueber "o" <--
+\def\lgru{\lgr{\=u}} % lgru = Laenge + gravis ueber "u" <--
+%
+% "kak" fuer Kurz-Vokal Akut <--
+%
+\def\kak#1{\leavevmode\setbox0=\hbox{#1}\dimen0=\ht0\advance\dimen0 by-1ex%
+ \rlap{\raise\dimen0\hbox{\char'23}}\box0{}}
+%
+\def\kaka{\kak{\u{a}}} % kaka = Kuerze + Akut ueber "a" <--
+\def\kake{\kak{\u{e}}} % kake = Kuerze + Akut ueber "e" <--
+\def\kaki{\kak{\u{\i}}} % kaki = Kuerze + Akut ueber "i" <--
+\def\kako{\kak{\u{o}}} % kako = Kuerze + Akut ueber "o" <--
+\def\kaku{\kak{\u{u}}} % kaku = Kuerze + Akut ueber "u" <--
+%
+% "cand" fuer Candrabindu (Anunasika) <--
+%
+\def\cand#1{\leavevmode\setbox0=\hbox{#1}\dimen0=\ht0\advance\dimen0%
+ by-1ex\rlap{\raise\dimen0\hbox{\accent'137}}\box0{}}
+\def\candm{\cand{\u{m}}} % <-- Candrabindu ueber m
+\def\candn{\cand{\u{n}}} % <-- Candrabindu ueber n
+% alle anderen entsprechend codieren !! <-- ist noch nicht so gut!
+%
+% "kgr" fuer Kurz-Vokal Gravis <--
+%
+\def\kgr#1{\leavevmode\setbox0=\hbox{#1}\dimen0=\ht0\advance\dimen0 by-1ex%
+ \rlap{\raise\dimen0\hbox{\char'22}}\box0{}}
+%
+\def\kgra{\kgr{\u{a}}} % kgra = Kuerze + Gravis ueber "a" <--
+\def\kgre{\kgr{\u{e}}} % kgre = Kuerze + Gravis ueber "e" <--
+\def\kgri{\kgr{\u{\i}}} % kgri = Kuerze + Gravis ueber "i" <--
+\def\kgro{\kgr{\u{o}}} % kgro = Kuerze + Gravis ueber "o" <--
+\def\kgru{\kgr{\u{u}}} % kgru = Kuerze + Gravis ueber "u" <--
+%
+% "til" - Zirkumflex (Tilde) ueber Akzentzeichen <--
+%
+\def\til#1{\leavevmode\setbox0=\hbox{#1}\dimen0=\ht0\advance\dimen0 by-1ex%
+ \rlap{\raise\dimen0\hbox{\char'176}}\box0{}}
+%
+% "kri" - Kringel (circle) ueber Akzentzeichen <--
+%
+\def\kri#1{\leavevmode\setbox0=\hbox{#1}\dimen0=\ht0\advance\dimen0 by-1.1ex%
+ \rlap{\kern-1.6pt\raise\dimen0\hbox{\char'27}}\box0{}}
+%
+% "kru" - Kringel (circle) unter einem Buchstaben <--
+%
+\def\kru#1{\oalign{#1\crcr\hidewidth
+ \vbox to.2ex{\ifnum\fam=\itfam\hbox{\kern-1.8pt\char'27}
+ \else\hbox{\char'27}\fi\vss}\hidewidth}}
+%
+% "dotu" - Punkt unter einem Buchstaben <--
+%
+\def\dotu#1{\oalign{#1\crcr\hidewidth%
+ \vbox to.2ex{\ifnum\fam=\itfam\hbox{\kern-1.8pt\char'56}
+ \else\hbox{\char'56}\fi\vss}\hidewidth}}
+%
+\def\anusv{\dotu{m}} % <-- Anusvara
+\def\visarg{\dotu{h}} % <-- Visarga
+%
+% "ro" fuer silbisch "r" (desgleichen "R") <--
+%
+\def\ro{\kru{r}} \def\Ro{\kru{R}}
+%
+% "lo" fuer silbisch "l" (desgleichen "L") <--
+%
+\def\lo{\kru{l}} \def\Lo{\kru{L}}
+%
+% "mo" fuer silbisch "m" (desgleichen "M") <--
+%
+\def\mo{\kru{m}} \def\Mo{\kru{M}}
+%
+% "no" fuer silbisch "n" (desgleichen "N") <--
+%
+\def\no{\kru{n}} \def\No{\kru{N}}
+%
+% "bui" - "bar under italic" (z.B. fuer Fremdzeichen toch.) <--
+%
+\def\bui#1{\oalign{#1\crcr\hidewidth
+ \vbox to.2ex{\ifnum\fam=\itfam\hbox{\kern-2.5pt\char'26}
+ \else\hbox{\char'26}\fi\vss}\hidewidth}}
+%
+% "ip" fuer Interpunktion tocharisch <--
+%
+\def\ip{{\symegt \char'05}}
+%
+% "dip" fuer Doppel-Interpunktion toch. <--
+%
+\newdimen\hx
+\newbox\dopp \setbox\dopp=\hbox{{\symegt \char'05}}
+\hx=\ht\dopp \advance\hx by .1pt
+\def\dip{\unhcopy\dopp \kern-\wd\dopp \raise\hx\copy\dopp}
+%
+% "dan" fuer einfachen Danda (senkr. Strich) <--
+%
+\def\dan{$\mid$}
+%
+% "ddan" fuer Doppel-Danda (parallele Striche) <--
+%
+\def\ddan{$\parallel$}
+%
+% "uw" fuer u-Halbvokal <--
+%
+\def\uw{\oalign{{u}\crcr\hidewidth%
+ \kern-.4em\vbox to .2ex{\hbox{{\mitegt \char'177}}\vss}\hidewidth}}
+%
+% "huw" u-Halbvokal hochgestellt <--
+%
+\def\huw{\raise.7ex\hbox{\oalign{{\mitsvn \char'165}\crcr\hidewidth%
+ \kern-.4em\vbox to .2ex{\hbox{{\mitsix \char'177}}\vss}\hidewidth}}}
+%
+% "fnuw" fuer u-Halbvokal in Fussnoten <--
+%
+\def\fnuw{\oalign{{u}\crcr\hidewidth%
+ \kern-.4em\vbox to .2ex{\hbox{{\mitsix \char'177}}\vss}\hidewidth}}
+%
+% "fnhuw" u-Halbvokal in Fussnoten hochgestellt <--
+%
+\def\fnhuw{$^{\fnuw}$}
+%
+% "ij" fuer i-Halbvokal <--
+%
+\def\ij{\oalign{{i}\crcr\hidewidth%
+ \kern-.4em\vbox to .2ex{\hbox{{\mitegt \char'177}}\vss}\hidewidth}}
+%
+% "hij" i-Halbvokal hochgestellt <--
+%
+\def\hij{\raise.7ex\hbox{\oalign{{\mitsvn \char'151}\crcr\hidewidth%
+ \kern-.4em\vbox to .2ex{\hbox{{\mitsix \char'177}}\vss}\hidewidth}}}
+%
+% "fnij" fuer i-Halbvokal in Fussnoten <--
+%
+\def\fnij{\oalign{{i}\crcr\hidewidth%
+ \kern-.4em\vbox to .2ex{\hbox{{\mitsix \char'177}}\vss}\hidewidth}}
+%
+% "fnhij" i-Halbvokal in Fussnoten hochgestellt <--
+%
+\def\fnhij{$^{\fnij}$}
+%
+% "kc" Palatales k fuer "Indogermanisch" <--
+%
+\def\kc{\leavevmode\setbox0=\hbox{k}\dimen0=\ht0%
+ \advance\dimen0 by-1ex \rlap{\raise\dimen0\hbox{{\mitegt \char'177}}}\box0{}}
+%
+% "gc" Palatales g fuer "Indogermanisch" <--
+%
+\def\gc{\leavevmode\setbox0=\hbox{g}\dimen0=\ht0%
+ \advance\dimen0 by-1ex \rlap{\raise\dimen0\hbox{{\mitegt \char'177}}}\box0{}}
+%
+% "eh" (Schwa / Laryngal) fuer "Indogermanisch" <--
+%
+%\def\eh{{\mitsix \char'100}}
+\def\eh{\leavevmode\setbox0=\hbox{\mitsix \char'100}%
+ \dimen0=\ht0\advance\dimen0 by-1ex%
+ \rlap{\kern-1.1pt\raise\dimen0\hbox{ }}\box0{}}
+%
+% "fneh" (Schwa / Laryngal) fuer Fussnoten <--
+%
+\def\fneh{{\mitfiv \char'100}}
+%
+% "leh" (Langes Schwa / Laryngal) <--
+%
+\def\leh{\leavevmode\setbox0=\hbox{\mitsix \char'100}%
+ \dimen0=\ht0\advance\dimen0 by-1ex%
+ \rlap{\kern-1.1pt\raise\dimen0\hbox{\char'26}}\box0{}}
+%
+% "fnleh" (Langes Schwa / Laryngal) fuer Fussnoten <--
+%
+\def\fnleh{\leavevmode\setbox0=\hbox{\mitfiv \char'100}%
+ \dimen0=\ht0\advance\dimen0 by-1ex%
+ \rlap{\kern-1.1pt\raise\dimen0\hbox{\char'26}}\box0{}}
+%
+% "tilu" (Tilde unter Buchstaben) <--
+%
+\def\tilu#1{\oalign{#1\crcr\hidewidth%
+ \vbox to.2ex{\ifnum\fam=\itfam\hbox{\kern-1.8pt\char'176}
+ \else\hbox{\char'176}\fi\vss}\hidewidth}}
+%
+% "scharfes s (sz)" (Umdefinition) <--
+%
+\def\3{\ss{}}
+%
+% "tschech. langes u" <--
+%
+\def\uo{\accent'27u}
+%
+% "cyrillisches Weichheitszeichen" <--
+%
+ \def\wz{{\mitsvn \char'142}}
+%
+% "cyrill. Weichheitszeichen fuer Fussnoten" <--
+%
+\def\fnwz{{\mitfiv \char'142}}
+%
+% "cyrillisches Haertezeichen" <-- !!!
+%
+\setbox0=\hbox{{\mitsvn \char'142}} % <-- geaendert !!!!!!!!
+ \def\hz{{\itsvn \char'067\kern-.2em\copy0}}
+%
+% "cyrill. Haertezeichen fuer Fussnoten" <--
+%
+% * der Font ist fuer beide char' mitfiv!
+\setbox0=\hbox{\mitfiv \char'142}
+ \def\fnhz{\raise.3ex\hbox{\mitfiv \char'067}{\hbox to 2pt{\kern-.2em{\copy0}}}}
+%
+% * noch zu definieren: text-Greek, Cyrillic, usw.
+%
+%
+\def\thorn{p\llap{b}} % Thorn <--
+%
+\def\vir{\oalign{~\crcr\hidewidth % Virama <--
+ \kern-.4em\vbox to.2ex{\hbox{\sfi \char'022}\vss}\hidewidth}}
+%
+\def\aevir{\oalign{{$^{\ddot a}$}\crcr\hidewidth % Virama + ae <--
+ \vbox to.2ex{\hbox{\sfi \char'022}\vss}\hidewidth}}
+%
+\def\og#1{\setbox0=\hbox{#1}\ifdim\ht0=1ex$_{\;_{\lhook}}$%
+\llap{#1}\else{\ooalign{\hidewidth$_{\;_{\lhook}}$%
+\hidewidth\crcr\unhbox0}}\fi} % Ogonek <--
+%
+\def\skdj{d\kern-.45em\char'026} % serbokroatisches dj <--
+%
+\def\skDj{D\kern-.83em\lower.47ex\hbox{\char'026}}% serbokroatisches Dj <--
+%
+\def\ng{{\it r\kern-.25em\j}} % Gutturaler Nasal <--
+%
+\def\hve{h\kern-.25emv} % <-- germanisches Hv
+%
+\def\zje{\lower.5ex\hbox{\char'063}} % <-- germanisches 3
+%
+% * vorlaeufiges Ende der Definitionen diakritischer Zeichen
+%
+
diff --git a/info/digests/tex88/exotex/greek.tex b/info/digests/tex88/exotex/greek.tex
new file mode 100644
index 0000000000..8847c15d2c
--- /dev/null
+++ b/info/digests/tex88/exotex/greek.tex
@@ -0,0 +1,190 @@
+% File: GREEK.TEX (c) Peter J. Olivier. Letzte Aenderung: 8.8.88
+% Erlaubt Eingabe von akzentuiertem Griechisch
+% (bisher noch ohne Spiritus)
+%
+\def\aaa{$\alpha$} %\aaa
+\def\bbb{$\beta$} %\bbb
+\def\ggg{$\gamma$} %\ggg
+\def\ddd{$\delta$} %\ddd
+\def\eee{$\varepsilon$}% \eee
+\def\zzz{$\zeta$}% \zzz
+\def\hhh{$\eta$}% \hhh
+\def\thh{$\vartheta$}% \thh
+\def\iii{$\iota$}% \iii
+\def\kkk{$\kappa$}% \kkk
+\def\lll{$\lambda$}% \lll
+\def\mmm{$\mu$} %\mmm
+\def\nnn{$\nu$}% \nnn
+\def\kss{$\xi$}% \kss
+\def\ooo{$o$}% \ooo
+\def\ppp{$\pi$}% \ppp
+\def\rrr{$\varrho$}% \rrr
+\def\sss{$\sigma$}% \sss
+\def\ccc{$\varsigma$}% \ccc
+\def\ttt{$\tau$} %\ttt
+\def\uuu{$\upsilon$}% \uuu
+\def\fff{$\varphi$}% \fff
+\def\xxx{$\chi$} %\xxx
+\def\pss{$\psi$}% \pss
+\def\ome{$\omega$}% \ome
+\font\sfi=cmssi10
+\def\dig{{\sfi F}} %\dig % <-- Digamma
+%
+\def\jos#1{\oalign{#1\crcr\hidewidth% <-- iota subscriptum
+ \vbox to.2ex{\ifnum\fam=\itfam%
+\hbox{\kern-1.8pt{\mitfiv \char'023}}\else\hbox{{\mitfiv \char'023}}\fi%
+\vss}\hidewidth}}
+%
+\newdimen\hjsub \hjsub=4.5pt
+\newbox\jotasub \setbox\jotasub=\hbox{{\mitfiv \char'023}}
+\advance\hjsub by -\ht\jotasub
+\def\johs{$\eta$\llap\lower4.5pt\hbox{\jotasub}}% <-- iota subscriptum
+ % f. Eta
+%
+\font\mitegt=cmmi8
+\font\rmten=cmr10
+\newbox\splen \newbox\spasp
+\newbox\akut \newbox\gravis
+\newbox\lenak \newbox\lengr
+\newbox\aspak \newbox\aspgr
+\setbox\splen=\hbox{{\mitegt \char'055}}
+\setbox\spasp=\hbox{{\mitegt \char'054}}
+\setbox\akut=\hbox{{\rmten \char'023}}
+\setbox\gravis=\hbox{{\rmten \char'022}}
+\setbox\lenak=\hbox{{\splen}\kern-.1em\copy\akut}
+\setbox\lengr=\hbox{{\splen}\kern-.1em\copy\gravis}
+\setbox\aspak=\hbox{{\spasp}\kern-.1em\copy\akut}
+\setbox\aspgr=\hbox{{\spasp}\kern-.1em\copy\gravis}
+\def\spl#1{\leavevmode\hbox{#1}\llap\raise.02ex\copy{\splen}}
+\def\spa#1{\leavevmode\hbox{#1}\llap\raise.02ex\copy{\spasp}}
+\def\splak#1{\leavevmode\hbox{#1}\llap\raise.02ex\copy{\lenak}}
+\def\splgr#1{\leavevmode\hbox{#1}\llap\raise.02ex\copy{\lengr}}
+\def\spaak#1{\leavevmode\hbox{#1}\llap\raise.02ex\copy{\aspak}}
+\def\spagr#1{\leavevmode\hbox{#1}\llap\raise.02ex\copy{\aspgr}}
+\def\aak{$\acute{\alpha}$} % \aak
+%\def\asl{\leavevmode\raise.02ex\hbox{\spl}\llap{\kern.1em\aaa}}
+\def\asl{\spl{\aaa}}
+%\def\asa{\leavevmode\kern-.6em\raise.02ex\hbox{\spa}\llap{\aaa}}
+\def\asa{\spa{\aaa}}
+%\def\asl{{\hbox{\aaa}\llap{\hbox{\spl}}}}
+%\def\asa{{\hbox{\aaa}\llap{\hbox{\spa}}}}
+%\def\aslak{{\hbox{\aaa}\llap{\hbox{\splak}}}}
+\def\aslak{\splak{\aaa}}
+%\def\asaak{{\hbox{\aaa}\llap{\hbox{\spaak}}}}
+\def\asaak{\spaak{\aaa}}
+\def\agr{$\grave{\alpha}$} % \agr
+\def\aslgr{\splgr{\aaa}}
+\def\asagr{\spagr{\aaa}}
+\def\azf{$\tilde{\alpha}$} % \azf
+%\def\aslzf{}
+%\def\asazf{}
+\def\ajo{\jos{$\alpha$}} % \ajo % <-- umdefinieren! OK
+\def\ajoak{\jos{\aak}}
+\def\ajogr{\jos{\agr}}
+\def\ajozf{\jos{\azf}} % \ajozf % <-- umdefinieren! OK
+\def\eak{$\acute{\varepsilon}$}% \eak
+%\def\esl{\leavevmode\raise.02ex\hbox{\)}\llap{\eee}}
+%\def\esa{\leavevmode\raise.02ex\hbox{\(}\llap{\eee}}
+%\def\eslak{}
+%\def\esaak{}
+\def\egr{$\grave{\varepsilon}$}% \egr
+%\def\eslgr{}
+%\def\esagr{}
+\def\ezf{$\tilde{\varepsilon}$}
+\def\hak{$\acute{\eta}$} % \hak
+%\def\hsl{\leavevmode\raise.5ex\hbox{\)}\llap{\hhh}}
+%\def\hsa{\leavevmode\raise.5ex\hbox{\(}\llap{\hhh}}
+%\def\hslak{}
+%\def\hsaak{}
+\def\hgr{$\grave{\eta}$} % \hgr
+%\def\hslgr{}
+%\def\hsagr{}
+\def\hzf{$\tilde{\eta}$} % \hzf
+%\def\hslzf{}
+%\def\hsazf{}
+%\def\hjo{\johs{$\eta$}} % \hjo % <-- Eta + iota subscriptum
+%\def\hjoak{\johs{\hak}} % <-- dto. mit Akut
+%\def\hjogr{\johs{\hgr}} % <-- dto. mit Gravis
+%\def\hjozf{\johs{\hzf}} % \hjozf % <-- dto. mit Zirkumflex
+\def\iak{$\acute{\iota}$} % \iak
+%\def\isl{\leavevmode\raise.5ex\hbox{\)}\llap{\iii}}
+%\def\isa{\leavevmode\raise.5ex\hbox{\(}\llap{\iii}}
+%\def\islak{}
+%\def\isaak{}
+\def\igr{$\grave{\iota}$} % \igr
+%\def\islgr{}
+%\def\isagr{}
+\def\izf{$\tilde{\iota}$} % \izf
+%\def\islzf{}
+%\def\isazf{}
+\def\itr{$\ddot{\iota}$} % \itr
+\def\itrak{\lak{\itr}} % \itrak
+\def\itrgr{\lgr{\itr}} % \itrgr
+\def\itrzf{\til{\itr}} % \itrzf
+\def\uak{$\acute{\upsilon}$} % \uak
+\def\usl{\leavevmode\raise.5ex\hbox{\)}\llap{\uuu}}
+%\def\usa{\leavevmode\raise.5ex\hbox{\(}\llap{\uuu}}
+%\def\uslak{}
+%\def\usaak{}
+\def\ugr{$\grave{\upsilon}$} % \ugr
+%\def\uslgr{}
+%\def\usagr{}
+\def\uzf{$\tilde{\upsilon}$} % \uzf
+%\def\uslzf{}
+%\def\usazf{}
+\def\utr{$\ddot{\upsilon}$} % \utr
+\def\utrak{\lak{\utr}} % \utrak
+\def\utrgr{\lgr{\utr}} % \utrgr
+\def\utrzf{\til{\utr}} % \utrzf
+\def\oak{$\acute{o}$} % \oak
+%\def\osl{\leavevmode\raise.5ex\hbox{\)}\llap{\ooo}}
+%\def\osa{\leavevmode\raise.5ex\hbox{\(}\llap{\ooo}}
+%\def\oslak{}
+%\def\osaak{}
+\def\ogr{$\grave{o}$} % \ogr
+\def\ozf{$\tilde{o}$}
+%\def\oslgr{}
+%\def\osagr{}
+\def\omak{$\acute{\omega}$} % \omak
+%\def\omsl{\leavevmode\raise.5ex\hbox{\)}\llap{\ome}}
+%\def\omsa{\leavevmode\raise.5ex\hbox{\(}\llap{\ome}}
+%\def\omslak{}
+%\def\omsaak{}
+\def\omgr{$\grave{\omega}$} % \omgr
+%\def\omslgr{}
+%\def\omsagr{}
+\def\omzf{$\tilde{\omega}$} % \omzf
+%\def\omslzf{}
+%\def\omsazf{}
+\def\omjo{\jos{$\omega$}}
+\def\omjoak{\jos{\omak}}
+\def\omjogr{\jos{\omgr}}
+\def\omjozf{\jos{\omzf}}
+%
+%
+\def\AAA{$A$}% \AAA
+\def\BBB{$B$}% \BBB
+\def\GGG{$\it \Gamma$}% \GGG
+\def\DDD{$\it \Delta$} %\DDD
+\def\EEE{$E$} %\EEE
+\def\ZZZ{$Z$} %\ZZZ
+\def\HHH{$H$}% \HHH
+\def\THH{$\it \Theta$}
+\def\III{$I$}% \III
+\def\KKK{$K$}% \KKK
+\def\LLL{$\it \Lambda$}% \LLL
+\def\MMM{$M$}% \MMM
+\def\NNN{$N$}% \NNN
+\def\KSS{$\it \Xi$}% \KSS
+\def\OOO{$O$}% \OOO
+\def\PPP{$\it \Pi$}% \PPP
+\def\RRR{$P$}% \RRR
+\def\SSS{$\it \Sigma$}% \SSS
+\def\TTT{$T$}% \TTT
+\def\YYY{$Y$}% \YYY
+\def\FFF{$\it \Phi$}% \FFF
+\def\XXX{$X$}% \XXX
+\def\PSS{$\it \Psi$}% \PSS
+\def\OME{$\it \Omega$}% \OME
+%
+