61.7 Top Matter

<..top matter of amsppt.sty..>
 \let\:endtopmatter=\endtopmatter
 \def\endtopmatter{%
    <.move footnotes down.>%
   \let\inslogo@=\logo@
   \ifx\thedate@\empty@\else
      <.neutralize line.>%
      \let\thedate:=\thedate@
      \def\thedate@{\a:date\thedate:\b:date}\fi
   \ifvoid\tocbox@\else   \ifx \a:newtocdefs\:UnDef
      \setbox\tocbox@=\vtop{\IgnorePar
         <.amstex.tex toc.>}%
   \fi \fi
   \csname :endtopmatter\endcsname \b:topmatter }
 \pend:def\topmatter{\a:topmatter}
 \NewConfigure{topmatter}{2}
 -_-_-

<..top matter of amsppt.sty..>+
 \NewConfigure{newtocdefs}[1]{\c:def\a:newtocdefs{#1}}
 \let\o:newtocdefs:=\newtocdefs
 \def\newtocdefs{\o:newtocdefs:
    <.amstex.tex toc entries.>%
    \ifx \a:newtocdefs\:UnDef
    \else \a:TableOfContents
        \pend:def\endtoc{\c:TableOfContents}%
    \fi}
 \pend:def\toc{\SaveEndP
    <.extract amstex.tex toc title.>}
 \append:def\endtoc{\RecallEndP}
 \def\c:toc:{\Configure{TableOfContents}}
 -_-_-

<..insert amstex.tex toc title..>
 \ifmonograph@\else
    \centerline{\headfont@\ignorespaces\toc:title\unskip}\nobreak
 \fi
 -_-_-

<..extract amstex.tex toc title..>
 \ifx \a:newtocdefs\:UnDef
    \let\:tempc=\FN@
    \def\FN@{%
       \let\FN@=\:tempc
       \let\:tempc=\nextii@
       \def\nextii@########1{\let\nextii@=\:tempc
          \gdef\toc:title{########1}\nextii@{########1}}%
       \FN@}%
 \fi
 -_-_-

If \a:newtocdefs empty we go for the inlinecontent under interpretation of entries of \TableOfContents, if it is undefined we call directly to \TableOfContents with the entries that appear in the body (instead of the content part, and we go for the body itself if \a:newtocdefs is defined to a nonempty content.

<..amstex.tex toc entries..>
 \ifx \a:newtocdefs\:UnDef
    \let\toc:list=\empty
    \expandafter\def\csname title\endcsname  ##1\endtitle{%
        \xdef\toc:list{\ifx \toc:list\empty\else ,\fi title}}%
    \expandafter\def\csname specialhead\endcsname##1\endspecialhead{%
        \xdef\toc:list{\ifx \toc:list\empty\else ,\fi specialhead}}%
    \expandafter\def\csname head\endcsname##1 ##2\endhead{%
        \xdef\toc:list{\ifx \toc:list\empty\else ,\fi head}}%
    \expandafter\def\csname subhead\endcsname##1 ##2\endsubhead{%
        \xdef\toc:list{\ifx \toc:list\empty\else ,\fi subhead}}%
    \expandafter\def\csname subsubhead\endcsname##1 ##2\endsubsubhead{%
        \xdef\toc:list{\ifx \toc:list\empty\else ,\fi subsubhead}}%
 \else \ifx \a:newtocdefs\empty
    \HAssign\TocCount=0
    \expandafter\def\csname title\endcsname##1\endtitle{%
          \toctitle{}{##1}{}}%
    \expandafter\def\csname specialhead\endcsname##1\endspecialhead{%
          \tocspecialhead{}{##1}{}}%
    \expandafter\def\csname head\endcsname##1 ##2\endhead{%
          \tochead{##1}{##2}{}}%
    \expandafter\def\csname subhead\endcsname##1 ##2\endsubhead{%
          \tocsubhead{##1}{##2}{}}%
    \expandafter\def\csname subsubhead\endcsname##1 ##2\endsubsubhead{%
          \tocsubsubhead{##1}{##2}{}}%
 \else
    \a:newtocdefs
 \fi \fi
 -_-_-

<..amstex.tex toc..>
 <.insert amstex.tex toc title.>%
 \ifx \toc:list\:UnDef
   \def\toc:list{\TableOfContents[title,specialhead,head,%
                        subhead,subsubhead]}%
 \else
    \pend:def\toc:list{\TableOfContents[}%
    \append:def\toc:list{]}%
 \fi
 \toc:list
 -_-_-

<..move footnotes down..>
 \ifmonograph@\else
   \ifx \preabstract\relax \let\preabstract=\empty\fi
   \ifx\thesubjclass@\empty@\else
      \let\:thesubjclass=\thesubjclass@   \let\thesubjclass@=\empty
      \pend:def\preabstract{\a:subjclass\:thesubjclass\b:subjclass}%
   \fi
   \ifx\thekeywords@\empty@\else
      \let\:thekeywords=\thekeywords@   \let\thekeywords@=\empty
      \pend:def\preabstract{\a:keywords\:thekeywords\b:keywords}%
   \fi
   \ifx\thethanks@\empty@\else
       \let\:thethanks=\thethanks@    \let\thethanks@=\empty
      \pend:def\preabstract{\a:thanks\:thethanks\b:thanks}%
   \fi
 \fi
 -_-_-

<..top matter of amsppt.sty..>+
 \NewConfigure{subjclass}{2}
 \NewConfigure{thanks}{2}
 \NewConfigure{keywords}{2}
 -_-_-

<..neutralize line..>
 \let\:predate=\predate
 \def\predate{\:predate
    \let\sv:line=\line \def\line{\let\line=\sv:line\hbox}}%
 -_-_-

<..top matter of amsppt.sty..>+
 \let\:author=\author
 \def\author#1\endauthor{\:author{\a:author#1\b:author}\endauthor}
 -_-_-

<..config amsppt + vanilla shared..>+
 \NewConfigure{author}{2}
 -_-_-

<..top matter of amsppt.sty..>+
 \let\:affil=\affil
 \def\affil#1\endaffil{\:affil{\a:affil#1\b:affil}\endaffil}
 \NewConfigure{affil}{2}
 -_-_-

<..top matter of amsppt.sty..>+
 \def\abstract{\let\savedef@\abstract
   \def\abstract{\let\abstract\savedef@
     \setbox\abstractbox@\vbox\bgroup\IgnorePar \noindent
       \expandafter\everydisplay\expandafter{\expandafter
       \everydisplay\expandafter{\the\everydisplay}}$$\vbox\bgroup
       \def\envir@end{\endabstract}\advance\hsize-2\indenti
       \def\usualspace{\enspace}\eightpoint
           \IgnorePar \noindent \frills@{{\smc
           \a:abstract Abstract.\b:abstract\enspace}}}%
   \nofrillscheck\abstract}
 -_-_-

<..top matter of amsppt.sty..>+
 \append:def\abstract{\c:abstract}
 \pend:def\endabstract{\d:abstract}
 \NewConfigure{abstract}{4}
 -_-_-

<..top matter of amsppt.sty..>+
 \NewConfigure{date}{2}
 -_-_-

<..top matter of amsppt.styNO..>
 \NewConfigure{toc}[5]{\c:def\a:TableOfContents{#1}%
    \c:def\b:TableOfContents{#2}\c:def\c:TableOfContents{#3}%
    \c:def\d:TableOfContents{#4}\c:def\e:TableOfContents{#5}%
 }
 \Configure{toc} {}{}{} {}{}
 -_-_-