%AMS namedate format macros
%no citation flag, author, date in brackets [], title, etc.,
%                                          volume, pages, gov't no., other

\Refstd\Rpunct%set general formats for reference list and citations
\def\Titlefont{\sl}\def\Volfont{\bf}\def\Tomefont{\Reffont}%redefine some fonts
  \def\Lcitemark{%mark at left of citation--also sets internal punctuation
     \let\uchyph=1\def\Cfont{\Citefont}%
     \def\Citebreak{\egroup\ [\bgroup\bf}%
     \def\Citecomma{\egroup]; \bgroup\Cfont }(\bgroup\Cfont}%
  \def\Rcitemark{\egroup])}%mark at right of citation
  \def\LAcitemark{%mark at left of alternate citation
     \let\uchyph=1\def\Citebreak{\egroup\ [\bgroup\bf}%
     \def\Cfont{\ACitefont}%
     \def\Citecomma{\egroup], \bgroup\Cfont }\bgroup\Cfont}%
  \def\RAcitemark{\egroup]}%mark at right of alternate citation
  \def\Citehyphen{\egroup--\bgroup\Cfont}%separater for string of citations
  \def\LIcitemark{\egroup}%mark at left of insertion in citation
  \def\RIcitemark{\bgroup\Cfont}%mark at right of insertion in citation

\def\journalarticleformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
               \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
               \par\vfil\penalty-200\vfilneg%\filbreak
     \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip, }\fi%
      \if\Dtest\present\unskip\hskip.16667em[\bgroup\bf\Dstr\ifcat\Ftrail a\Ftrail\fi\egroup]\def\Comma{, }\fi%
       \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
        \if\etest\present\if\Ttest\present{}\fi\hskip.16667em(\bgroup\estr\egroup)\def\Comma{\unskip, }\fi%
         \if\Jtest\present\Comma\bgroup\Tomefont\Jstr\/\egroup\def\Comma{, }\fi%
          \if\Vtest\present\if\Jtest\present\hskip.2em\else\Comma\fi\bgroup\Volfont\Vstr\egroup\def\Comma{, }\fi%
           \if\Ptest\present\bgroup, \Pstr\egroup\def\Comma{, }\fi%
            \if\ttest\present\Comma\bgroup\Titlefont\tstr\egroup\def\Comma{, }\fi%
             \if\jtest\present\Comma\bgroup\Tomefont\jstr\/\egroup\def\Comma{, }\fi%
              \if\vtest\present\if\jtest\present\hskip.2em\else\Comma\fi\bgroup\Volfont\vstr\egroup\def\Comma{, }\fi%
               \if\dtest\present\hskip.16667em(\bgroup\dstr\egroup)\def\Comma{, }\fi%
                \if\ptest\present\bgroup, \pstr\egroup\def\Comma{, }\fi%
                 \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
                  \if\Mtest\present\Comma MR \#\bgroup\Mstr\egroup\def\Comma{, }\fi%
                   \if\Otest\present{\Comma\bgroup\Ostr\egroup.}\else{.}\fi%
                    \vskip3ptplus1ptminus1pt}%\smallskip

\def\conferencereportformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
               \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
               \par\vfil\penalty-200\vfilneg%\filbreak
     \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip, }\fi%
      \if\Dtest\present\unskip\hskip.16667em[\bgroup\bf\Dstr\ifcat a\Ftrail\Ftrail\fi\egroup]\def\Comma{, }\fi%
       \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
        \if\Jtest\present\Comma\bgroup\Tomefont\Jstr\/\egroup\def\Comma{, }\fi%
         \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
          \if\Mtest\present\Comma MR \#\bgroup\Mstr\egroup\def\Comma{, }\fi%
           \if\Otest\present{\Comma\bgroup\Ostr\egroup.}\else{.}\fi%
            \vskip3ptplus1ptminus1pt}%\smallskip

