%------------------------------------------------------------------
% 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

You are viewing proxied material from ftp.icm.edu.pl. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.