diff options
Diffstat (limited to 'macros/mtex/documentation/mdocams.tex')
-rw-r--r-- | macros/mtex/documentation/mdocams.tex | 261 |
1 files changed, 261 insertions, 0 deletions
diff --git a/macros/mtex/documentation/mdocams.tex b/macros/mtex/documentation/mdocams.tex new file mode 100644 index 0000000000..572937adb4 --- /dev/null +++ b/macros/mtex/documentation/mdocams.tex @@ -0,0 +1,261 @@ +%------------------------------------------------------------------ +% parts from AMSTeX Version 0.999999 (C) AMS 1983 +% +\catcode`\@=11 + +\def\@{\char'100 } +\catcode`\~=13 +\def\{{\relax@AmS\ifmmode\delimiter\dq4266308 + \else$\delimiter\dq4266308$\fi} +\def\}{\relax@AmS\ifmmode\delimiter\dq5267309 + \else$\delimiter\dq5267309 $\fi} + +\def\tex{\TeX} + +% + +% STYLE, SPACING AND ALTERNATE NAMES + +\let\dsize=\displaystyle +\let\tsize=\textstyle +\let\ssize=\scriptstyle +\let\sssize=\scriptscriptstyle + +\def\quad{\relax@AmS\ifmmode + \hbox{\hskip1em}\else\hskip1em\relax@AmS\fi} % NOTE 20 +\def\qquad{\quad\quad} +\def\,{\relax@AmS\ifmmode\mskip\thinmuskip\else$\mskip\thinmuskip$\fi} +\def\;{\relax@AmS + \ifmmode\mskip\thickmuskip\else$\mskip\thickmuskip$\fi} +\def\parsep{\par\penalty -50\vskip 3pt plus 3pt minus 3pt} +\def\Parsep{\par\penalty -100\vskip 6pt plus 3pt minus 4pt} +\def\frac#1#2{{#1\over#2}} +\def\Frac#1#2{{\displaystyle{#1\over#2}}} +\def\text#1{\hbox{\rm#1}} +% +% SOME BASIC CONTROL SEQUENCES USED IN OTHER DEFINITIONS +% +\def\eat@AmS#1{} +\long\def\comp@AmS#1#2{\def\@AmS{#1}\def\@@AmS{#2}\ifx + \@AmS\@@AmS\def\cresult@AmS{T}\else\def\cresult@AmS{F}\fi} +\def\in@AmS#1#2{\def\intest@AmS##1#1##2{\comp@AmS##2\end@AmS\if T\cresult@AmS + \def\cresult@AmS{F}\def\in@@AmS{}\else + \def\cresult@AmS{T}\def\in@@AmS####1\end@AmS{}\fi\in@@AmS}% + \def\cresult@AmS{F}\intest@AmS#2#1\end@AmS} +% +% ALIGNED UNITS +% +\let\relax@AmS=\relax +\def\Let@AmS{\relax@AmS\iffalse{\fi\let\\=\cr\iffalse}\fi} +\def\align{\def\vspace##1{\noalign{\vskip ##1}} + \,\vcenter\bgroup\Let@AmS\tabskip=0pt\openup3pt\mathsurround=0pt + \halign\bgroup\strut + \hfil$\displaystyle{##}$&$\displaystyle{{}##}$\hfil\cr} +\def\endalign{\strut\crcr\egroup\egroup} +% +\def\bunch{\def\vspace##1{\noalign{\vskip ##1}} + \,\vcenter\bgroup\Let@AmS\tabskip=0pt\openup3pt\mathsurround=0pt + \halign\bgroup\strut\hfil$\displaystyle{##}$\hfil\cr} +\def\endbunch{\strut\crcr\egroup\egroup} +% +\def\cases{\left\{ \,\vcenter\bgroup\Let@AmS\normalbaselines\tabskip=0pt + \halign\bgroup$##\hfil$&\qquad$##\hfil$\cr} +\def\endcases{\crcr\egroup\egroup\right.} +% +\def\matrix{\catcode`\^^I=4 \futurelet\tok@AmS\matrix@AmS} +\def\matrix@AmS{\relax@AmS\iffalse{\fi \ifnum`}=0\fi\ifx\tok@AmS\format + \def\next@AmS{\expandafter\matrix@@AmS\eat@AmS}\else + \def\next@AmS{\matrix@@@AmS}\fi\next@AmS} +\def\matrix@@@AmS{ + \ifnum`{=0\fi\iffalse}\fi\,\vcenter\bgroup\Let@AmS\tabskip=0pt + \normalbaselines\halign\bgroup $\strut\hfil##\hfil$&&\quad$\strut + \hfil##\hfil$\cr\strut\cr\noalign{\kern-\baselineskip}} +\def\matrix@@AmS#1\\{ + \def\premable@AmS{#1}\toks@{##} + \def\c{$\copy\strutbox\hfil\the\toks@\hfil$}\def\r + {$\copy\strutbox\hfil\the\toks@$}% + \def\l{$\copy\strutbox\the\toks@\hfil$}% + \setbox0= + \hbox{\xdef\Preamble@AmS{\premable@AmS}} + \def\vspace##1{\noalign{\vskip ##1}}\ifnum`{=0\fi\iffalse}\fi + \,\vcenter\bgroup\Let@AmS + \tabskip=0pt\normalbaselines\halign\bgroup\span\Preamble@AmS\cr + \mathstrut\cr\noalign{\kern-\baselineskip}} +\def\endmatrix{\crcr\mathstrut\cr\noalign{\kern-\baselineskip + }\egroup\egroup\,\catcode`\^^I=10 } + + + +% STUFF FOR BIBLIOGRAPHY + +\def\refto#1{\in@AmS,{#1}\if T\cresult@AmS\refto@AmS#1\end@AmS\else + [{\bf#1}]\fi} +\def\refto@AmS#1,#2\end@AmS{[{\bf#1},#2]} + +\def\Refs{\bigbreak\hbox to \hsize{\hfil\tenpoint + \smc \Referenceword@AmS\hfil}\penalty 10000 + \bigskip\eightpoint\sfcode`.=1000 } + +\newbox\nobox@AmS \newbox\keybox@AmS \newbox\bybox@AmS +\newbox\bysamebox@AmS \newbox\paperbox@AmS \newbox\paperinfobox@AmS +\newbox\jourbox@AmS \newbox\volbox@AmS \newbox\issuebox@AmS +\newbox\yrbox@AmS \newbox\pagesbox@AmS \newbox\bookbox@AmS +\newbox\bookinfobox@AmS \newbox\publbox@AmS \newbox\publaddrbox@AmS +\newbox\finalinfobox@AmS + + + +\def\refset@AmS#1{\expandafter\gdef\csname is\expandafter\eat@AmS + \string#1@AmS\endcsname{F}\expandafter + \setbox\csname \expandafter\eat@AmS\string#1box@AmS\endcsname=\null} + +\def\ref@AmS{\refset@AmS\no \refset@AmS\key \refset@AmS\by +\gdef\isbysame@AmS{F}% + \refset@AmS\paper + \refset@AmS\paperinfo \refset@AmS\jour \refset@AmS\vol + \refset@AmS\issue \refset@AmS\yr + \gdef\istoappear@AmS{F}% + \refset@AmS\pages + \gdef\ispage@AmS{F}% + \refset@AmS\book + \gdef\isinbook@AmS{F}% + \refset@AmS\bookinfo \refset@AmS\publ + \refset@AmS\publaddr \refset@AmS\finalinfo \bgroup + \ignorespaces} + +\def\ref{\noindent\hangindent 20pt \hangafter 1 \def\refi@AmS{T}% + \def\refl@AmS{F}\def\\{\egroup\endref@AmS\gdef\refi@AmS{F}\ref@AmS}\ref@AmS} + +\def\refdef@AmS#1#2{\def#1{\egroup\expandafter + \gdef\csname is\expandafter\eat@AmS + \string#1@AmS\endcsname{T}\expandafter\setbox + \csname \expandafter\eat@AmS\string#1box@AmS\endcsname=\hbox\bgroup#2}} + +\refdef@AmS\no{} \refdef@AmS\key{} \refdef@AmS\by{} +\def\bysame{\egroup\gdef\isbysame@AmS{T}\bgroup} +\refdef@AmS\paper\it +\refdef@AmS\paperinfo{} \refdef@AmS\jour{} \refdef@AmS\vol\bf +\refdef@AmS\issue{} \refdef@AmS\yr{} +\def\toappear{\egroup\gdef\istoappear@AmS{T}\bgroup} +\refdef@AmS\pages{} +\def\page{\egroup\gdef\ispage@AmS{T}\setbox + \pagesbox@AmS=\hbox\bgroup} +\refdef@AmS\book{} +\def\inbook{\egroup\gdef\isinbook@AmS{T}\setbox + \bookbox@AmS=\hbox\bgroup} +\refdef@AmS\bookinfo{} \refdef@AmS\publ{} +\refdef@AmS\publaddr{} +\refdef@AmS\finalinfo{} + + +\def\setpunct@AmS{\def\prepunct@AmS{, }} +\def\ppunbox@AmS#1{\prepunct@AmS\unhbox#1\unskip} + +\def\endref@AmS{\def\prepunct@AmS{}% +\if T\refi@AmS + \if F\isno@AmS\hbox to 10pt{}\else + \hbox to 20pt{\hss\unhbox\nobox@AmS\unskip. }\fi + \if T\iskey@AmS \unhbox\keybox@AmS\unskip\ \fi + \if T\isby@AmS \hbox{\unhcopy\bybox@AmS\unskip}\setpunct@AmS + \setbox\bysamebox@AmS=\hbox{\unhcopy\bybox@AmS\unskip}\fi + \if T\isbysame@AmS + \hbox to \wd\bysamebox@AmS{\leaders\hrule\hfill}\setpunct@AmS\fi + \fi + \if T\ispaper@AmS\ppunbox@AmS\paperbox@AmS\setpunct@AmS\fi + \if T\ispaperinfo@AmS\ppunbox@AmS\paperinfobox@AmS\setpunct@AmS\fi + \if T\isjour@AmS\ppunbox@AmS\jourbox@AmS\setpunct@AmS + \if T\isvol@AmS \ \unhbox\volbox@AmS\unskip\setpunct@AmS\fi + \if T\isissue@AmS \ \unhbox\issuebox@AmS\unskip\setpunct@AmS\fi + \if T\isyr@AmS \ (\unhbox\yrbox@AmS\unskip)\setpunct@AmS\fi + \if T\istoappear@AmS \ (to appear)\setpunct@AmS\fi + \if T\ispages@AmS \ppunbox@AmS\pagesbox@AmS\setpunct@AmS\fi + \if T\ispage@AmS + \prepunct@AmS p.\ \unhbox\pagesbox@AmS\unskip\setpunct@AmS\fi + \fi + \if T\isbook@AmS \prepunct@AmS + ``\unhbox\bookbox@AmS\unskip''\setpunct@AmS\fi + \if T\isinbook@AmS \prepunct@AmS + \unskip\ in ``\unhbox\bookbox@AmS\unskip''\setpunct@AmS + \gdef\isbook@AmS{T}\fi + \if T\isbookinfo@AmS \ppunbox@AmS\bookinfobox@AmS\setpunct@AmS\fi + \if T\ispubl@AmS \ppunbox@AmS\publbox@AmS\setpunct@AmS\fi + \if T\ispubladdr@AmS \ppunbox@AmS\publaddrbox@AmS\setpunct@AmS\fi + \if T\isbook@AmS + \if T\isyr@AmS \prepunct@AmS \unhbox\yrbox@AmS\unskip + \setpunct@AmS\fi + \if T\istoappear@AmS \ (to appear)\setpunct@AmS\fi + \if T\ispages@AmS + \prepunct@AmS pp.\ \unhbox\pagesbox@AmS\unskip\setpunct@AmS\fi + \if T\ispage@AmS + \prepunct@AmS p.\ \unhbox\pagesbox@AmS\unskip\setpunct@AmS\fi + \fi + \if T\isfinalinfo@AmS \period\unhbox\finalinfobox@AmS\else + \if T\refl@AmS .\else ; \fi\fi} + +\def\endref{\egroup\gdef\refl@AmS{T}\endref@AmS\par} + + + + +% EXTRA FONTS NEEDED + + +\font\eightrm=cmr8 +\font\sixrm=cmr7 %cmr6 % fonts not on Atari +\font\eighti=cmmi10 %cmmi8 \skewchar\eighti='177 +\font\sixi=cmmi7 %cmmi6 \skewchar\sixi='177 +\font\eightsy=cmsy10 %cmsy8 \skewchar\eightsy='60 +\font\sixsy=cmsy7 %cmsy6 \skewchar\sixsy='60 +\font\eightbf=cmbx10 %cmbx8 +\font\sixbf=cmbx7 %cmbx6 +\font\eightsl=cmsl10 %cmsl8 +\font\eightit=cmsl10 %cmti8 +\font\tensmc=cmcsc10 + + +% TWO DIFFERENT POINT SIZES + +\def\tenpoint{\def\pointsize@AmS{t}\normalbaselineskip=12pt % NOTE 1 + \abovedisplayskip 12pt plus 3pt minus 9pt + \belowdisplayskip 12pt plus 3pt minus 9pt + \abovedisplayshortskip 0pt plus 3pt + \belowdisplayshortskip 7pt plus 3pt minus 4pt + \def\rm{\fam0\tenrm}% + \def\it{\fam\itfam\tenit}% + \def\sl{\fam\slfam\tensl}% + \def\bf{\fam\bffam\tenbf}% + \def\smc{\tensmc}% + \def\mit{\fam 1}% + \def\cal{\fam 2}% + \textfont0=\tenrm \scriptfont0=\sevenrm \scriptscriptfont0=\fiverm + \textfont1=\teni \scriptfont1=\seveni \scriptscriptfont1=\fivei + \textfont2=\tensy \scriptfont2=\sevensy \scriptscriptfont2=\fivesy + \textfont3=\tenex \scriptfont3=\tenex \scriptscriptfont3=\tenex + \textfont\itfam=\tenit + \textfont\slfam=\tensl + \textfont\bffam=\tenbf \scriptfont\bffam=\sevenbf + \scriptscriptfont\bffam=\fivebf +\normalbaselines\rm} + +\def\eightpoint{\def\pointsize@AmS{8}\normalbaselineskip=10pt + \abovedisplayskip 10pt plus 2.4pt minus 7.2pt + \belowdisplayskip 10pt plus 2.4pt minus 7.2pt + \abovedisplayshortskip 0pt plus 2.4pt + \belowdisplayshortskip 5.6pt plus 2.4pt minus 3.2pt + \def\rm{\fam0\eightrm}% + \def\it{\fam\itfam\eightit}% + \def\sl{\fam\slfam\eightsl}% + \def\bf{\fam\bffam\eightbf}% + \def\mit{\fam 1}% + \def\cal{\fam 2}% + \textfont0=\eightrm \scriptfont0=\sixrm \scriptscriptfont0=\fiverm + \textfont1=\eighti \scriptfont1=\sixi \scriptscriptfont1=\fivei + \textfont2=\eightsy \scriptfont2=\sixsy \scriptscriptfont2=\fivesy + \textfont3=\tenex \scriptfont3=\tenex \scriptscriptfont3=\tenex + \textfont\itfam=\eightit + \textfont\slfam=\eightsl + \textfont\bffam=\eightbf \scriptfont\bffam=\sixbf + \scriptscriptfont\bffam=\fivebf +\normalbaselines\rm} + +\catcode`\@=12 |