\def\bookarticleformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
               \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
               \par\vfil\penalty-200\vfilneg%\filbreak
     \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip, }\fi%
      \if\Dtest\present\unskip\hskip.16667em[\bgroup\bf\Dstr\ifcat a\Ftrail\Ftrail\fi\egroup]\def\Comma{, }\fi%
       \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
        \if\etest\present\if\Ttest\present\fi\hskip.2em(\bgroup\estr\egroup)\def\Comma{\unskip, }\fi%
         \if\Btest\present\Comma in ``\bgroup\Tomefont\Bstr\/\egroup''\def\Comma{\unskip, }\fi%
          \if\otest\present\ \bgroup\ostr\egroup\def\Comma{, }\fi%
           \if\Etest\present\Comma\bgroup\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi\def\Comma{, }\fi%
            \if\Stest\present\Comma\bgroup\Sstr\egroup\def\Comma{, }\fi%
             \if\Vtest\present\Comma vol. \bgroup\Volfont\Vstr\egroup\def\Comma{, }\fi%
              \if\Ntest\present\Comma no. \bgroup\Volfont\Nstr\egroup\def\Comma{, }\fi%
               \if\Itest\present\Comma\bgroup\Istr\egroup\def\Comma{, }\fi%
                \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
                 \if\Ptest\present\Comma\Pstr\def\Comma{, }\fi%
                  \if\ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
                   \if\btest\present\Comma in ``\bgroup\Tomefont\bstr\egroup''\def\Comma{, }\fi%
                    \if\atest\present\Comma\bgroup\astr\egroup\unskip, \if\acnt\present eds.\else ed.\fi\def\Comma{, }\fi%
                     \if\stest\present\Comma\bgroup\sstr\egroup\def\Comma{, }\fi%
                      \if\vtest\present\Comma vol. \bgroup\Volfont\vstr\egroup\def\Comma{, }\fi%
                       \if\ntest\present\Comma no. \bgroup\Volfont\nstr\egroup\def\Comma{, }\fi%
                        \if\itest\present\Comma\bgroup\istr\egroup\def\Comma{, }\fi%
                         \if\ctest\present\Comma\bgroup\cstr\egroup\def\Comma{, }\fi%
                          \if\dtest\present\Comma\bgroup\dstr\egroup\def\Comma{, }\fi%
                           \if\ptest\present\Comma\pstr\def\Comma{, }\fi%
                            \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
                             \if\Mtest\present\Comma MR \#\bgroup\Mstr\egroup\def\Comma{, }\fi%
                              \if\Otest\present{\Comma\bgroup\Ostr\egroup.}\else{.}\fi%
                               \vskip3ptplus1ptminus1pt}%\smallskip

\def\bookformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
               \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
               \par\vfil\penalty-200\vfilneg%\filbreak
      \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip, }%
          \else\if\Etest\present\bgroup\def\Eand{\Aand}\def\Eandd{\Aandd}\Authfont\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi\def\Comma{, }%
                \else\if\Itest\present\bgroup\Authfont\Istr\egroup\def\Comma{, }\fi\fi\fi%
        \if\Dtest\present\unskip\hskip.16667em[\bgroup\bf\Dstr\ifcat a\Ftrail\Ftrail\fi\egroup]\def\Comma{, }\fi%
         \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }%
               \else\if\Btest\present\Comma\bgroup\Titlefont\Bstr\/\egroup\def\Comma{\unskip, }\fi\fi%
           \if\otest\present\ \bgroup\ostr\egroup\def\Comma{, }\fi%
            \if\etest\present\hskip.2em(\bgroup\estr\egroup)\def\Comma{\unskip, }\fi%
             \if\Stest\present\Comma\bgroup\Sstr\egroup\def\Comma{, }\fi%
              \if\Vtest\present\Comma vol. \bgroup\Volfont\Vstr\egroup\def\Comma{, }\fi%
               \if\Ntest\present\Comma no. \bgroup\Volfont\Nstr\egroup\def\Comma{, }\fi%
                \if\Atest\present\if\Itest\present
                        \Comma\bgroup\Istr\egroup\def\Comma{\unskip, }\fi%
                     \else\if\Etest\present\if\Itest\present
                             \Comma\bgroup\Istr\egroup\def\Comma{\unskip, }\fi\fi\fi%
                    \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
                     \if\ttest\present\Comma\bgroup\Titlefont\tstr\egroup\def\Comma{, }%
                           \else\if\btest\present\Comma\bgroup\Titlefont\bstr\egroup\def\Comma{, }\fi\fi%
                        \if\stest\present\Comma\bgroup\sstr\egroup\def\Comma{, }\fi%
                         \if\vtest\present\Comma vol. \bgroup\Volfont\vstr\egroup\def\Comma{, }\fi%
                          \if\ntest\present\Comma no. \bgroup\Volfont\nstr\egroup\def\Comma{, }\fi%
                           \if\itest\present\Comma\bgroup\istr\egroup\def\Comma{, }\fi%
                            \if\ctest\present\Comma\bgroup\cstr\egroup\def\Comma{, }\fi%
                             \if\dtest\present\Comma\bgroup\dstr\egroup\def\Comma{, }\fi%
                              \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
                               \if\Mtest\present\Comma MR \#\bgroup\Mstr\egroup\def\Comma{, }\fi%
                                \if\Otest\present{\Comma\bgroup\Ostr\egroup.}\else{.}\fi%
                                 \vskip3ptplus1ptminus1pt}%\smallskip

