% NOTE 1, NOTE 2, ... REFER TO NOTES IN THE FILE AMSPPT.DOC \catcode`\@=11 % PARAMETERS DIFFERENT THAN IN PLAIN \normallineskiplimit=1pt \parindent 10pt \hsize 26pc \vsize 42pc % EXTRA FONTS NEEDED \font\eightrm=amr8 \font\sixrm=amr6 \font\eighti=ammi8 \skewchar\eighti='177 \font\sixi=ammi6 \skewchar\sixi='177 \font\eightsy=amsy8 \skewchar\eightsy='60 \font\sixsy=amsy6 \skewchar\sixsy='60 \font\eightbf=ambx8 \font\sixbf=ambx6 \font\eightsl=amsl8 \font\eightit=amti8 \font\tensmc=amcsc10 % 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} % GENERAL FOOTNOTES % NOTE 2 \newcount\footmarkcount@AmS \footmarkcount@AmS=0 \newcount\foottextcount@AmS \foottextcount@AmS=0 \def\footnotemark{\unskip\futurelet\tok@AmS\footnotemark@AmS} \def\footnotemark@AmS{\ifx [\tok@AmS \def\next@AmS{\footnotemark@@AmS}\else \def\next@AmS{\footnotemark@@@AmS}\fi\next@AmS} \def\footnotemark@@AmS[#1]{{#1}} \def\footnotemark@@@AmS{\global\advance\footmarkcount@AmS by 1 \xdef\thefootmarkcount@AmS{\the\footmarkcount@AmS}$^{\thefootmarkcount@AmS}$} \def\makefootnote@AmS#1#2{\insert\footins{\interlinepenalty100 \eightpoint \splittopskip=6.8pt \splitmaxdepth=2.8pt \floatingpenalty=20000 \leftskip = 0pt \rightskip = 0pt \noindent {#1}\footstrut{\ignorespaces#2\unskip}\topsmash{\strut}}} \def\footnotetext{\futurelet\tok@AmS\footnotetext@} \def\footnotetext@{\ifx [\tok@AmS \def\next@AmS{\footnotetext@@AmS}\else \def\next@AmS{\footnotetext@@@AmS}\fi\next@AmS} \def\footnotetext@@AmS[#1]#2{\makefootnote@AmS{#1}{#2}} \def\footnotetext@@@AmS#1{\global\advance\foottextcount@AmS by 1 \xdef\thefoottextcount@AmS{\the\foottextcount@AmS}% \makefootnote@AmS{$^{\thefoottextcount@AmS}$}{#1}} \def\footnote{\unskip\futurelet\tok@AmS\footnote@AmS} \def\footnote@AmS{\ifx [\tok@AmS \def\next@AmS{\footnote@@AmS}\else \def\next@AmS{\footnote@@@AmS}\fi\next@AmS} \def\footnote@@AmS[#1]#2{{\edef\sf{\the\spacefactor}% {#1}\makefootnote@AmS{#1}{#2}\spacefactor=\sf}} \def\footnote@@@AmS#1{\ifnum\footmarkcount@AmS=\foottextcount@AmS\else \errmessage{AmS-TeX warning: last footnote marker was \the\footmarkcount@AmS, last footnote was \the\foottextcount@AmS}\footmarkcount@AmS=\foottextcount@AmS\fi {\edef\sf{\the\spacefactor}\footnotemark@@@AmS\footnotetext@@@AmS{#1}% \spacefactor=\sf}} \def\adjustfootnotemark#1{\advance\footmarkcount@AmS by #1} % NOTE 3 \def\adjustfootnote#1{\advance\foottextcount@AmS by #1} % TOP MATTER \def\topmatter@AmS{F} % NOTE 4 \def\topmatter{\def\topmatter@AmS{T}} \def\filhss@AmS{plus 1000pt} % NOTE 5 \def\overlong{\def\filhss@AmS{plus 1000pt minus1000pt}} \newbox\titlebox@AmS \setbox\titlebox@AmS=\vbox{} % NOTE 6 \def\title#1\endtitle{{\let\\=\cr % NOTE 7 \global\setbox\titlebox@AmS=\vbox{\tabskip0pt\filhss@AmS \halign to \hsize {\tenpoint\bf\hfil\ignorespaces##\unskip\hfil\cr#1\cr}}}\def % NOTE 7.1 \filhss@AmSs{plus 1000pt}} \def\isauthor@AmS{F} % NOTE 8 \newbox\authorbox@AmS \def\author#1\endauthor{\gdef\isauthor@AmS{T}{\let\\=\cr \global\setbox\authorbox@AmS=\vbox{\tabskip0pt \filhss@AmS\halign to \hsize {\tenpoint\smc\hfil\ignorespaces##\unskip\hfil\cr#1\cr}}}\def \filhss@AmS{plus 1000pt}} % FOR UPPERCASING TITLE AND AUTHOR \def\uctext@AmS#1{\uppercase@AmS#1\gdef % NOTE 9 \uppercase@@AmS{}${\hskip-2\mathsurround}$} \def\uppercase@AmS#1$#2${\gdef\uppercase@@AmS{\uppercase@AmS}\uppercase {#1}${#2}$\uppercase@@AmS} \newcount\Notes@AmS % NOTE 10 \def\sfootnote@AmS{\unskip\futurelet\tok@AmS\sfootnote@@AmS} \def\sfootnote@@AmS{\ifx [\tok@AmS \def\next@AmS{\sfootnote@@@AmS}\else \def\next@AmS{\sfootnote@@@@AmS}\fi\next@AmS} \def\sfootnote@@@AmS[#1]#2{\global\toks@{#2}\advance\Notes@AmS by 1 \expandafter\xdef\csname Note\romannumeral\Notes@AmS @AmS\endcsname {\the\toks@}} \def\sfootnote@@@@AmS#1{\global\toks@{#1}\global\advance\Notes@AmS by 1 \expandafter\xdef\csname Note\romannumeral\Notes@AmS @AmS\endcsname {\the\toks@}} \def\Sfootnote@AmS{\unskip\futurelet\tok@AmS\Sfootnote@@AmS} \def\Sfootnote@@AmS{\ifx [\tok@AmS \def\next@AmS{\Sfootnote@@@AmS}\else \def\next@AmS{\Sfootnote@@@@AmS}\fi\next@AmS} \def\Sfootnote@@@AmS[#1]#2{{#1}\advance\Notes@AmS by 1 {\edef\sf{\the\spacefactor}\makefootnote@AmS{#1}{\csname Note\romannumeral\Notes@AmS @AmS\endcsname}\spacefactor=\sf}} \def\Sfootnote@@@@AmS#1{\ifnum\footmarkcount@AmS=\foottextcount@AmS\else \errmessage{AmS-TeX warning: last footnote marker was \the\footmarkcount@AmS, last footnote was \the\foottextcount@AmS}\footmarkcount@AmS=\foottextcount@AmS\fi {\edef\sf{\the\spacefactor}\footnotemark@@@AmS \global\advance\Notes@AmS by 1 \footnotetext@@@AmS{\csname Note\romannumeral\Notes@AmS @AmS\endcsname}\spacefactor=\sf}} \def\TITLE#1\endTITLE % NOTE 11 {{\Notes@AmS=0 \let\\=\cr\let\footnote=\sfootnote@AmS \setbox0=\vbox{\tabskip\centering \halign to \hsize{\tenpoint\bf\ignorespaces##\unskip\cr#1\cr}} \Notes@AmS=0 \let\footnote=\Sfootnote@AmS \global\setbox\titlebox@AmS=\vbox{\tabskip0pt\filhss@AmS \halign to \hsize{\tenpoint\bf\hfil \uctext@AmS{\ignorespaces##\unskip}\hfil\cr #1\cr}}}\def\filhss@AmS{plus 1000pt}} \def\AUTHOR#1\endAUTHOR{\gdef\isauthor@AmS{T}{\Notes@AmS=0 \let\\=\cr \let\footnote=\sfootnote@AmS \setbox0 =\vbox{\tabskip\centering\halign to \hsize{\tenpoint\smc \ignorespaces##\unskip\cr#1\cr}}\Notes@AmS=0 \let\footnote=\Sfootnote@AmS \global\setbox\authorbox@AmS=\vbox{\tabskip0pt\filhss@AmS\halign to \hsize{\tenpoint\smc\hfil\uppercase{\ignorespaces ##\unskip}\hfil\cr#1\cr}}}\def\filhss@AmS{plus 1000pt}} % OTHER STUFF BEFORE \endtopmatter \newcount\language@AmS % NOTE 12 \language@AmS=0 \def\german{\language@AmS=1} \def\abstractword@AmS{\ifcase \language@AmS ABSTRACT\or ZUSAMMENFASSUNG\fi} \def\logoword@AmS{\ifcase \language@AmS Typeset by \fi} \def\subjclassword@AmS{\ifcase \language@AmS 1980 Mathematics subject classifications \fi} \def\keywordsword@AmS{\ifcase \language@AmS Keywords and phrases\fi} \def\Referenceword@AmS{\ifcase \language@AmS References\fi} \def\isaffil@AmS{F} \newbox\affilbox@AmS \def\affil{\gdef\isaffil@AmS{T}\bgroup\let\\=\cr \global\setbox\affilbox@AmS =\vbox\bgroup\tabskip0pt\filhss@AmS \halign to \hsize\bgroup\tenpoint\hfil\ignorespaces##\unskip\hfil\cr} \def\endaffil{\cr\egroup\egroup\egroup\def\filhss@AmS{plus 1000pt}} \newcount\addresscount@AmS % NOTE 13 \addresscount@AmS=0 \def\address#1{\global\advance\addresscount@AmS by 1 \expandafter\gdef\csname address\romannumeral\addresscount@AmS\endcsname {\noindent\eightpoint\ignorespaces#1\par}} \def\isdate@AmS{F} % NOTE 14 \def\date#1{\gdef\isdate@AmS{T}\gdef\date@AmS{\tenpoint\ignorespaces#1\unskip}} \def\isthanks@AmS{F} \def\thanks#1{\gdef\isthanks@AmS{T}\gdef\thanks@AmS{\eightpoint\ignorespaces #1\unskip}} \def\keywords@AmS{} % NOTE 15 \def\keywords#1{\def\keywords@AmS{\noindent \eightpoint \it \keywordsword@AmS .\enspace \rm\ignorespaces#1\par}} \def\subjclass@AmS{} \def\subjclass#1{\def\subjclass@AmS{\noindent \eightpoint\it \subjclassword@AmS (Amer.\ Math.\ Soc.)\/\rm: \ignorespaces#1\par}} \def\isabstract@AmS{F} \long\def\abstract#1{\gdef\isabstract@AmS{T}\long\gdef\abstract@AmS {\eightpoint \abstractword@AmS\period\ignorespaces #1\par}} % NOTE 16 % ALLOW FOR SPECIAL THINGS BEFORE PARTS OF THE TOPMATTER % NOTE 17 \def\pretitle{} \def\preauthor{} \def\preaffil{} \def\predate{} \def\preabstract{} \def\prepaper{} % \endtopmatter PUTS ALL THE PRELIMINARY STUFF ON THE FIRST PAGE IN PLACE \def\endtopmatter{\if F\topmatter@AmS \errmessage{AmS-TeX warning: You forgot the \string\topmatter, but I forgive you.}\fi \hrule height 0pt \vskip -\topskip % NOTE 18 \pretitle \vskip 24pt plus 12pt minus 12pt \unvbox\titlebox@AmS % NOTE 19 \preauthor \if T\isauthor@AmS \vskip 12pt plus 6pt minus 3pt \unvbox\authorbox@AmS \else\fi \preaffil \if T\isaffil@AmS \vskip 10pt plus 5pt minus 2pt \unvbox\affilbox@AmS\else\fi \predate \if T\isdate@AmS \vskip 6pt plus 2pt minus 1pt \hbox to \hsize{\hfil\date@AmS\hfil}\else\fi \preabstract \if T\isthanks@AmS \makefootnote@AmS{}{\thanks@AmS}\else\fi \if T\isabstract@AmS \vskip 15pt plus 12pt minus 12pt {\leftskip=16pt\rightskip=16pt \noindent \abstract@AmS}\else\fi \prepaper \vskip 18pt plus 12pt minus 6pt \tenpoint} % \enddocument PUTS ALL THE PRELIMINARY STUFF THAT APPEARS AT THE END IN PLACE \newcount\addresnum@AmS % NOTE 20 \def\enddocument{\penalty10000 \sfcode`\.3000\vskip 12pt minus 6pt % NOTE 20.1 \keywords@AmS % NOTE 21 \subjclass@AmS \addresnum@AmS=0 \loop\ifnum\addresnum@AmS<\addresscount@AmS\advance\addresnum@AmS by 1 \csname address\romannumeral\addresnum@AmS\endcsname\repeat \vfill\supereject\end} % HEADINGS AND SUBHEADINGS \newbox\headingbox@AmS \outer\def\heading{\medbreak\bgroup\let\\=\cr \global\setbox\headingbox@AmS=\vbox\bgroup\tabskip0pt\filhss@AmS % NOTE 22 \halign to \hsize\bgroup\tenpoint\smc\hfil\ignorespaces ##\unskip\hfil\cr} \def\endheading{\cr\egroup\egroup\egroup\unvbox\headingbox@AmS \penalty10000 \def\filhss@AmS{plus 1000pt}\medskip} \def\subheading#1{\smallbreak\noindent{\tenpoint\bf\ignorespaces #1\unskip.\enspace}\ignorespaces} % PROCLAIM AND DEMO, ETC. \outer\def\proclaim#1{\xdef\curfont@AmS{\the\font}\medbreak % NOTE 23 \noindent\smc\ignorespaces#1\unskip.\enspace\sl\ignorespaces} \outer\def\proclaimnp#1{\xdef\curfont@AmS{\the\font}\medbreak % NOTE 24 \noindent\smc\ignorespaces#1\enspace\sl\ignorespaces} \def\finishproclaim{\par\curfont@AmS\ifdim\lastskip<\medskipamount % NOTE 25 \removelastskip \penalty 55\medskip\fi} \let\endproclaim=\finishproclaim \let\finishproclaimnp=\finishproclaim \let\endproclaimnp=\finishproclaim \outer\def\demo#1{\par\ifdim\lastskip<\smallskipamount \removelastskip\smallskip\fi\noindent{\smc\ignorespaces#1\unskip:}\enspace \ignorespaces} \outer\def\demonp#1{\ifdim\lastskip<\smallskipamount \removelastskip\smallskip\fi\noindent{\smc#1}\enspace\ignorespaces} \def\finishdemo{\par\smallskip} \let\enddemo=\finishdemo \let\finishdemonp=\finishdemo \let\enddemonp=\finishdemo \def\novspacechange{\penalty10000 \vskip-100pt % NOTE 26 \penalty10000 \vskip100pt} \def\qed{\hbox{\hskip 1pt \vrule width4pt height 6pt depth 1.5pt \hskip 1pt}} \newif\ifrunin@AmS % NOTE 27 \runin@AmSfalse \def\runin{\runin@AmStrue} \def\conditions{\def\\##1:{\par\noindent % NOTE 28 \hbox to 1.5\parindent{\hss\rm\ignorespaces##1\unskip}% \hskip .5\parindent \hangafter1\hangindent2\parindent\ignorespaces}% \def\firstcon@AmS##1:{\ifrunin@AmS {\rm\ignorespaces##1\unskip}\ \ignorespaces \else\par\ifdim\lastskip<\smallskipamount\removelastskip\penalty55 \smallskip\fi \\##1:\fi}\firstcon@AmS} \def\endconditions{\par\smallbreak\runin@AmSfalse} % NOTE 29 % STUFF FOR BIBLIOGRAPHY \def\refto#1{\in@AmS,{#1}\if T\cresult@AmS\refto@AmS#1\end@AmS\else % NOTE 30 [{\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 } % NOTE 31 \newbox\nobox@AmS \newbox\keybox@AmS \newbox\bybox@AmS % NOTE 32 \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 % NOTE 33 \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 % NOTE 34 \gdef\isbysame@AmS{F}% % NOTE 35.1 \refset@AmS\paper \refset@AmS\paperinfo \refset@AmS\jour \refset@AmS\vol \refset@AmS\issue \refset@AmS\yr \gdef\istoappear@AmS{F}% % NOTE 35.2 \refset@AmS\pages \gdef\ispage@AmS{F}% % NOTE 35.3 \refset@AmS\book \gdef\isinbook@AmS{F}% % NOTE 35.4 \refset@AmS\bookinfo \refset@AmS\publ \refset@AmS\publaddr \refset@AmS\finalinfo \bgroup \ignorespaces} % NOTE 36 \def\ref{\noindent\hangindent 20pt \hangafter 1 \def\refi@AmS{T}% % NOTE 37 \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 % NOTE 38 \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} % NOTE 39.1 \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} % NOTE 39.2 \refdef@AmS\pages{} \def\page{\egroup\gdef\ispage@AmS{T}\setbox \pagesbox@AmS=\hbox\bgroup} % NOTE 39.3 \refdef@AmS\book{} \def\inbook{\egroup\gdef\isinbook@AmS{T}\setbox \bookbox@AmS=\hbox\bgroup} % NOTE 39.4 \refdef@AmS\bookinfo{} \refdef@AmS\publ{} \refdef@AmS\publaddr{} \refdef@AmS\finalinfo{} \def\setpunct@AmS{\def\prepunct@AmS{, }} % NOTE 40 \def\ppunbox@AmS#1{\prepunct@AmS\unhbox#1\unskip} % NOTE 41 \def\endref@AmS{\def\prepunct@AmS{}% % NOTE 42 \if T\refi@AmS % NOTE 43.1 \if F\isno@AmS\hbox to 10pt{}\else % NOTE 43.2 \hbox to 20pt{\hss\unhbox\nobox@AmS\unskip. }\fi % NOTE 43.3 \if T\iskey@AmS \unhbox\keybox@AmS\unskip\ \fi % NOTE 43.4 \if T\isby@AmS \hbox{\unhcopy\bybox@AmS\unskip}\setpunct@AmS % NOTE 43.5 \setbox\bysamebox@AmS=\hbox{\unhcopy\bybox@AmS\unskip}\fi % NOTE 43.6 \if T\isbysame@AmS % NOTE 43.7 \hbox to \wd\bysamebox@AmS{\leaders\hrule\hfill}\setpunct@AmS\fi \fi % NOTE 43.8 \if T\ispaper@AmS\ppunbox@AmS\paperbox@AmS\setpunct@AmS\fi % NOTE 44 \if T\ispaperinfo@AmS\ppunbox@AmS\paperinfobox@AmS\setpunct@AmS\fi % NOTE 45 \if T\isjour@AmS\ppunbox@AmS\jourbox@AmS\setpunct@AmS % NOTE 46 \if T\isvol@AmS \ \unhbox\volbox@AmS\unskip\setpunct@AmS\fi % NOTE 46.1 \if T\isissue@AmS \ \unhbox\issuebox@AmS\unskip\setpunct@AmS\fi% NOTE 46.2 \if T\isyr@AmS \ (\unhbox\yrbox@AmS\unskip)\setpunct@AmS\fi % NOTE 46.3 \if T\istoappear@AmS \ (to appear)\setpunct@AmS\fi % NOTE 46.4 \if T\ispages@AmS \ppunbox@AmS\pagesbox@AmS\setpunct@AmS\fi % NOTE 46.5 \if T\ispage@AmS % NOTE 46.6 \prepunct@AmS p.\ \unhbox\pagesbox@AmS\unskip\setpunct@AmS\fi \fi % NOTE 46.7 \if T\isbook@AmS \prepunct@AmS % NOTE 47 ``\unhbox\bookbox@AmS\unskip''\setpunct@AmS\fi \if T\isinbook@AmS \prepunct@AmS % NOTE 48 \unskip\ in ``\unhbox\bookbox@AmS\unskip''\setpunct@AmS \gdef\isbook@AmS{T}\fi \if T\isbookinfo@AmS \ppunbox@AmS\bookinfobox@AmS\setpunct@AmS\fi % NOTE 49 \if T\ispubl@AmS \ppunbox@AmS\publbox@AmS\setpunct@AmS\fi % NOTE 50 \if T\ispubladdr@AmS \ppunbox@AmS\publaddrbox@AmS\setpunct@AmS\fi % NOTE 51 \if T\isbook@AmS % NOTE 52 \if T\isyr@AmS \prepunct@AmS \unhbox\yrbox@AmS\unskip % NOTE 52.1 \setpunct@AmS\fi \if T\istoappear@AmS \ (to appear)\setpunct@AmS\fi % NOTE 52.2 \if T\ispages@AmS % NOTE 52.3 \prepunct@AmS pp.\ \unhbox\pagesbox@AmS\unskip\setpunct@AmS\fi \if T\ispage@AmS % NOTE 52.4 \prepunct@AmS p.\ \unhbox\pagesbox@AmS\unskip\setpunct@AmS\fi \fi \if T\isfinalinfo@AmS \period\unhbox\finalinfobox@AmS\else % NOTE 53 \if T\refl@AmS .\else ; \fi\fi} \def\endref{\egroup\gdef\refl@AmS{T}\endref@AmS\par} % OUTPUT \newif\ifguides@AmS \guides@AmSfalse \def\guidelines{\guides@AmStrue} \def\noguidelines{\guides@AmSfalse} \def\guidelinegap#1{\def\gwidth@AmS{#1}} \def\gwidth@AmS{24pt} \newif\iflogo@AmS \def\nologo{\logo@AmSfalse} \logo@AmStrue \def\output@AmS{\ifnum\count0=1 \shipout\vbox{\ifguides@AmS\hrule width \hsize \vskip\gwidth@AmS \fi \vbox to \vsize{\boxmaxdepth=\maxdepth\pagecontents}\baselineskip2pc \iflogo@AmS \hbox to \hsize{\hfil\eightpoint \logoword@AmS\AmSTeX}\fi \ifguides@AmS \vskip\gwidth@AmS \hrule width \hsize\fi}\vsize 44pc\else \shipout\vbox{\ifguides@AmS \hrule width \hsize \vskip\gwidth@AmS\fi \vbox to \vsize{\boxmaxdepth=\maxdepth\pagecontents}\baselineskip2pc\hbox to \hsize{\hfil \tenpoint\number\count0\hfil}\ifguides@AmS \vskip\gwidth@AmS\hrule width \hsize\fi}\fi\global\advance\count0 by 1 \global\footmarkcount@AmS=0 \global\foottextcount@AmS=0 \ifnum\outputpenalty>-20000 \else\dosupereject\fi} \def\footnoterule{\vskip-3pt \hrule width 2truein \vskip 2.6pt } % the \hrule is .4pt high % INITIAL STUFF \def\document{} \ask@AmS \tenpoint \catcode`\@=13