% 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}
%