% Copyright (C) 1989 Chiaki Tsukamoto
%%
% aspmfm.sty  ver. 1.0  C. Tsukamoto  07 Apr. 89
%%
%%
%
%
% aspmfm.sty  ver. 1.1  H. Naito
%      style file for AmSTeX version 2.0 based on amsppt.sty
%
%%
%\input amstex
\catcode`\@=11
\ifx\aspmfmloaded@AmS\relax
\catcode`\@=\active\let\next\endinput\else
\let\aspmfmloaded@AmS\relax\relaxnext@\fi
\next
%
\def\CR@@{\W@{aspmfm.sty - ver. 1.1}\W@{ style file for AmSTeX version 2.0,
test version}}
\CR@@
\everyjob{\CR@\CR@@}
%
% basic parameters
%
\hsize312\p@
\vsize504\p@
\parindent18\p@
\smallskipamount4\p@ plus1\p@ minus1\p@
\medskipamount8\p@ plus2\p@ minus2\p@
\bigskipamount16\p@ plus4\p@ minus4\p@
\skip\footins\bigskipamount
%
\newcount\footmarkcount@
\loadmsam
\loadmsbm
\loadeufm
\UseAMSsymbols
%
%
\newskip\headsep \headsep16\p@
\captionwidth@\hsize \advance\captionwidth@-6pc
%
\newdimen\framethickness
%
% fonts I
%
%\font@\seventeenrm=cmr10 scaled\magstep3
\font@\seventeenrm=cmr17
%\font@\twelverm=cmr10 scaled\magstep1
\font@\twelverm=cmr12
% \tenrm=cmr10
\font@\ninerm=cmr9
%\font@\eightrm=cmr8
% \sevenrm=cmr7
\font@\sixrm=cmr6
% \fiverm=cmr5
%
\font@\seventeeni=cmmi10 scaled\magstep3 \skewchar\seventeeni='177
%\font@\twelvei=cmmi10 scaled\magstep1 \skewchar\twelvei='177
\font@\twelvei=cmmi12 \skewchar\twelvei='177
% \teni=cmmi10
\font@\ninei=cmmi9 \skewchar\ninei='177
%\font@\eighti=cmmi8 \skewchar\eighti='177
% \seveni=cmmi7
\font@\sixi=cmmi6 \skewchar\sixi='177
% \fivei=cmmi5
%
\font@\seventeensy=cmsy10 scaled\magstep3 \skewchar\seventeensy='60
\font@\twelvesy=cmsy10 scaled\magstep1 \skewchar\twelvesy='60
% \tensy=cmsy10
\font@\ninesy=cmsy9 \skewchar\ninesy='60
%\font@\eightsy=cmsy8 \skewchar\eightsy='60
% \sevensy=cmsy7
\font@\sixsy=cmsy6 \skewchar\sixsy='60
% \fivesy=cmsy5
%
\font@\seventeenbf=cmbx10 scaled\magstep3
%\font@\twelvebf=cmbx10 scaled\magstep1
\font@\twelvebf=cmbx12
% \tenbf=cmbx10
\font@\ninebf=cmbx9
%\font@\eightbf=cmbx8
% \sevenbf=cmbx7
\font@\sixbf=cmbx6
% \fivebf=cmbx5
%
\font@\seventeenit=cmti10 scaled\magstep3
%\font@\twelveit=cmti10 scaled\magstep1
\font@\twelveit=cmti12
% \tenit=cmti10
\font@\nineit=cmti9
%\font@\eightit=cmti8
%
\font@\seventeenbi=cmbxti10 scaled\magstep3
\font@\twelvebi=cmbxti10 scaled\magstep1
\font@\tenbi=cmbxti10
%\font@\ninebi=cmbxti10 scaled900
%
\font@\seventeensl=cmsl10 scaled\magstep3
%\font@\twelvesl=cmsl10 scaled\magstep1
\font@\twelvesl=cmsl12
% \tensl=cmsl10
\font@\ninesl=cmsl9
%\font@\eightsl=cmsl8
%
\font@\seventeenmsa=msam10 scaled\magstep3
\font@\twelvemsa=msam10 scaled\magstep1
\font@\tenmsa=msam10
\font@\ninemsa=msam9
\font@\eightmsa=msam8
\font@\sevenmsa=msam7
\font@\sixmsa=msam6
\font@\fivemsa=msam5
%
\font@\seventeenmsb=msbm10 scaled\magstep3
\font@\twelvemsb=msbm10 scaled\magstep1
\font@\tenmsb=msbm10
\font@\ninemsb=msbm9
\font@\eightmsb=msbm8
\font@\sevenmsb=msbm7
\font@\sixmsb=msbm6
\font@\fivemsb=msbm5
%
\font@\seventeeneuf=eufm10 scaled\magstep3
\font@\twelveeuf=eufm10 scaled\magstep1
\font@\teneuf=eufm10
\font@\nineeuf=eufm9
\font@\eighteuf=eufm8
\font@\seveneuf=eufm7
\font@\sixeuf=eufm6
\font@\fiveeuf=eufm5
%
\font@\seventeensmc=cmcsc10 scaled\magstep3
\font@\twelvesmc=cmcsc10 scaled\magstep1
\font@\tensmc=cmcsc10
%\font@\eightsmc=amcsc8
%
% fonts II
%
\def\textfont@{\textonlyfont@}
%
\def\seventeenpoint{%
\normalbaselineskip22\p@
\normallineskiplimit4.5\p@
\normallineskip\normallineskiplimit
%\textfont@\rm\seventeenrm
%\textfont@\it\seventeenit
%\textfont@\sl\seventeensl
\textfont@\bf\seventeenbf
%\textfont@\bi\seventeenbi
%\textfont@\smc\seventeensmc
\ifsyntax@\def\big##1{{\hbox{$\left##1\right.$}}}\else\let\big\seventeenbig@
%\textfont\z@\seventeenrm
%\textfont\@ne\seventeeni
%\textfont\tw@\seventeensy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
%\textfont\itfam\seventeenit
%\textfont\slfam\seventeensl
\textfont\bffam\seventeenbf
%\textfont\msafam=\seventeenmsa
%\textfont\msbfam=\seventeenmsb
%\textfont\eufmfam=\seventeeneuf
\fi
\setbox\strutbox\hbox{\vrule height16.5\p@ depth5.5\p@ width\z@}%
\setbox\strutbox@\hbox{\vrule height15\p@ depth5\p@ width\z@}%
\normalbaselines
\seventeenbf
\ex@=.2326ex}
\def\seventeenbig@#1{{\hbox{$\left#1\vbox to16.5\p@{}\right.\n@space$}}}
%%
\def\twelvepoint{%
\normalbaselineskip15\p@
\normallineskiplimit2.7\p@
\normallineskip\normallineskiplimit
\textfont@\rm\twelverm
\textfont@\it\twelveit
\textfont@\sl\twelvesl
\textfont@\bf\twelvebf
\textfont@\bi\twelvebi
\textfont@\smc\twelvesmc
\ifsyntax@\def\big##1{{\hbox{$\left##1\right.$}}}\else\let\big\twelvebig@
\textfont\z@\twelverm \scriptfont\z@\ninerm \scriptscriptfont\z@\sixrm
\textfont\@ne\twelvei \scriptfont\@ne\ninei \scriptscriptfont\@ne\sixi
\textfont\tw@\twelvesy \scriptfont\tw@\ninesy \scriptscriptfont\tw@\sixsy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
\textfont\itfam\twelveit
\textfont\slfam\twelvesl
\textfont\bffam\twelvebf
\scriptfont\bffam\ninebf
\scriptscriptfont\bffam\sixbf
\textfont\msafam=\twelvemsa
\scriptfont\msafam=\ninemsa
\scriptscriptfont\msafam=\sixmsa
\textfont\msbfam=\twelvemsb
\scriptfont\msbfam=\ninemsb
\scriptscriptfont\msbfam=\sixmsb
\textfont\eufmfam=\twelveeuf
\scriptfont\eufmfam=\nineeuf
\scriptscriptfont\eufmfam=\sixeuf
\fi
\setbox\strutbox\hbox{\vrule height10.5\p@ depth4.5\p@ width\z@}%
\setbox\strutbox@\hbox{\vrule height9.5\p@ depth3.5\p@ width\z@}%
\normalbaselines
\twelverm
\ex@=.2326ex}
\def\twelvebig@#1{{\hbox{$\left#1\vbox to10.5\p@{}\right.\n@space$}}}
%%
\def\tenpoint{%
\normalbaselineskip12\p@
\normallineskiplimit1.8\p@
\normallineskip\normallineskiplimit
\abovedisplayskip 9\p@ plus3\p@ minus3\p@
\belowdisplayskip\abovedisplayskip
\abovedisplayshortskip \z@ plus3\p@
\belowdisplayshortskip 6\p@ plus3\p@ minus3\p@
\textfont@\rm\tenrm
\textfont@\it\tenit
\textfont@\sl\tensl
\textfont@\bf\tenbf
\textfont@\bi\tenbi
\textfont@\smc\tensmc
\ifsyntax@\def\big##1{{\hbox{$\left##1\right.$}}}\else\let\big\tenbig@
\textfont\z@\tenrm \scriptfont\z@\sevenrm \scriptscriptfont\z@\fiverm
\textfont\@ne\teni \scriptfont\@ne\seveni \scriptscriptfont\@ne\fivei
\textfont\tw@\tensy \scriptfont\tw@\sevensy \scriptscriptfont\tw@\fivesy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
\textfont\itfam\tenit
\textfont\slfam\tensl
\textfont\bffam\tenbf
\scriptfont\bffam\sevenbf
\scriptscriptfont\bffam\fivebf
\textfont\msafam=\tenmsa
\scriptfont\msafam=\sevenmsa
\scriptscriptfont\msafam=\fivemsa
\textfont\msbfam=\tenmsb
\scriptfont\msbfam=\sevenmsb
\scriptscriptfont\msbfam=\fivemsb
\textfont\eufmfam=\teneuf
\scriptfont\eufmfam=\seveneuf
\scriptscriptfont\eufmfam=\fiveeuf
\fi
\setbox\strutbox\hbox{\vrule height8.5\p@ depth3.5\p@ width\z@}%
\setbox\strutbox@\hbox{\vrule height8\p@ depth3\p@ width\z@}%
\normalbaselines
\tenrm
\ex@=.2326ex}
\def\tenbig@#1{{\hbox{$\left#1\vbox to8.5\p@{}\right.\n@space$}}}
%%
\def\ninepoint{%
\normalbaselineskip11\p@
\normallineskiplimit1.8\p@
\normallineskip\normallineskiplimit
\abovedisplayskip8.1\p@ plus2.7\p@ minus2.7\p@
\belowdisplayskip\abovedisplayskip
\abovedisplayshortskip\z@ plus2.7\p@
\belowdisplayshortskip5.4\p@ plus2.7\p@ minus2.7\p@
\textfont@\rm\ninerm
\textfont@\it\nineit
\textfont@\sl\ninesl
\textfont@\bf\ninebf
\ifsyntax@\def\big##1{{\hbox{$\left##1\right.$}}}\else\let\big\ninebig@
\textfont\z@\ninerm \scriptfont\z@\sixrm \scriptscriptfont\z@\fiverm
\textfont\@ne\ninei \scriptfont\@ne\sixi \scriptscriptfont\@ne\fivei
\textfont\tw@\ninesy \scriptfont\tw@\sixsy \scriptscriptfont\tw@\fivesy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
\textfont\itfam\nineit
\textfont\slfam\ninesl
\textfont\bffam\ninebf
\scriptfont\bffam\sixbf
\scriptscriptfont\bffam\fivebf
\textfont\msafam=\ninemsa
\scriptfont\msafam=\sixmsa
\scriptscriptfont\msafam=\fivemsa
\textfont\msbfam=\ninemsb
\scriptfont\msbfam=\sixmsb
\scriptscriptfont\msbfam=\fivemsb
\textfont\eufmfam=\nineeuf
\scriptfont\eufmfam=\sixeuf
\scriptscriptfont\eufmfam=\fiveeuf
\fi
\setbox\strutbox\hbox{\vrule height7.75\p@ depth3.25\p@ width\z@}%
\setbox\strutbox@\hbox{\vrule height7\p@ depth2.5\p@ width\z@}%
\normalbaselines
\ninerm
\ex@=.2326ex}
\def\ninebig@#1{{\hbox{$\left#1\vbox to7.25\p@{}\right.\n@space$}}}
%
% footnote
%
\footmarkcount@\z@
\def\footmarkform@#1{$^{#1}$}
\let\thefootnotemark\footmarkform@
%
\def\makefootnote@#1#2{\insert\footins
{\interlinepenalty\interfootnotelinepenalty
\ninepoint
\splittopskip\ht\strutbox
\splitmaxdepth\dp\strutbox
\floatingpenalty\@MM
\leftskip\z@skip\rightskip\z@skip\spaceskip\z@skip\xspaceskip\z@skip
\noindent{#1}\footstrut\ignorespaces#2\unskip
\lower\dp\strutbox
\vbox to\dp\strutbox{}}}
%
\def\footnotemark{\let\@sf\empty\relaxnext@
\ifhmode\edef\@sf{\spacefactor\the\spacefactor}\/\fi
\def\next@{\ifx[\next
\let\next\nextii@\else\ifx"\next
\let\next\nextiii@\else
\let\next\nextiv@\fi\fi\next}%
\def\nextii@[##1]{\footmarkform@{##1}\@sf}%
\def\nextiii@"##1"{{##1}\@sf}%
\def\nextiv@{\global\advance\footmarkcount@\@ne
\footmarkform@{\number\footmarkcount@}\@sf}%
\futurelet\next\next@}
%
\def\footnotetext{\relaxnext@
\def\next@{\ifx[\next
\let\next\nextii@\else\ifx"\next
\let\next\nextiii@\else
\let\next\nextiv@\fi\fi\next}%
\def\nextii@[##1]##2{\makefootnote@{\footmarkform@{##1}}{##2}}%
\def\nextiii@"##1"##2{\makefootnote@{##1}{##2}}%
\def\nextiv@##1{\makefootnote@{\footmarkform@{\number\footmarkcount@}}{##1}}
%
\futurelet\next\next@}
%
\def\footnote{\let\@sf\empty\relaxnext@
\ifhmode\edef\@sf{\spacefactor\the\spacefactor}\/\fi
\def\next@{\ifx[\next
\let\next\nextii@\else\ifx"\next
\let\next\nextiii@\else
\let\next\nextiv@\fi\fi\next}%
\def\nextii@[##1]##2{\footnotemark[##1]\footnotetext[##1]{##2}}%
\def\nextiii@"##1"##2{\footnotemark"##1"\footnotetext"##1"{##2}}%
\def\nextiv@##1{\footnotemark\footnotetext{##1}}%
\futurelet\next\next@}
%
\def\adjustfootnotemark#1{\advance\footmarkcount@#1\relax}
%
\def\footnoterule{\vskip-3.4\p@\hrule width 96\p@ \vskip 3\p@}
%
% dots
%
\let\ldots\plainldots@
\let\cdots\plaincdots@
%
% output routine
%
\let\nopagenumbers\relax
%
\newtoks\lefthe@d \newtoks\righthe@d
\def\setheadline#1#2{%
\lefthe@d={\ninepoint\romannumeral\fmpageno\hfil\hbox{#1}\hfil}%
\righthe@d={\ninepoint\hfil\hbox{#2}\hfil\romannumeral\fmpageno}}
%
\newcount\fmpageno
%
\output={\output@}
\def\output@{\shipout\vbox{%
\hrule height \framethickness depth \z@
\hbox{\vrule width \framethickness
\kern 2cm
\vbox{\kern 2.5cm
\ifnum\fmpageno=0
\setbox\z@=\hbox to\hsize{\hfil}\else
\ifodd\fmpageno
\setbox\z@=\hbox to\hsize{\the\righthe@d}\else
\setbox\z@=\hbox to\hsize{\the\lefthe@d}\fi
\vtop to\z@{\vss\dp\z@=\z@\box\z@}\nointerlineskip\fi
\vskip\headsep
\vbox to\vsize{\boxmaxdepth=\maxdepth \pagecontents}%
\kern 2cm}%
\kern 2cm
\vrule width \framethickness}%
\hrule height \framethickness depth \z@}%
\global\advance\pageno\@ne
\ifnum\fmpageno=0\else
\global\advance\fmpageno\@ne
\fi
\ifnum\outputpenalty>-\@MM\else\dosupereject\fi}
%
% miscellaneous macros
%
\def\noheadline{\hrule height\z@\vskip-\topskip\vskip-\headsep}
\def\topstart{\hrule height\z@\vskip-\topskip}
%
\def\heading{\bgroup\let\\=\cr\tabskip=0pt plus 1fil
\halign to \hsize\bgroup\hfil##\strut\hfil\cr}
\def\endheading{\cr\egroup\egroup}
%
\def\editor#1(#2){\vtop{\hbox{\tenpoint\smc#1\strut}\nointerlineskip
\hbox{\ninepoint(#2)\strut}}}
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\def\issue#1/#2/#3//{\dimen0=\hsize \advance\dimen0 by -2em
\hbox to \hsize{\vbox{\hsize=\dimen0 \parindent=0pt
\hangindent=1.5pc
\hangafter1
#1\unskip\ ---\
\ignorespaces#2\par}%
\hbox to 2em{\hfil\ignorespaces#3\unskip}}%
\smallskip}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
%\def\issue#1/#2/#3//{\dimen0=\hsize \advance\dimen0 by -2em
%\hbox to \hsize{\vbox{\hsize=\dimen0 \parindent=0pt
%\hangindent=1.5pc
%\hangafter1
%#1\unskip\ \
%\ignorespaces#2\par}%
%\hbox to 2em{\hfil\ignorespaces#3\unskip}}%
%\smallskip}
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\def\issueitem#1/#2/#3//{\dimen0=\hsize \advance\dimen0 by -2em
\hbox to \hsize{\vbox{\hsize=\dimen0 \parindent=0pt
\hangindent=3.5pc
\hangafter1
#1\unskip\ \
\ignorespaces#2\par}%
\hbox to 2em{\hfil\ignorespaces#3\unskip}}%
}
%

\newcount\volumecounter
\def\newvol#1/#2/#3//{\advance\volumecounter\@ne
\setbox\z@=\hbox{Volume \hbox to 1em{\hfil\number\volumecounter}\quad}%
\setbox\@ne=\vtop{\advance\hsize-\wd\z@ \parindent\z@\relax
#1\unskip.\par
Edited by \ignorespaces#2\unskip.
\hskip2em plus1fil\penalty\z@\hskip\z@ plus-1fil
\ignorespaces#3\unskip}%
\hbox{\unhbox\z@\box\@ne}\smallskip}%
%
\catcode`\@=\active
%
% initialization
%
\pageno=1
\fmpageno=0
\volumecounter=0
\setheadline{CONTENTS}{CONTENTS}
\framethickness=1pt
\tenpoint
%
\def\styname{aspmfm}\def\styversion{1.1}

%