\def\technicalreportformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
               \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
               \par\vfil\penalty-200\vfilneg%\filbreak
     \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip, }%
          \else\if\Etest\present\bgroup\def\Eand{\Aand}\def\Eandd{\Aandd}\Authfont\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi\def\Comma{, }%
                \else\if\Itest\present\bgroup\Authfont\Istr\egroup\def\Comma{, }\fi\fi\fi%
        \if\Dtest\present\unskip\hskip.16667em[\bgroup\bf\Dstr\ifcat a\Ftrail\Ftrail\fi\egroup]\def\Comma{, }\fi%
         \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
          \if\Atest\present\if\Itest\present
                  \Comma\bgroup\Istr\egroup\def\Comma{, }\fi%
               \else\if\Etest\present\if\Itest\present
                       \Comma\bgroup\Istr\egroup\def\Comma{, }\fi\fi\fi%
           \if\Rtest\present\Comma\bgroup\Rstr\egroup\def\Comma{, }\fi%
            \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
             \if\ttest\present\Comma\bgroup\Titlefont\tstr\egroup\def\Comma{, }\fi%
              \if\itest\present\Comma\bgroup\istr\egroup\def\Comma{, }\fi%
               \if\rtest\present\Comma\bgroup\rstr\egroup\def\Comma{, }\fi%
                \if\ctest\present\Comma\bgroup\cstr\egroup\def\Comma{, }\fi%
                 \if\dtest\present\Comma\bgroup\dstr\egroup\def\Comma{, }\fi%
                  \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
                   \if\Mtest\present\Comma MR \#\bgroup\Mstr\egroup\def\Comma{, }\fi%
                    \if\Otest\present{\Comma\bgroup\Ostr\egroup.}\else{.}\fi%
                     \vskip3ptplus1ptminus1pt}%\smallskip

\def\otherformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
               \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
               \par\vfil\penalty-200\vfilneg%\filbreak
     \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip, }%
           \else\if\Etest\present\bgroup\def\Eand{\Aand}\def\Eandd{\Aandd}\Authfont\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi\def\Comma{, }%
                \else\if\Itest\present\bgroup\authfont\Istr\egroup\def\Comma{, }\fi\fi\fi%
        \if\Dtest\present\unskip\hskip.16667em[\bgroup\bf\Dstr\ifcat a\Ftrail\Ftrail\fi\egroup]\def\Comma{, }\fi%
         \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
          \if\Atest\present\if\Itest\present
                  \Comma\bgroup\Istr\egroup\def\Comma{, }\fi%
               \else\if\Etest\present\if\Itest\present
                       \Comma\bgroup\Istr\egroup\def\Comma{, }\fi\fi\fi%
               \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
                \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
                 \if\Mtest\present\Comma MR \#\bgroup\Mstr\egroup\def\Comma{, }\fi%
                  \if\Otest\present{\Comma\bgroup\Ostr\egroup.}\else{.}\fi%
                   \vskip3ptplus1ptminus1pt}%\smallskip