Initial commit

1 files changed, 258 insertions, 0 deletions

diff --git a/macros/mtex/documentation/mdocdef.tex b/macros/mtex/documentation/mdocdef.tex
new file mode 100644
index 0000000000..f8d82101e0
--- /dev/null
+++ b/macros/mtex/documentation/mdocdef.tex
@@ -0,0 +1,258 @@
+% this is MDOCDEF.TEX
+%
+\frenchspacing
+\openup3pt
+\hsize=16.0cm
+\vsize=25.0cm
+\advance\hoffset by 0.5cm
+\parindent 0pt
+\nopagenumbers
+%
+\font\bigrm=cmbx12
+%\font\ninerm=cmr9 %not on Atari
+\font\ninerm=cmr10
+\font\eightrm=cmr7 %only on Atari
+\font\tensl=cmr10 %only on Atari
+
+\font\eighttt=cmtt8
+%\font\hugem=cmbx10 scaled 2000 %not on Atari
+\font\hugem=cmbx10 scaled 1440
+\font\huge=cmbx12
+%
+\let\headings\relax
+\let\keyy=\key
+\def\us{\hbox{\tt\char`\_}}
+\def\os{\hbox{\tt\char`\^}}
+
+\newskip \iindent \iindent=30pt
+\footline={}
+\parindent=0pt
+\def\lit#1{\ifmmode\lbrack\text{#1}\rbrack
+\else$\lbrack\,${}#1{}$\,\rbrack$\fi}
+\def\tex#1{{\it #1\/}}
+\def\disp#1{{\sl #1\/}}
+\def\defi#1{{\bf #1}}
+\def\definition{\Parsep\hang\hangafter 1
+\noindent{\bf Definition:}\hskip1em\relax}
+\def\parh{\par\hang\hangafter0}
+\def\parn{\par\noindent}
+\def\enddefinition{\Parsep}
+\def\Beispiel{\goodbreak\Parsep\hang\hangafter 1
+\noindent{\bf Beispiel:}\hskip1em\relax}
+\def\endBeispiel{\Parsep}
+\def\Bemerkung{\Parsep\hang\hangafter 1
+\noindent{\bf Bemerkung:}\hskip1em\relax}
+\def\endBemerkung{\Parsep}
+\def\ul#1{$\underline{\text{#1}}$}
+\def\pt{\ifmmode\,{\rm pt}\else pt\fi}%nur f"ur mathmode
+\def\<#1>{\leavevmode\hbox{$\langle$#1\/$\rangle$}} % syntactic quantity
+\def\fil{\ifmmode\,{\rm fil}\else fil\fi}%nur f"ur mathmode
+\def\fill{\ifmmode\,{\rm fill}\else fill\fi}%nur f"ur mathmode
+\def\filll{\ifmmode\,{\rm filll}\else filll\fi}%nur f"ur mathmode
+\def\tbox{{\hbox{\rm `box'}}}
+\def\tglue{{\hbox{\rm `glue'}}}
+\def\tkern{{\hbox{\rm `kern'}}}
+\def\tpenalty{{\hbox{\rm `penalty'}}}
+\def\summ{\sum_{j=1}^m}
+\def\folg#1#2{${#1}_1,\ldots,{#1}_{#2}$}
+\def\folgi#1#2#3{\ifmmode  ({#1}_{#2})_{{#2}=1,\ldots,{#3}}
+\else \hbox{$({#1}_{#2})_{{#2}=1,\ldots,{#3}}$}\fi}
+\def\bull{\vrule height .9ex width .8ex depth -.1ex } % square bullet
+\def\hang{\hangindent\iindent}
+\def\textindent#1{\noindent\hskip\iindent\llap{#1\enspace}\ignorespaces}
+\def\item{\par\hang\textindent}
+\def\itemitem{\par\noindent\hskip\iindent\hangindent2\iindent\textindent}
+% macros for non-centered displays
+\outer\def\begindisplay{\obeylines\startdisplay}
+{\obeylines\gdef\startdisplay#1
+{\catcode`\^^M=5$$#1\halign\bgroup\hskip\iindent##\hfil&&\qquad##\hfil\cr}}
+\outer\def\enddisplay{\crcr\egroup$$}
+\def\vo{\tt\verbatimon}
+\def\voff{\tt\verbatimoff}
+\def\mod{\hbox{mod}}
+\def\sign{\hbox{sign}}
+\def\const{\hbox{const}}
+\def\mins{\hbox{mins}}
+
+\def\Brook{1}
+\def\brook{1}
+\def\byrd{2}
+\def\genzmeier{3}%lehrbuch f"ur textsatz
+\def\genzmer{3}%lehrbuch f"ur textsatz
+\def\grabner{6}
+\def\gomb{4}
+\def\Gourlay{5}
+\def\gourlay{5}
+\def\Hader{7}
+\def\hader{7}
+\def\Knuth{8}
+\def\Texbook{9}
+\def\TeXbook{9}
+\def\Knuthmf{10}
+\def\Peters{11}
+\def\Schofer{12}
+\def\smith{13}
+\def\Smith{13}
+\def\Steinb{14}
+\def\Werner{15}
+\def\werner{15}
+\def\Wirth{16}
+\def\ziegen{17}
+\def\Ziegen{17}
+\def\Zima{18}
+\def\Zimat{19}
+
+
+% \box\bigdot is a null box with a bullet at its reference point
+\newbox\bigdot \newbox\smalldot
+\setbox0=\hbox{$\vcenter{}$} % \ht0 is the axis height
+\setbox1=\hbox to0pt{$\hss\bullet\hss$} % bullet is centered on the axis
+\setbox\bigdot=\vbox to0pt{\kern-\ht1 \kern\ht0 \box1 \vss}
+\setbox1=\hbox to0pt{$\hss\cdot\hss$} % cdot is centered on the axis
+\setbox\smalldot=\vbox to0pt{\kern-\ht1 \kern\ht0 \box1 \vss}
+
+% \samplebox makes the outline of a box, with big dot at reference point
+\def\samplebox#1#2#3#4{% #1=ht, #2=dp, #3=wd, #4=text
+  {\setbox0=\vtop{\vbox to #1{\hbox to #3{}\vss}
+      \nointerlineskip
+      \vbox to #2{}}% now \box0 has the desired ht, dp, and wd
+    \hbox{\copy\bigdot
+      \vrule height.2pt depth.2pt width#3%
+      \kern-#3%
+      \makelightbox
+      \kern-#3%
+      \raise#1\vbox{\hbox to #3{\hss#4\hss}
+        \kern 3pt}}}}
+
+
+\def\adchap#1{{\advance\chap#1\the\chap}}
+
+\newcount\chap
+\newcount\sub
+\newcount\subsub
+\newcount\subsubsub
+\pageno=1
+\chap=0
+\sub=0
+\subsub=0
+\subsubsub=0
+\def\heading#1{\advance\chap1 \sub=0\subsub=0\subsubsub=0
+\hbox{}
+\vskip1.5cm
+\ifodd\pageno\else\advance\pageno1\fi
+\count2=\pageno
+\ifnum\chap>-1
+\headline={\ifnum\count2=\pageno \hfill
+\else \ifodd\pageno\hss\eightrm\ifnum\chap<1\else\ifnum\chap<14
+\the\chap. \else\fi\fi#1\hss{\tenrm\folio}
+\else{\tenrm\folio}\hss\eightrm\ifnum\chap<1\else\ifnum\chap<14
+\the\chap. \else\fi\fi#1\hss
+\fi\fi}%
+\else \headline={\hfill}\fi
+\ifnum\chap=1
+\else\line{\hfil\bigrm\ifnum\chap<1\else\ifnum\chap<14
+\the\chap.\quad\else\fi\fi#1\hfil}\fi
+\lineouti{#1}\bigskip}
+\def\subheading#1{\advance\sub1\subsub=0
+\subsubsub=0\goodbreak
+\bigskip\line{\bf\the\chap.\the\sub\quad#1\hfil}\lineoutii{#1}\smallskip}
+\def\subsubheading#1{\advance\subsub1
+\subsubsub=0
+\medskip\line{\bf\the\chap.\the\sub.\the\subsub
+\quad#1\hfil}%\lineoutiii{#1}
+\smallskip}
+\def\subsubsubheading#1{\advance\subsubsub1
+\goodbreak
+\medskip{\bf #1.%\lineoutiv{#1}
+}\quad}
+%
+\def\mf{{\rm METAFONT}}
+\newwrite\refs
+\newwrite\inhalt
+\immediate\openout\refs = xrefs.tex
+\immediate\openout\inhalt = inhalt.tex
+\def\lineoutiv#1{\immediate\write\inhalt{\the\chap.\the\sub.\the\subsub.%
+\the\subsubsub : #1  = \the\pageno}}
+\def\lineoutiii#1{\immediate\write\inhalt{\the\chap.\the\sub.\the\subsub%
+\ #1 }}
+\def\lineoutii#1{\immediate\write\inhalt{\the\chap.\the\sub
+&\noexpand\rm \noexpand#1  &\the\pageno\cr}}
+\def\lineouti#1{\immediate\write\inhalt{\cr
+\the\chap &\noexpand\bf \noexpand#1  &\the\pageno\cr\cr}}
+\def\XX{\immediate\write\refs{\the\pageno : \the\chap.\the\sub.%
+\the\subsub.\the\subsubsub}}
+
+% Macros for drawing figures
+\def\hidehrule#1#2{\kern-#1\hrule height#1 depth#2 \kern-#2 }
+\def\hidevrule#1#2{\kern-#1{\dimen0=#1
+    \advance\dimen0 by#2\vrule width\dimen0}\kern-#2 }
+% \makeblankbox puts rules at the edges of a blank box
+% whose dimensions are those of \box0 (assuming nonnegative wd,ht,dp)
+% #1 is rule thickness outside, #2 is rule thickness inside
+\def\makeblankbox#1#2{\hbox{\lower\dp0\vbox{\hidehrule{#1}{#2}%
+    \kern-#1% overlap the rules at the corners
+    \hbox to\wd0{\hidevrule{#1}{#2}%
+      \raise\ht0\vbox to #1{}% set the vrule height
+      \lower\dp0\vtop to #1{}% set the vrule depth
+      \hfil\hidevrule{#2}{#1}}%
+    \kern-#1\hidehrule{#2}{#1}}}}
+\def\maketypebox{\makeblankbox{0pt}{1pt}}
+\def\makelightbox{\makeblankbox{.2pt}{.2pt}}
+% \arrows makes things like <--- text --->
+\def\arrows#1#2{% #1=width, #2=text
+  {\setbox0=\hbox{$\mkern-2mu\mathord-\mkern-2mu$}
+    \hbox to #1{\kern-.055556em$\leftarrow\mkern-6mu$%
+      \cleaders\copy0\hfil
+      \kern.4em #2\kern.4em
+      \cleaders\copy0\hfil
+      $\mkern-6mu\rightarrow$\kern-.055556em}}}
+%Taktstriche
+\def\gleich{\hbox{\strut\vrule\kern2pt\vrule width2pt} }
+\def\dbl{\hbox{\strut\vrule\kern2pt\vrule}}
+\def\lrepeat{\hbox{\strut\vrule width2pt\kern2pt\vrule\kern2pt: }}
+\def\rrepeat{\hbox{\strut\ :\kern2pt\vrule \kern2pt\vrule width2pt }}
+\def\lrrepeat{\hbox{\strut\ :\kern2pt\vrule \kern2pt%
+  \vrule width2pt \kern2pt\vrule\kern2pt: }}
+\def\ball#1{\noindent\hbox to 15pt{\hss\hbox to 0pt{\hss$\bigcirc$\hss}%
+\hbox to0pt{\hss#1\hss}\hss}}
+\def\vspace#1{\noalign{\vskip#1}}
+\catcode`\@=11
+\outer\def\Refs{\relaxnext@\def\refskip@{\hskip\@ne sp\hskip\m@ne sp}%
+ \def\next@{\ifx\next\nofrills\def\next@\nofrills{\nextii@}\else
+  \def\next@{\nextii@{}}\fi\next@}%
+ \def\nextii@##1{\bigbreak\hbox to\hsize{\hfil\tenpoint
+  \smc\ignorespaces##1\unskip\hfil}\nobreak
+  \bigskip\sfcode`.=\@m}%
+ \futurelet\next\next@\openup\jot}
+\catcode`\@=\active
+
+
+
+\newskip \iindent \iindent=30pt
+\def\hang{\hangindent\iindent}
+\def\textindent#1{\noindent\hskip\iindent\llap{#1\enspace}\ignorespaces}
+\def\item{\par\hang\textindent}
+\def\itemitem{\par\noindent\hskip\iindent\hangindent2\iindent\textindent}
+%
+%       Definitionen f"ur Literatur   %%%%%
+\def\Brook{1}
+\def\Gourlay{2}
+\def\Texbook{3}
+\def\Knuthmf{4}
+\def\Peters{5}
+\def\Smith{6}
+\def\Steinb{7}
+\def\Werner{8}
+\def\Zima{11}
+\def\Zimat{12}
+\def\Wirth{9}
+\def\Ziegen{10}
+
+%% Additional macros (SFB72)
+\def\rz{\ifmmode I\hskip-0.4em R\else$I\hskip-0.4em R$\fi}
+\def\nz{\ifmmode{I\hskip -3pt N}\else{\hbox{$I\hskip -3pt N$}}\fi}
+\def\gz{\ifmmode{Z\hskip -4.8pt Z}\else{\hbox{$Z\hskip -4.8pt Z$}}\fi}
+\def\qz{\ifmmode{Q\hskip-5.0pt\vrule height6.0pt depth 0pt\hskip6pt}
+    \else{\hbox{$Q\hskip-5.0pt\vrule height6.0pt depth 0pt\hskip6pt$}}\fi}
+
+%