\def\next{SibMatJ}\ifx\styname\next \endinput\fi
\catcode`\@=11
\def\styname{SibMatJ}
\def\styversion{3.07 (March 6, 2026)}

{\W@{\styname.sty - Version \styversion}\W@{}}

\Invalid@\nofrills
\Invalid@\usualspace
\let\enddocument\relax
\newif\ifproofmode \proofmodetrue
\let\pf\proofmodefalse
\let\pr\proofmodetrue
\newif\ifnofrills@
\def\nofrills@#1#2{\relaxnext@
  \DN@{\ifx\next\nofrills
    \nofrills@true\let#2\relax\DN@\nofrills{\nextii@}%
  \else
    \nofrills@false\def#2{#1}\let\next@\nextii@\fi
\next@}}
\def\usualspace@#1{\ifnofrills@\def\usualspace{#1}\fi}
\def\input@#1{\openin3 #1 \ifeof3 \W@{No file #1...}
  \else\closein3 \relax\input #1 \fi}
\def\filename{}
\def\Input#1.{\def\filename{#1}\input #1.}
\newdimen\bigsize@
\def\big@#1#2{{\hbox{$\left#2\vcenter to#1\bigsize@{}%
  \right.\nulldelimiterspace\z@\m@th$}}}
\def\big{\big@\@ne}
\def\Big{\big@{1.5}}
\def\bigg{\big@\tw@}
\def\Bigg{\big@{2.5}}
\def\raggedcenter@{\leftskip.5in plus.4\hsize \rightskip\leftskip
 \parfillskip\z@ \parindent\z@ \spaceskip.3333em \xspaceskip.5em
 \pretolerance9999\tolerance9999 \exhyphenpenalty\@M
 \hyphenpenalty\@M \let\\\linebreak}
\def\raggedright@{\rightskip.5in plus.4\hsize
 \parfillskip\z@ \parindent\z@ \spaceskip.3333em \xspaceskip.5em
 \pretolerance9999\tolerance9999 \exhyphenpenalty\@M
 \hyphenpenalty\@M \let\\\linebreak}
\def\upperspecialchars{\def\ss{SS}\let\i I\let\j J\let\ae\AE\let\oe\OE
  \let\o\O\let\aa\AA\let\l\L}
\def\uppercasetext@#1{%
  {%\spaceskip1.2\fontdimen2\the\font plus1.2\fontdimen3\the\font
   \upperspecialchars\uctext@#1$\m@th\aftergroup\eat@$}}
\def\uctext@#1$#2${\endash@#1-\endash@$#2$\uctext@}
\def\uctext@#1$#2${\uppercase{#1}$#2$\uctext@}
\def\endash@#1-#2\endash@{\uppercase{#1}\if\notempty{#2}--\endash@#2\endash@\fi}
\def\runaway@#1{\DN@{#1}\ifx\envir@\next@
  \Err@{You seem to have a missing or misspelled \string\end#1 ...}%
  \let\envir@\empty\fi}
\newif\iftemp@
\def\notempty#1{TT\fi\def\test@{#1}\ifx\test@\empty\temp@false
  \else\temp@true\fi \iftemp@}

\TagsOnRight
\loadeufm
\loadbold
\UseAMSsymbols

\ifx\fontprefix\undefined \def\fontprefix{cm} \fi
\ifx\miprefix\undefined   \def\miprefix{cm}   \fi
\def\fontprefixlh{lh}
\def\fontprefixla{la}
\def\miprefixex{ex}

\ifx\fontprefix\fontprefixla\else
\font@\xiirm=\fontprefix r12 % roman text
\font@\Htenrm=\fontprefix r10 scaled \magstephalf
\font@\tenrm=\fontprefix r10
\font@\ninerm=\fontprefix r9
\font@\eightrm=\fontprefix r8 % preloaded in plain.tex
\font@\sevenrm=\fontprefix r7
\font@\sixrm=\fontprefix r6 % preloaded in plain.tex
\font@\fiverm=\fontprefix r5

\font@\Ixiii=cmmi12 scaled \magstep 1 \skewchar\Ixiii='177 % math italic
\font@\xiii=cmmi12                    \skewchar\xiii='177 % math italic
\font@\IIteni=cmmi10 scaled \magstep 2 \skewchar\teni='177
\font@\Iteni=cmmi10 scaled \magstep 1 \skewchar\teni='177
\font@\Hteni=cmmi10 scaled \magstephalf \skewchar\teni='177
\font@\teni=cmmi10                    \skewchar\teni='177
\font@\Ininei=cmmi9 scaled \magstep 1 \skewchar\Ininei='177
\font@\ninei=cmmi9                    \skewchar\ninei='177
\font@\eighti=cmmi8                   \skewchar\eighti='177
\font@\Iseveni=cmmi7 scaled \magstep 1 \skewchar\Iseveni='177
\font@\seveni=cmmi7                   \skewchar\seveni='177
\font@\sixi=cmmi6                     \skewchar\sixi='177
\font@\fivei=cmmi5                    \skewchar\fivei='177

\font@\IItensy=cmsy10 scaled \magstep2 % math symbols
\font@\Itensy=cmsy10 scaled \magstep1
\font@\tensy=cmsy10
\font@\Htensy=cmsy10 scaled\magstephalf
\font@\Ininesy=cmsy9 scaled \magstep1
\font@\ninesy=cmsy9
\font@\eightsy=cmsy8              \skewchar\eightsy='60 % preloaded
\font@\Isevensy=cmsy7 scaled \magstep1
\font@\sevensy=cmsy7
\font@\sixsy=cmsy6                \skewchar\sixsy='60   % preloaded
\font@\fivesy=cmsy5

\font@\IItenex=cmex10 scaled \magstep2 % math extension
\font@\Itenex=cmex10 scaled \magstep1
\font@\Htenex=cmex10 scaled \magstephalf
\font@\tenex=cmex10
\font@\nineex=cmex9
\font@\eightex=cmex8
\font@\sevenex=cmex7
                       % sans serif
\font@\IVxviiss=cmss17 scaled \magstep4                   % huge
\font@\xiisf=\fontprefix ss12
\font@\IItensf=\fontprefix ss10 scaled \magstep2          % med
\font@\tensf=\fontprefix ss10
\font@\eightsf=\fontprefix ss8

\font\IVtenssdc=cmssdc10 scaled \magstep4                 % big

\font@\Ixiibf=\fontprefix bx12 scaled \magstep1 % boldface extended
\font@\xiibf=\fontprefix bx12
\font@\Htenbf=\fontprefix bx10 scaled \magstephalf
\font@\tenbf=\fontprefix bx10
\font@\Ininebf=\fontprefix bx9 scaled \magstep1
\font@\ninebf=\fontprefix bx9
\font@\eightbf=\fontprefix bx8
\font@\Isevenbf=\fontprefix bx7 scaled \magstep1
\font@\sevenbf=\fontprefix bx7
\font@\sixbf=\fontprefix bx6
\font@\fivebf=\fontprefix bx5

\font@\xiisl=\fontprefix sl12 % slanted roman
\font@\Htensl=\fontprefix sl10 scaled \magstephalf
\font@\tensl=\fontprefix sl10
\font@\ninesl=\fontprefix sl9
\font@\eightsl=\fontprefix sl8 % preloaded in plain.tex

\font@\xiiit=\fontprefix ti12 % text italic
\font@\Htenit=\fontprefix ti10 scaled \magstephalf
\font@\tenit=\fontprefix ti10
\font@\nineit=\fontprefix ti9
\font@\eightit=\fontprefix ti8 % preloaded in plain.tex
\font@\sevenit=\fontprefix ti7

\font@\Ixiibfit=\fontprefix bxti12 scaled \magstep1 % bold text italic
\font@\xiibfit=\fontprefix bxti12 % bold text italic
\font@\Htenbfit=\fontprefix bxti10 scaled \magstephalf
\font@\tenbfit=\fontprefix bxti10

\font@\xiitt=\fontprefix tt12
\font@\Htentt=\fontprefix tt10 scaled \magstephalf
\font@\tentt=\fontprefix tt10 % preloaded in plain.tex
\font@\ninett=\fontprefix tt9 % preloaded in plain.tex
\font@\eighttt=\fontprefix tt8 % preloaded in plain.tex

\font@\Itensmc=\fontprefix csc10 scaled \magstep1
\font@\Htensmc=\fontprefix csc10 scaled \magstephalf
\font@\tensmc=\fontprefix csc10
\font@\ninesmc=\fontprefix csc9
\font@\eightsmc=\fontprefix csc8

\chardef\No="FC
\fi % \ifx\fontprefix\fontprefixlh

\ifx\fontprefix\fontprefixla
\font@\xiirm=\fontprefix rm1200 % roman text
\font@\Htenrm=\fontprefix rm1000 scaled \magstephalf
\font@\tenrm=\fontprefix rm1000
\font@\ninerm=\fontprefix rm0900
\font@\eightrm=\fontprefix rm0800 % preloaded in plain.tex
\font@\sevenrm=\fontprefix rm0700
\font@\sixrm=\fontprefix rm0600 % preloaded in plain.tex
\font@\fiverm=\fontprefix rm0500
\font\smc=lacc1000

\font@\Ixiii=\miprefix mi12 scaled \magstep 1 \skewchar\Ixiii='177 % math italic
\font@\xiii=\miprefix mi12                    \skewchar\xiii='177 % math italic
\font@\IIteni=\miprefix mi10 scaled \magstep 2 \skewchar\teni='177
\font@\Iteni=\miprefix mi10 scaled \magstep 1 \skewchar\teni='177
\font@\Hteni=\miprefix mi10 scaled \magstephalf \skewchar\teni='177
\font@\teni=\miprefix mi10                    \skewchar\teni='177
\font@\Ininei=\miprefix mi9 scaled \magstep 1 \skewchar\Ininei='177
\font@\ninei=\miprefix mi9                    \skewchar\ninei='177
\font@\eighti=\miprefix mi8                   \skewchar\eighti='177
\font@\Iseveni=\miprefix mi7 scaled \magstep 1 \skewchar\Iseveni='177
\font@\seveni=\miprefix mi7                   \skewchar\seveni='177
\font@\sixi=\miprefix mi6                     \skewchar\sixi='177
\font@\fivei=\miprefix mi5                    \skewchar\fivei='177

\font@\IItensy=cmsy10 scaled \magstep2 % math symbols
\font@\Itensy=cmsy10 scaled \magstep1
\font@\tensy=cmsy10
\font@\Htensy=cmsy10 scaled\magstephalf
\font@\Ininesy=cmsy9 scaled \magstep1
\font@\ninesy=cmsy9
\font@\eightsy=cmsy8              \skewchar\eightsy='60 % preloaded
\font@\Isevensy=cmsy7 scaled \magstep1
\font@\sevensy=cmsy7
\font@\sixsy=cmsy6                \skewchar\sixsy='60   % preloaded
\font@\fivesy=cmsy5

\font@\IItenex=cmex10 scaled \magstep2 % math extension
\font@\Itenex=cmex10 scaled \magstep1
\font@\Htenex=cmex10 scaled \magstephalf
\font@\tenex=cmex10
\font@\nineex=cmex9
\font@\eightex=cmex8
\font@\sevenex=cmex7
                       % sans serif
\font@\IVxviiss=\fontprefix ss1700 scaled \magstep4                   % huge
\font@\xiisf=\fontprefix ss1200
\font@\IItensf=\fontprefix ss1000 scaled \magstep2          % med
\font@\tensf=\fontprefix ss1000
\font@\eightsf=\fontprefix ss0800

\font\IVtenssdc=cmssdc10 scaled \magstep4                 % big

\font@\Ixiibf=\fontprefix bx1200 scaled \magstep1 % boldface extended
\font@\xiibf=\fontprefix bx1200
\font@\Htenbf=\fontprefix bx1000 scaled \magstephalf
\font@\tenbf=\fontprefix bx1000
\font@\Ininebf=\fontprefix bx0900 scaled \magstep1
\font@\ninebf=\fontprefix bx0900
\font@\eightbf=\fontprefix bx0800
\font@\Isevenbf=\fontprefix bx0700 scaled \magstep1
\font@\sevenbf=\fontprefix bx0700
\font@\sixbf=\fontprefix bx0600
\font@\fivebf=\fontprefix bx0500

\font@\xiisl=\fontprefix sl1200 % slanted roman
\font@\Htensl=\fontprefix sl1000 scaled \magstephalf
\font@\tensl=\fontprefix sl1000
\font@\ninesl=\fontprefix sl0900
\font@\eightsl=\fontprefix sl0800 % preloaded in plain.tex

\font@\xiiit=\fontprefix ti1200 % text italic
\font@\Htenit=\fontprefix ti1000 scaled \magstephalf
\font@\tenit=\fontprefix ti1000
\font@\nineit=\fontprefix ti0900
\font@\eightit=\fontprefix ti0800 % preloaded in plain.tex
\font@\sevenit=\fontprefix ti0700

\font@\Ixiibfit=\fontprefix bi1200 scaled \magstep1 % bold text italic
\font@\xiibfit=\fontprefix bi1200 % bold text italic
\font@\Htenbfit=\fontprefix bi1000 scaled \magstephalf
\font@\tenbfit=\fontprefix bi1000

\font@\tentt=\fontprefix tt1000 % preloaded in plain.tex
\font@\ninett=\fontprefix tt0900 % preloaded in plain.tex
\font@\eighttt=\fontprefix tt0800 % preloaded in plain.tex

\font@\Itensmc=\fontprefix cc1000 scaled \magstep1
\font@\Htensmc=\fontprefix cc1000 scaled \magstephalf
\font@\tensmc=\fontprefix cc1000
\font@\ninesmc=\fontprefix cc0900
\font@\eightsmc=\fontprefix cc0800

\chardef\No="9D
\fi % \ifx\fontprefix\fontprefixla

\ifx\miprefix\miprefixex
% the following redefines the Greek letters, taking them in the \exmifam,
% because they are absent in cmmib which is now the first family
\def\boldgreek{%
  \mathchardef\Gamma=  "0\exmifam@ A8
  \mathchardef\Delta=  "0\exmifam@ A9
  \mathchardef\Theta=  "0\exmifam@ AA
  \mathchardef\Lambda= "0\exmifam@ AB
  \mathchardef\Xi=     "0\exmifam@ AC
  \mathchardef\Pi=     "0\exmifam@ AD
  \mathchardef\Sigma=  "0\exmifam@ AE
  \mathchardef\Upsilon="0\exmifam@ AF
  \mathchardef\Phi=    "0\exmifam@ B0
  \mathchardef\Psi=    "0\exmifam@ B1
  \mathchardef\Omega=  "0\exmifam@ B2
}
\def\boldmath{\textfont0=\Htenbf\scriptfont0=\eightbf\scriptscriptfont0=\sixbf
  \textfont1=\Htencmmib \scriptfont1=\Isevencmmib \scriptscriptfont1=\fivecmmib
  \textfont2=\Htencmbsy \scriptfont2=\Isevencmbsy \scriptscriptfont2=\fivecmbsy
  %\textfont3=\tencmbex \scriptfont3=\sevencmbex \scriptscriptfont3=\fivecmbex
  \boldgreek}
\let\@boldsymbol=\boldsymbol
\def\boldsymbol#1{%
  \ifx#1\Gamma\mathchar"0\exmifam@ A8 \else
  \ifx#1\Delta\mathchar"0\exmifam@ A9 \else
  \ifx#1\Theta\mathchar"0\exmifam@ AA \else
  \ifx#1\Lambda\mathchar"0\exmifam@ AB \else
  \ifx#1\Xi\mathchar"0\exmifam@ AC \else
  \ifx#1\Pi\mathchar"0\exmifam@ AD \else
  \ifx#1\Sigma\mathchar"0\exmifam@ AE \else
  \ifx#1\Upsilon\mathchar"0\exmifam@ AF  \else
  \ifx#1\Phi\mathchar"0\exmifam@ B0 \else
  \ifx#1\Psi\mathchar"0\exmifam@ B1  \else
  \ifx#1\Omega\mathchar"0\exmifam@ B2\else
  \@boldsymbol #1\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}
\else
\let\boldgreek\relax
\def\boldmath{\textfont0=\Htenbf\scriptfont0=\eightbf\scriptscriptfont0=\sixbf
  \textfont1=\Htencmmib \scriptfont1=\Isevencmmib \scriptscriptfont1=\fivecmmib
  \textfont2=\Htencmbsy \scriptfont2=\Isevencmbsy \scriptscriptfont2=\fivecmbsy}
\fi

%%% common fonts
\font\IItencmmib=cmmib10 scaled \magstep2 % bold math italic
\font\Itencmmib=cmmib10  scaled \magstep1
\font\Htencmmib=cmmib10  scaled \magstephalf
\font\tencmmib=cmmib10
\font\Ininecmmib=cmmib9  scaled \magstep1
\font\ninecmmib=cmmib9
\font\Isevencmmib=cmmib7  scaled \magstep1
\font\sevencmmib=cmmib7
\font\fivecmmib=cmmib5

\font\IItencmbsy=cmbsy10 scaled \magstep2 % bold math symbols
\font\Itencmbsy=cmbsy10 scaled \magstep1
\font\Htencmbsy=cmbsy10 scaled \magstephalf
\font\tencmbsy=cmbsy10
\font\Ininecmbsy=cmbsy9 scaled \magstep1
\font\ninecmbsy=cmbsy9
\font\Isevencmbsy=cmbsy7 scaled \magstep1
\font\sevencmbsy=cmbsy7
\font\fivecmbsy=cmbsy5

\font@\IItenmsa=msam10 scaled \magstep2
\font@\Itenmsa=msam10 scaled \magstep1
\font@\Htenmsa=msam10 scaled \magstephalf
\font@\tenmsa=msam10
\font@\Ininemsa=msam9 scaled \magstep1
\font@\ninemsa=msam9
\font@\eightmsa=msam8
\font@\Isevenmsa=msam7 scaled \magstep1
\font@\sevenmsa=msam7
\font@\sixmsa=msam6
\font@\fivemsa=msam5

\font@\IItenmsb=msbm10 scaled \magstep2
\font@\Itenmsb=msbm10 scaled \magstep1
\font@\Htenmsb=msbm10 scaled \magstephalf
\font@\tenmsb=msbm10
\font@\Ininemsb=msbm9 scaled \magstep1
\font@\ninemsb=msbm9
\font@\eightmsb=msbm8
\font@\Isevenmsb=msbm7 scaled \magstep1
\font@\sevenmsb=msbm7
\font@\sixmsb=msbm6
\font@\fivemsb=msbm5

\font@\IIteneufm=eufm10 scaled \magstep2
\font@\Iteneufm=eufm10 scaled \magstep1
\font@\Hteneufm=eufm10 scaled \magstephalf
\font@\teneufm=eufm10
\font@\Inineeufm=eufm9 scaled \magstep1
\font@\nineeufm=eufm9
\font@\eighteufm=eufm8
\font@\Iseveneufm=eufm7 scaled \magstep1
\font@\seveneufm=eufm7
\font@\sixeufm=eufm6
\font@\fiveeufm=eufm5

\font@\IItenbbold=bbold10 scaled \magstep2
\font@\Itenbbold=bbold10 scaled \magstep1
\font@\Htenbbold=bbold10 scaled \magstephalf
\font@\tenbbold=bbold10
\font@\Ininebbold=bbold9 scaled \magstep1
\font@\ninebbold=bbold9
\font@\eightbbold=bbold8
\font@\Isevenbbold=bbold7 scaled \magstep1
\font@\sevenbbold=bbold7
\font@\sixbbold=bbold6
\font@\fivebbold=bbold5

\newfam\bboldfam
% \def\Bbb{\RIfM@\expandafter\Bbb@\else\expandafter\nonmatherr@\expandafter\Bbb\fi}
% \def\Bbb@#1{{\Bbb@@{#1}}}
% \def\Bbb@@#1{\noaccents@\fam\msbfam\relax#1}
\def\Bbb@@#1{\noaccents@\fam\bboldfam\relax#1}

\newfam\exmifam % for bold Greek letters in \boldmath; 31.07.03
\edef\exmifam@{\hexnumber@\exmifam}

% the cs defined below is not used!!!
%\def\Ixiipointbf{\normalbaselineskip19\p@
% \textonlyfont@\rm\Ixiibf \textonlyfont@\it\Ixiibfit
% \textonlyfont@\sl\Ixiisl \textonlyfont@\bf\Ixiibf
% \textonlyfont@\smc\IItensmc \textonlyfont@\sf\Ixiisf \let\sc\smc
% \ifsyntax@ \def\big##1{{\hbox{$\left##1\right.$}}}%
%  \let\Big\big \let\bigg\big \let\Bigg\big
% \else
%  \textfont\z@=\Ixiibf  \scriptfont\z@=\Ininebf \scriptscriptfont\z@=\Isevenbf
%  \textfont\@ne=\IItencmmib  \scriptfont\@ne=\Ininecmmib  \scriptscriptfont\@ne=\Isevencmmib
%  \textfont\tw@=\IItencmbsy \scriptfont\tw@=\Ininecmbsy \scriptscriptfont\tw@=\Isevencmbsy
%  \textfont\thr@@=\Itenex \scriptfont\thr@@=\Itenex \scriptscriptfont\thr@@=\tenex
%  \textfont\itfam=\Ixiibfit \scriptfont\itfam=\xiibfit \scriptscriptfont\itfam=\tenbfit
%  \textfont\bffam=\Ixiibf \scriptfont\bffam=\Ininebf \scriptscriptfont\bffam=\Isevenbf
%  \textfont\msafam=\IItenmsa \scriptfont\msafam=\Ininemsa \scriptscriptfont\msafam=\Isevenmsa
%  \textfont\msbfam=\IItenmsb \scriptfont\msbfam=\Ininemsb \scriptscriptfont\msbfam=\Isevenmsb
%  \textfont\eufmfam=\IIteneufm \scriptfont\eufmfam=\Inineeufm \scriptscriptfont\eufmfam=\Iseveneufm
%  \textfont\exmifam=\IIteni \scriptfont\exmifam=\Ininei \scriptscriptfont\exmifam=\Iseveni
%  \setbox\strutbox\hbox{\vrule height14\p@ depth5\p@ width\z@}%
%  \setbox\strutbox@\hbox{\lower.5\normallineskiplimit\vbox{%
%        \kern-\normallineskiplimit\copy\strutbox}}%
% \setbox\z@\vbox{\hbox{$($}\kern\z@}\bigsize@=1.2\ht\z@
% \fi
% \normalbaselines\rm\ex@.2326ex\jot3\ex@}

\def\xiipointbf{\normalbaselineskip15\p@
 \bigskipamount=15\p@ plus 1\p@ minus 1\p@
 \medskipamount=7.5\p@ plus 1\p@ minus 1\p@
 \smallskipamount=3.7\p@ plus 0.6\p@ minus 0.6\p@
 \abovedisplayskip12\p@ plus3\p@ minus9\p@
 \belowdisplayskip\abovedisplayskip
 \abovedisplayshortskip\z@ plus3\p@
 \belowdisplayshortskip7\p@ plus3\p@ minus4\p@
 \textonlyfont@\rm\xiibf \textonlyfont@\it\xiibfit
 \textonlyfont@\sl\xiisl \textonlyfont@\bf\xiibf
 \textonlyfont@\tt\xiitt
 \textonlyfont@\smc\Itensmc \textonlyfont@\sf\xiisf \let\sc\smc
 \ifsyntax@ \def\big##1{{\hbox{$\left##1\right.$}}}%
  \let\Big\big \let\bigg\big \let\Bigg\big
 \else
  \boldgreek
  \textfont\z@=\xiibf  \scriptfont\z@=\ninebf \scriptscriptfont\z@=\sevenbf
  \textfont\@ne=\Itencmmib  \scriptfont\@ne=\ninecmmib  \scriptscriptfont\@ne=\sevencmmib
  \textfont\tw@=\Itencmbsy \scriptfont\tw@=\ninecmbsy \scriptscriptfont\tw@=\sevencmbsy
  \textfont\thr@@=\Itenex \scriptfont\thr@@=\tenex \scriptscriptfont\thr@@=\eightex
  \textfont\itfam=\xiibfit \scriptfont\itfam=\tenbfit \scriptscriptfont\itfam=\tenbfit
  \textfont\bffam=\xiibf \scriptfont\bffam=\ninebf \scriptscriptfont\bffam=\sevenbf
  \textfont\msafam=\Itenmsa \scriptfont\msafam=\ninemsa \scriptscriptfont\msafam=\sevenmsa
  \textfont\msbfam=\Itenmsb \scriptfont\msbfam=\ninemsb \scriptscriptfont\msbfam=\sevenmsb
  \textfont\bboldfam=\Itenbbold \scriptfont\bboldfam=\ninebbold \scriptscriptfont\bboldfam=\sevenbbold
  \textfont\eufmfam=\Iteneufm \scriptfont\eufmfam=\nineeufm \scriptscriptfont\eufmfam=\seveneufm
  \textfont\exmifam=\Iteni \scriptfont\exmifam=\ninei \scriptscriptfont\exmifam=\seveni
  \setbox\strutbox\hbox{\vrule height9.5\p@ depth4.5\p@ width\z@}%
  \setbox\strutbox@\hbox{\lower.5\normallineskiplimit\vbox{%
        \kern-\normallineskiplimit\copy\strutbox}}%
 \setbox\z@\vbox{\hbox{$($}\kern\z@}\bigsize@=1.2\ht\z@
 \fi
 \normalbaselines\rm\ex@.2326ex\jot3\ex@}

\def\xiipoint{\normalbaselineskip13.2\p@
 \bigskipamount=13.2\p@ plus 1\p@ minus 1\p@
 \medskipamount=6.6\p@ plus 1\p@ minus 1\p@
 \smallskipamount=3.3\p@ plus 0.6\p@ minus 0.6\p@
 \abovedisplayskip12\p@ plus3\p@ minus9\p@
 \belowdisplayskip\abovedisplayskip
 \abovedisplayshortskip\z@ plus3\p@
 \belowdisplayshortskip7\p@ plus3\p@ minus4\p@
 \textonlyfont@\rm\xiirm \textonlyfont@\it\xiiit
 \textonlyfont@\sl\xiisl \textonlyfont@\bf\xiibf
 \textonlyfont@\tt\xiitt
 \textonlyfont@\smc\Itensmc \textonlyfont@\sf\xiisf \let\sc\smc
 \ifsyntax@ \def\big##1{{\hbox{$\left##1\right.$}}}%
  \let\Big\big \let\bigg\big \let\Bigg\big
 \else
  \textfont\z@=\xiirm  \scriptfont\z@=\ninerm \scriptscriptfont\z@=\sevenrm
  \textfont\@ne=\xiii  \scriptfont\@ne=\ninei  \scriptscriptfont\@ne=\seveni
  \textfont\tw@=\Itensy \scriptfont\tw@=\ninesy \scriptscriptfont\tw@=\sevensy
  \textfont\thr@@=\Itenex \scriptfont\thr@@=\tenex \scriptscriptfont\thr@@=\eightex
  \textfont\itfam=\xiiit \scriptfont\itfam=\tenit \scriptscriptfont\itfam=\tenit
  \textfont\bffam=\xiibf \scriptfont\bffam=\ninebf \scriptscriptfont\bffam=\sevenbf
  \textfont\msafam=\Itenmsa \scriptfont\msafam=\ninemsa \scriptscriptfont\msafam=\sevenmsa
  \textfont\msbfam=\Itenmsb \scriptfont\msbfam=\ninemsb \scriptscriptfont\msbfam=\sevenmsb
  \textfont\bboldfam=\Itenbbold \scriptfont\bboldfam=\ninebbold \scriptscriptfont\bboldfam=\sevenbbold
  \textfont\eufmfam=\Iteneufm \scriptfont\eufmfam=\nineeufm \scriptscriptfont\eufmfam=\seveneufm
  \textfont\exmifam=\Iteni \scriptfont\exmifam=\ninei \scriptscriptfont\exmifam=\seveni
  \setbox\strutbox\hbox{\vrule height9.5\p@ depth4.5\p@ width\z@}%
  \setbox\strutbox@\hbox{\lower.5\normallineskiplimit\vbox{%
        \kern-\normallineskiplimit\copy\strutbox}}%
 \setbox\z@\vbox{\hbox{$($}\kern\z@}\bigsize@=1.2\ht\z@
 \fi
 \normalbaselines\rm\ex@.2326ex\jot3\ex@}
\let\large\xiipoint

\def\xipoint{\normalbaselineskip13\p@
 \bigskipamount=13\p@ plus 1\p@ minus 1\p@
 \medskipamount=6.5\p@ plus 1\p@ minus 1\p@
 \smallskipamount=3.3\p@ plus 0.6\p@ minus 0.6\p@
 \abovedisplayskip10\p@ plus3\p@ minus9\p@
 \belowdisplayskip\abovedisplayskip
 \abovedisplayshortskip\z@ plus3\p@
 \belowdisplayshortskip7\p@ plus3\p@ minus4\p@
 \textonlyfont@\rm\Htenrm \textonlyfont@\it\Htenit
 \textonlyfont@\sl\Htensl \textonlyfont@\bf\Htenbf
 \textonlyfont@\tt\Htentt
 \textonlyfont@\smc\Htensmc \textonlyfont@\sf\Htensf \let\sc\smc
 \ifsyntax@ \def\big##1{{\hbox{$\left##1\right.$}}}%
  \let\Big\big \let\bigg\big \let\Bigg\big
 \else
  \textfont\z@=\Htenrm  \scriptfont\z@=\eightrm \scriptscriptfont\z@=\sixrm
  \textfont\@ne=\Hteni  \scriptfont\@ne=\eighti  \scriptscriptfont\@ne=\sixi
  \textfont\tw@=\Htensy \scriptfont\tw@=\eightsy \scriptscriptfont\tw@=\sixsy
  \textfont\thr@@=\Htenex \scriptfont\thr@@=\tenex \scriptscriptfont\thr@@=\eightex
  \textfont\itfam=\Htenit \scriptfont\itfam=\tenit \scriptscriptfont\itfam=\tenit
  \textfont\bffam=\Htenbf \scriptfont\bffam=\eightbf \scriptscriptfont\bffam=\sixbf
  \textfont\msafam=\Htenmsa \scriptfont\msafam=\eightmsa \scriptscriptfont\msafam=\sixmsa
  \textfont\msbfam=\Htenmsb \scriptfont\msbfam=\eightmsb \scriptscriptfont\msbfam=\sixmsb
  \textfont\bboldfam=\Htenbbold \scriptfont\bboldfam=\eightbbold \scriptscriptfont\bboldfam=\sixbbold
  \textfont\eufmfam=\Hteneufm \scriptfont\eufmfam=\eighteufm \scriptscriptfont\eufmfam=\sixeufm
  \textfont\exmifam=\Hteni \scriptfont\exmifam=\seveni \scriptscriptfont\exmifam=\sixi
  \setbox\strutbox\hbox{\vrule height9\p@ depth4\p@ width\z@}%
  \setbox\strutbox@\hbox{\lower.5\normallineskiplimit\vbox{%
        \kern-\normallineskiplimit\copy\strutbox}}%
 \setbox\z@\vbox{\hbox{$($}\kern\z@}\bigsize@=1.2\ht\z@
 \fi
 \normalbaselines\rm\ex@.2326ex\jot3\ex@}
\let\normalsize\xipoint

\def\tenpoint{\normalbaselineskip12\p@
 \abovedisplayskip8\p@ plus3\p@ minus6\p@
 \belowdisplayskip\abovedisplayskip
 \abovedisplayshortskip\z@ plus3\p@
 \belowdisplayshortskip5\p@ plus3\p@ minus4\p@
 \textonlyfont@\rm\tenrm \textonlyfont@\it\tenit
 \textonlyfont@\sl\tensl \textonlyfont@\bf\tenbf
 \textonlyfont@\smc\tensmc \textonlyfont@\tt\tentt \let\sc\smc
 \ifsyntax@ \def\big##1{{\hbox{$\left##1\right.$}}}%
  \let\Big\big \let\bigg\big \let\Bigg\big
 \else
  \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@@=\sevenex \scriptscriptfont\thr@@=\sevenex
  \textfont\itfam=\tenit \scriptfont\itfam=\sevenit \scriptscriptfont\itfam=\sevenit
  \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\bboldfam=\tenbbold \scriptfont\bboldfam=\sevenbbold \scriptscriptfont\bboldfam=\fivebbold
  \textfont\eufmfam=\teneufm \scriptfont\eufmfam=\seveneufm \scriptscriptfont\eufmfam=\fiveeufm
  \textfont\exmifam=\teni \scriptfont\exmifam=\seveni \scriptscriptfont\exmifam=\fivei
  \setbox\strutbox\hbox{\vrule height8.5\p@ depth3.5\p@ width\z@}%
  \setbox\strutbox@\hbox{\lower.5\normallineskiplimit\vbox{%
        \kern-\normallineskiplimit\copy\strutbox}}%
 \setbox\z@\vbox{\hbox{$($}\kern\z@}\bigsize@=1.2\ht\z@
 \fi
 \normalbaselines\rm\ex@.2326ex\jot3\ex@}
\let\small\tenpoint

\def\ninepoint{\normalbaselineskip10.5\p@
 \abovedisplayskip8\p@ plus3\p@ minus6\p@
 \belowdisplayskip\abovedisplayskip
 \abovedisplayshortskip\z@ plus3\p@
 \belowdisplayshortskip5\p@ plus3\p@ minus4\p@
 \textonlyfont@\rm\ninerm \textonlyfont@\it\nineit
 \textonlyfont@\sl\ninesl \textonlyfont@\bf\ninebf
 \textonlyfont@\smc\ninesmc \textonlyfont@\tt\ninett \let\sc\smc
 \ifsyntax@ \def\big##1{{\hbox{$\left##1\right.$}}}%
  \let\Big\big \let\bigg\big \let\Bigg\big
 \else
  \textfont\z@=\ninerm  \scriptfont\z@=\sevenrm  \scriptscriptfont\z@=\fiverm
  \textfont\@ne=\ninei  \scriptfont\@ne=\seveni  \scriptscriptfont\@ne=\fivei
  \textfont\tw@=\ninesy \scriptfont\tw@=\sevensy \scriptscriptfont\tw@=\fivesy
  \textfont\thr@@=\nineex \scriptfont\thr@@=\sevenex \scriptscriptfont\thr@@=\sevenex
  \textfont\itfam=\nineit \scriptfont\itfam=\sevenit \scriptscriptfont\itfam=\sevenit
  \textfont\bffam=\ninebf \scriptfont\bffam=\sevenbf \scriptscriptfont\bffam=\fivebf
  \textfont\msafam=\ninemsa \scriptfont\msafam=\sevenmsa \scriptscriptfont\msafam=\fivemsa
  \textfont\msbfam=\ninemsb \scriptfont\msbfam=\sevenmsb \scriptscriptfont\msbfam=\fivemsb
  \textfont\bboldfam=\ninebbold \scriptfont\bboldfam=\sevenbbold \scriptscriptfont\bboldfam=\fivebbold
  \textfont\eufmfam=\nineeufm \scriptfont\eufmfam=\seveneufm \scriptscriptfont\eufmfam=\fiveeufm
  \textfont\exmifam=\ninei \scriptfont\exmifam=\seveni \scriptscriptfont\exmifam=\fivei
  \setbox\strutbox\hbox{\vrule height8.5\p@ depth3.5\p@ width\z@}%
  \setbox\strutbox@\hbox{\lower.5\normallineskiplimit\vbox{%
        \kern-\normallineskiplimit\copy\strutbox}}%
 \setbox\z@\vbox{\hbox{$($}\kern\z@}\bigsize@=1.2\ht\z@
 \fi
 \normalbaselines\rm\ex@.2326ex\jot3\ex@}
\let\smaller\ninepoint

%%%

\normallineskiplimit\p@
\newdimen\indenti \indenti=\parindent
\def\pageheight#1{\vsize#1}
\def\pagewidth#1{\hsize#1%
   \captionwidth@\hsize \advance\captionwidth@-2\indenti}
\pagewidth{175mm} \pageheight{230mm}
\def\sheetsize#1{\csname @#1\endcsname}
\expandafter\def\csname @A4\endcsname{\hoffset=20mm \voffset=20mm
  \hoffset=210mm \voffset=297mm
  \advance\hoffset by -\hsize \advance\voffset by -\vsize
  \divide\hoffset by 2 \divide\voffset by 2
  \advance\hoffset by -1in \advance\voffset by -1in}
\expandafter\def\csname @letter\endcsname{
  \hoffset=8.5in \voffset=11in
  \advance\hoffset by -\hsize \advance\voffset by -\vsize
  \divide\hoffset by 2 \divide\voffset by 2
  \advance\hoffset by -1in \advance\voffset by -1in}
\sheetsize{letter}

%%%

\newcount\ToAuthorCount@ \ToAuthorCount@\z@
\newtoks\ToAuthorToks@ \newif\ifToAuthorExists@
\def\RightMarginMark@#1{\vadjust{\vbox to 0pt{\vss\hbox{\kern\hsize\kern1em\Ixiibf #1}}}}
\def\v@djust#1#2{\vadjust{\vbox to 0pt{\vss\noindent\smash{\raise#1em\hbox{\llap{\Ixiibf #2\kern16pt}}}}}}
\def\LeftMarginMark@#1#2{%
   \ifhmode
     \ifdim\lastskip>0pt%
       \dimen@=\lastskip
       \unskip
       \v@djust{#1}{#2}%
       \hskip\dimen@
     \else
       \v@djust{#1}{#2}%
     \fi
   \else
     \v@djust{#1}{#2}%
   \fi
   \ignorespaces
}
\def\?{%
  \ifproofmode
    ?\RightMarginMark@{?!}%
  \fi
}
\def\ToAuthor@#1#2{%
  \ifproofmode
    \ifToAuthorExists@\else
      \ifnum\author@count>\@ne
        \global\ToAuthorToks@{\newpage\centerline{\large\bf Notes for the Authors}\bigskip}%
      \else
        \global\ToAuthorToks@{\newpage\centerline{\large\bf Notes for the Author}\bigskip}%
      \fi
      \global\ToAuthorExists@true
    \fi
    \global\advance\ToAuthorCount@ by \@ne
    \expandafter\global\expandafter\ToAuthorToks@\expandafter{\the\ToAuthorToks@\ToAuthorNote@{#2}}%
    \LeftMarginMark@{#1}{\the\ToAuthorCount@}%
  \fi
}
\def\ToAuthorNote@#1{\advance\ToAuthorCount@ by 1\par\smallskip\noindent\llap{\bf\the\ToAuthorCount@.\hskip1ex}#1}
\def\ToAuthor#1{\ToAuthor@0{#1}}
\def\ToAuthorUp#1#2{\ToAuthor@{#1}{#2}}
\def\ToAuthorDown#1#2{\ToAuthor@{-#1}{#2}}

%%%
\newcount\firstpage@

\let\funding@flag\relax
\def\insertFundingText{%
  \ifx\funding@flag\relax
    \beforeFunding@
    \let\funding@flag\@ne
    {\bigskip\ninepoint\noindent
      {\bf FUNDING}\nopagebreak\vskip.5ex\noindent
      \ifx\thethanks@\empty
        This work was supported by ongoing institutional funding.
        No additional grants to carry out or direct this particular research were obtained.%
      \else
        \thethanks@
      \fi
      \par
    }%
    \afterFunding@
  \fi
}

\let\conflicts@flag\relax
\def\insertConflictsText{%
  \ifx\conflicts@flag\relax
    \beforeConflicts@
    \let\conflicts@flag\@ne
    {\bigskip\ninepoint\parskip.5ex\parindent\z@
      {\bf CONFLICT OF INTEREST}\nopagebreak\par\nopagebreak\par
      \ifx\theconflicts@\empty
        \ifnum\author@count>\@ne
          The authors of this work declare that they have no conflicts of interest.%
        \else
          \def\current@object{author[1]}\@get.Gender->\gender@
          \ifx\gender@\relax
            As author of this work, I declare that I have no conflicts of interest.%
          \else
            The author of this work declares that {\gender@} has no conflicts of interest.%
          \fi
        \fi
      \else
        \theconflicts@
      \fi
      \par
    }%
    \afterConflicts@
  \fi
}

\let\openAccess@flag\relax
\def\OpenAccess{\let\openAccess@flag1}
\def\insertOpenAccessText{%
  \ifx\openAccess@flag\@ne
    \beforeOpenAccess@
    \let\openAccess@flag\tw@
    {\bigskip\ninepoint\noindent
      {\bf OPEN ACCESS}\nopagebreak\vskip.5ex\noindent
      This article is licensed under a~Creative Commons Attribution 4.0 International License,
      which permits use, sharing, adaptation, distribution and reproduction in any medium or format,
      as long as you give appropriate credit to the~original author(s) and the~source,
      provide a~link to the~Creative Commons license, and indicate if changes were made.
      The images or other third party material in this article are included in the~article's
      Creative Commons license, unless indicated otherwise in a~credit line to the~material.
      If material is not included in the~article's Creative Commons license
      and your intended use is not permitted by statutory regulation or exceeds the~permitted use,
      you will need to obtain permission directly from the~copyright holder.
      To view a~copy of this license, visit http:/\!/creativecommons.org/licenses/by/4.0/.
      \par
    }%
    \afterOpenAccess@
  \fi
}

% Authors and Affiliations

\def\@get.#1->#2{\expandafter\let\expandafter#2\csname\current@object.#1\endcsname}
\def\@let.#1=#2{\global\expandafter\let\csname\current@object.#1\endcsname#2}
\def\@def.#1=#2{\def\new@value{#2}\@let.#1=\new@value}
\def\@add.#1=#2#3{%
  \@get.#1->\value@@
  \@@add\value@@{#2}{#3}%
  \@let.#1=\value@@
}

\def\@@add#1#2#3{% Globally defines #1 as the old "content" of #1 plus #2 (optional) and #3, without expanding anything
  \ifx#1\relax
    \gdef#1{#3}%
  \else
    \begingroup
      \edef\temp@{%
        \endgroup
        \noexpand\gdef\noexpand#1{#1#2#3}%
      }%
    \temp@
  \fi
}
\def\@@xadd#1#2#3{% Globally defines #1 as the full expansion of the old "content" of #1 plus the full expansions of #2 (optional) and #3
  \ifx#1\relax
    \xdef#1{#3}%
  \else
    \xdef#1{#1#2#3}%
  \fi
}

% Define \process@tokens{#1} which calls custom \process@token{#1} and \process@token@space

\def\process@token@space@@{%
  \process@token@space
  \futurelet\current@token\process@token@aux@ii
}
\begingroup
  \def\:{\global\let\space@token= } \: %
  \def\:{\process@token@space@} \expandafter\gdef\: {%
    \futurelet\next@token\process@token@space@@
  }
\endgroup
\def\process@token@aux@i{%
  \futurelet\current@token\process@token@aux@ii
}
\def\process@token@aux@ii{%
  \ifx\current@token\token@stop
    \expandafter\process@token@end
  \else
    \ifx\current@token\space@token
      \expandafter\expandafter\expandafter\process@token@space@
    \else
      \expandafter\expandafter\expandafter\process@token@std
    \fi
  \fi
}
\long\def\process@token@std#1{%
  \process@token{#1}%
  \process@token@aux@i
}
\def\token@stop{\token@stop}
\long\def\process@tokens#1{%
  \begingroup
    \expandafter\process@token@aux@i#1\token@stop
}
\def\process@token@end\token@stop{%
  \expandafter\endgroup
}
\long\def\process@token#1{}
\def\process@token@space{}

%%%

\newtoks\top@toks

\long\def\addto@top@toks#1{%
  \global\top@toks\expandafter{\the\top@toks#1}%
}

\def\process@token@space{%
  \ifx\next@token\Prefix\else
  \ifx\next@token\Particle\else
  \ifx\next@token\Suffix\else
  \ifx\next@token\Initial\else
  \ifx\next@token\Gender\else
  \ifx\next@token\ORCID\else
  \ifx\next@token\Email\else
  \ifx\next@token\AffilRef\else
  \ifx\next@token\Corresponding\else
  \ifx\next@token\Print\else
  \ifx\next@token\Sign\else
  \ifx\next@token\Division\else
  \ifx\next@token\Organization\else
  \ifx\next@token\Street\else
  \ifx\next@token\Postbox\else
  \ifx\next@token\Postcode\else
  \ifx\next@token\City\else
  \ifx\next@token\State\else
  \ifx\next@token\Country\else
  \ifx\next@token\CountryCode\else
  \ifx\next@token\URL\else
  \ifx\next@token\End@\else
    \addto@top@toks{\space}%
  \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
}

% \Author

\newcount\author@count \author@count\z@

\def\addto@authors@toks#1{%
  \global\authors@toks\expandafter{\the\authors@toks\author@{#1}}%
}

\def\addto@z@toks#1{%
  \toks\z@\expandafter{\the\toks\z@#1}%
}

\def\End@{\End@}

\def\setFamilyName@#1\End@{%
  \@def.FamilyName={#1}\set@toks\FamilyName@toks{#1}%
  \ifx\first@author@FamilyName\relax
    \gdef\first@author@FamilyName{#1}%
  \fi
}
\def\setPrefix@#1\End@{\@def.Prefix={#1~}\set@toks\Prefix@toks{#1~}}
\def\setParticle@#1\End@{\@def.Particle={#1~}\set@toks\Particle@toks{#1~}}
\def\addInitial@#1\End@{\@add.Initials={}{#1~}\add@toks\Initials@toks{#1~}}
\def\setSuffix@#1\End@{\@def.Suffix={,~#1}\set@toks\Suffix@toks{,~#1}}
\def\setGender@#1\End@{\@def.Gender={#1}}
\def\setORCID@#1\End@{\@def.ORCID={#1}}
\def\addEmail@#1\End@{\@add.Emails={$;$ }{#1}\@@add\all@emails{ }{#1}}
\def\addAffilRef@#1\End@{\let\print@affil\relax\@add.Affils={;\break}{\print@affil{#1}}}
\def\setCorresponding@#1\End@{\@let.Corresponding=\@ne}
\def\setAuthorPrint@#1\End@{\@def.Print={#1}\set@toks\Print@toks{#1}}
\def\setAuthorSign@#1\End@{\@def.Sign={#1}}

\long\def\Author#1\endAuthor{%
  \advance\author@count1\relax
  \edef\current@object{author[\the\author@count]}%
  \FamilyName@toks{}%
  \Prefix@toks{}%
  \Particle@toks{}%
  \Initials@toks{}%
  \Suffix@toks{}%
  \Print@toks{}%
  \@def.FamilyName=\relax
  \@let.Prefix=\relax
  \@let.Particle=\relax
  \@let.Initials=\relax
  \@let.Suffix=\relax
  \@let.Gender=\gender@ % For backward compatibility
  \@let.ORCID=\relax
  \@let.Emails=\relax
  \@let.Affils=\relax
  \@let.Corresponding=\relax
  \@let.Print=\relax
  \@let.Sign=\relax
  \begingroup
    \global\top@toks{}%
    \long\def\process@token##1{%
      \ifx\current@token\Prefix       \addto@top@toks{\End@\setPrefix@}\else
      \ifx\current@token\Particle     \addto@top@toks{\End@\setParticle@}\else
      \ifx\current@token\Initial      \addto@top@toks{\End@\addInitial@}\else
      \ifx\current@token\Suffix       \addto@top@toks{\End@\setSuffix@}\else
      \ifx\current@token\Gender       \addto@top@toks{\End@\setGender@}\else
      \ifx\current@token\ORCID        \addto@top@toks{\End@\setORCID@}\else
      \ifx\current@token\Email        \addto@top@toks{\End@\addEmail@}\else
      \ifx\current@token\AffilRef     \addto@top@toks{\End@\addAffilRef@}\else
      \ifx\current@token\Corresponding\addto@top@toks{\End@\setCorresponding@}\else
      \ifx\current@token\Print        \addto@top@toks{\End@\setAuthorPrint@}\else
      \ifx\current@token\Sign         \addto@top@toks{\End@\setAuthorSign@}\else
        \addto@top@toks{##1}%
      \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
    }%
    \process@tokens{\noexpand\setFamilyName@#1\End@}%
    \the\top@toks
    \ifx\authors@specified\relax
      \@get.Print->\print@
      \ifx\print@\relax
        \toks\z@{}%
        \expandafter\addto@z@toks\expandafter{\the\Prefix@toks}%
        \expandafter\addto@z@toks\expandafter{\the\Initials@toks}%
        \expandafter\addto@z@toks\expandafter{\the\Particle@toks}%
        \expandafter\addto@z@toks\expandafter{\the\FamilyName@toks}%
        \expandafter\addto@z@toks\expandafter{\the\Suffix@toks}%
        \expandafter\addto@authors@toks\expandafter{\the\toks\z@}%
      \else
        \expandafter\addto@authors@toks\expandafter{\the\Print@toks}%
      \fi
    \fi
  \endgroup
}

% \Affil

\def\setAffilNumber@#1\End@{%
  \edef\current@object{affil[#1]}%
  \@let.Division=\relax
  \@let.Organization=\relax
  \@let.Street=\relax
  \@let.Postbox=\relax
  \@let.Postcode=\relax
  \@let.City=\relax
  \@let.State=\relax
  \@let.Country=\relax
  \@let.URL=\relax
  \@let.Print=\relax
}
\def\setDivision@#1\End@{\@def.Division={#1}}%
\def\setOrganization@#1\End@{\@def.Organization={#1}}%
\def\setStreet@#1\End@{\@def.Street={#1}}%
\def\setPostbox@#1\End@{\@def.Postbox={#1}}%
\def\setPostcode@#1\End@{\@def.Postcode={#1}}%
\def\setCity@#1\End@{\@def.City={#1}}%
\def\setState@#1\End@{\@def.State={#1}}%
\def\setCountry@#1\End@{\@def.Country={#1}}%
\def\setCountryCode@#1\End@{}%
\def\setURL@#1\End@{\@def.URL={#1}}%
\def\setAffilPrint@#1\End@{\@def.Print={#1}}%

\long\def\Affil#1\endAffil{%
  \begingroup
    \global\top@toks{}%
    \long\def\process@token##1{%
      \ifx\current@token\Division    \addto@top@toks{\End@\setDivision@}\else
      \ifx\current@token\Organization\addto@top@toks{\End@\setOrganization@}\else
      \ifx\current@token\Street      \addto@top@toks{\End@\setStreet@}\else
      \ifx\current@token\Postbox     \addto@top@toks{\End@\setPostbox@}\else
      \ifx\current@token\Postcode    \addto@top@toks{\End@\setPostcode@}\else
      \ifx\current@token\City        \addto@top@toks{\End@\setCity@}\else
      \ifx\current@token\State       \addto@top@toks{\End@\setState@}\else
      \ifx\current@token\Country     \addto@top@toks{\End@\setCountry@}\else
      \ifx\current@token\CountryCode \addto@top@toks{\End@\setCountryCode@}\else
      \ifx\current@token\URL         \addto@top@toks{\End@\setURL@}\else
      \ifx\current@token\Print       \addto@top@toks{\End@\setAffilPrint@}\else
        \addto@top@toks{##1}%
      \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
    }%
    \process@tokens{\noexpand\setAffilNumber@#1\End@}%
    \the\top@toks
  \endgroup
}

\def\only@in#1#2{\errmessage{ERROR: #1\space is used outside of #2}}
\def\only@inRefs#1{\errmessage{ERROR: #1\space is used outside of \string\Refs}}

\def\Prefix       {\only@in{\string\Prefix       }{\string\Author\space or \string\ref}}
\def\Particle     {\only@in{\string\Particle     }{\string\Author\space or \string\ref}}
\def\Suffix       {\only@in{\string\Suffix       }{\string\Author\space or \string\ref}}
\def\Initial      {\only@in{\string\Initial      }{\string\Author}}
\def\Gender       {\only@in{\string\Gender       }{\string\Author}}
\def\ORCID        {\only@in{\string\ORCID        }{\string\Author}}
\def\Email        {\only@in{\string\Email        }{\string\Author}}
\def\AffilRef     {\only@in{\string\AffilRef     }{\string\Author}}
\def\Corresponding{\only@in{\string\Corresponding}{\string\Author}}
\def\Print        {\only@in{\string\Print        }{\string\Author\space or \string\Affil}}
\def\Sign         {\only@in{\string\Sign         }{\string\Author}}
\def\Division     {\only@in{\string\Division     }{\string\Affil}}
\def\Organization {\only@in{\string\Organization }{\string\Affil}}
\def\Street       {\only@in{\string\Street       }{\string\Affil}}
\def\Postbox      {\only@in{\string\Postbox      }{\string\Affil}}
\def\Postcode     {\only@in{\string\Postcode     }{\string\Affil}}
\def\City         {\only@in{\string\City         }{\string\Affil}}
\def\State        {\only@in{\string\State        }{\string\Affil}}
\def\Country      {\only@in{\string\Country      }{\string\Affil}}
\def\CountryCode  {\only@in{\string\CountryCode  }{\string\Affil}}
\def\URL          {\only@in{\string\URL          }{\string\Affil}}
\def\By           {\only@inRefs{\string\By      }}
\def\Initials     {\only@inRefs{\string\Initials}}
\def\Degrees      {\only@inRefs{\string\Degrees }}
\def\Edition      {\only@inRefs{\string\Edition }}
\def\Lang         {\only@inRefs{\string\Lang    }}
\def\Yr           {\only@inRefs{\string\Yr      }}

% Presentation (print) of authors and affiliations

\newtoks\authors@toks
\newtoks\Initials@toks
\newtoks\Prefix@toks
\newtoks\Particle@toks
\newtoks\FamilyName@toks
\newtoks\Suffix@toks
\newtoks\Print@toks

\let\authors@specified\relax

\def\authors#1\endauthors{%
  \authors@toks{#1}%
  \let\authors@specified\@ne
}

\def\set@toks#1#2{%
  \ifx\authors@specified\relax
    \global#1{#2}%
  \fi
}
\def\add@toks#1#2{%
  \ifx\authors@specified\relax
    \global#1\expandafter{\the#1#2}%
  \fi
}

\newcount\@i

\def\author@#1{%
  \advance\@i\@ne
  \ifnum\author@count=\@ne
    \toks\z@\expandafter{\the\toks\z@#1}%
  \else\ifnum\author@count=\tw@
    \ifnum\@i=\@ne
      \toks\z@\expandafter{\the\toks\z@#1}%
    \else
      \toks\z@\expandafter{\the\toks\z@\ and~#1}%
    \fi
  \else % \author@count>2
    \ifnum\@i=\@ne
      \toks\z@\expandafter{\the\toks\z@#1}%
    \else\ifnum\@i<\author@count
      \toks\z@\expandafter{\the\toks\z@, #1}%
    \else
      \toks\z@\expandafter{\the\toks\z@, and~#1}%
    \fi\fi
  \fi\fi
}%

\def\build@authors@toks{%
  \begingroup
    \toks\z@{}%
    \@i=\z@
    \the\authors@toks
    \global\authors@toks\toks\z@
  \endgroup
}

\def\print@author{%
  \@get.Print->\print@
  \ifx\print@\relax
    \csname\current@object.Prefix\endcsname
    \csname\current@object.Particle\endcsname
    \csname\current@object.Initials\endcsname
    \csname\current@object.FamilyName\endcsname
    \csname\current@object.Suffix\endcsname
  \else
    {\let\\\break\print@}%
  \fi
}

\def\print@author@with@affils{%
  \@get.Corresponding->\corresponding@
  \@get.Affils->\affils@
  \@get.ORCID->\orcid@
  \@get.Emails->\emails@
  \@get.Sign->\sign@
  \ifx\sign@\relax
    {\tenpoint\sc\print@author}%
  \else
    {\tenpoint\sc\sign@}%
  \fi
  \ifx\corresponding@\relax\else
    \ifnum\author@count>\@ne\space(corresponding~author)\fi
  \fi
  \vskip.3ex\affils@
  \ifx\orcid@\relax\else\break{\tt https:/\hskip-.1em/orcid.org/\orcid@}\fi
  \ifx\emails@\relax\else\break{\tt\emails@}\fi
}

\def\print@authors@with@affils{%
  \count@\z@
  \loop
    \advance\count@\@ne
    \edef\current@object{author[\the\count@]}%
    \print@author@with@affils
    \medskip
    \ifnum\count@<\author@count
  \repeat
}

\def\print@affil#1{%
  \edef\current@object{affil[#1]}%
  \@get.Print->\print@
  \ifx\print@\relax
    \@get.URL->\url@
    \ifx\url@\relax
      \let\affil@\relax
      \@get.Division->\value@     \ifx\value@\relax\else\edef\affil@{\value@}\fi
      \@get.Organization->\value@ \ifx\value@\relax\else\@@xadd\affil@{, }\value@\fi
      \@get.Street->\value@       \ifx\value@\relax\else\@@xadd\affil@{, }\value@\fi
      \@get.Postbox->\value@      \ifx\value@\relax\else\@@xadd\affil@{, }\value@\fi
      \@get.Postcode->\value@     \ifx\value@\relax\else\@@xadd\affil@{, }\value@\fi
      \@get.City->\value@         \ifx\value@\relax\else\@@xadd\affil@{, }\value@\fi
      \@get.State->\value@        \ifx\value@\relax\else\@@xadd\affil@{, }\value@\fi
      \@get.Country->\value@      \ifx\value@\relax\else\@@xadd\affil@{, }\value@\fi
      {\affil@}%
    \else
      {\tt\url@}%
    \fi
  \else
    {\let\\\break\print@}%
  \fi
}

% Top matter

% For backward compatibility:
\def\author#1\endauthor{}
\def\iauthor#1\endiauthor{}
\def\pforename#1\endpforename{}
\def\psurname#1\endpsurname{}
\def\affil#1\endaffil{}
\def\orcid#1\endorcid{}
\def\email#1\endemail{}
\def\pemail#1\endpemail{}
\def\HeHasNoConflicts {\def\gender@{he}}
\def\SheHasNoConflicts{\def\gender@{she}}

\def\beforeHeader@{\relax}\def\afterHeader@{\relax}\def\beforeHeader#1{\def\beforeHeader@{#1}}\def\afterHeader#1{\def\afterHeader@{#1}}
\def\beforeTitle@{\relax}\def\afterTitle@{\relax}\def\beforeTitle#1{\def\beforeTitle@{#1}}\def\afterTitle#1{\def\afterTitle@{#1}}
\def\beforeAuthors@{\relax}\def\afterAuthors@{\relax}\def\beforeAuthors#1{\def\beforeAuthors@{#1}}\def\afterAuthors#1{\def\afterAuthors@{#1}}
\def\beforeAbstract@{\relax}\def\afterAbstract@{\relax}\def\beforeAbstract#1{\def\beforeAbstract@{#1}}\def\afterAbstract#1{\def\afterAbstract@{#1}}
\def\beforeDOI@{\relax}\def\afterDOI@{\relax}\def\beforeDOI#1{\def\beforeDOI@{#1}}\def\afterDOI#1{\def\afterDOI@{#1}}
\def\beforeKeywords@{\relax}\def\afterKeywords@{\relax}\def\beforeKeywords#1{\def\beforeKeywords@{#1}}\def\afterKeywords#1{\def\afterKeywords@{#1}}
\def\beforeDates@{\relax}\def\afterDates@{\relax}\def\beforeDates#1{\def\beforeDates@{#1}}\def\afterDates#1{\def\afterDates@{#1}}
\def\beforeFunding@{\relax}\def\afterFunding@{\relax}\def\beforeFunding#1{\def\beforeFunding@{#1}}\def\afterFunding#1{\def\afterFunding@{#1}}
\def\beforeConflicts@{\relax}\def\afterConflicts@{\relax}\def\beforeConflicts#1{\def\beforeConflicts@{#1}}\def\afterConflicts#1{\def\afterConflicts@{#1}}
\def\beforeOpenAccess@{\relax}\def\afterOpenAccess@{\relax}\def\beforeOpenAccess#1{\def\beforeOpenAccess@{#1}}\def\afterOpenAccess#1{\def\afterOpenAccess@{#1}}
\def\beforeRefs@{\relax}\def\afterRefs@{\relax}\def\beforeRefs#1{\def\beforeRefs@{#1}}\def\afterRefs#1{\def\afterRefs@{#1}}
\def\beforePublishersNote@{\relax}\def\afterPublishersNote@{\relax}\def\beforePublishersNote#1{\def\beforePublishersNote@{#1}}\def\afterPublishersNote#1{\def\afterPublishersNote@{#1}}
\def\beforeAffils@{\relax}\def\afterAffils@{\relax}\def\beforeAffils#1{\def\beforeAffils@{#1}}\def\afterAffils#1{\def\afterAffils@{#1}}
\def\beforeTOC@{\relax}\def\afterTOC@{\relax}\def\beforeTOC#1{\def\beforeTOC@{#1}}\def\afterTOC#1{\def\afterTOC@{#1}}

\newcount\articlecount@

\let\first@author@FamilyName\relax % to be defined in the first \Author
\let\all@emails\relax % space-separated list, to be collected in all \Author\Email

\def\topmatter{%
  \let\funding@flag\relax
  \let\conflicts@flag\relax
  \let\openAccess@flag\relax
  \author@count\z@
  \let\authors@specified\relax
  \authors@toks{}%
  \let\first@author@FamilyName\relax
  \let\all@emails\relax
  \def\thethanks@{}\def\theconflicts@{}\def\thededication@{}\def\thesource@{}%
  \def\thedate@{}\def\thedaterevised@{}\def\thedateaccepted@{}%
  \let\gender@\relax % For backward compatibility
  %
  \setbox\ignorebox@\hbox{\box\o@Journal\o@Year\o@CopyrightYear\o@Volume\o@Issue\o@LastPage}%
  \let\o@FirstPage\relax
  \let\origin@specified\relax
  %
  \edef\thepipsno@{simj\ifnum\pageno<10 0\fi\ifnum\pageno<100 0\fi
                   \ifnum\pageno<1000 0\fi\number\pageno}%
  \ifnum\@issuenumber>0\relax\readpages\fi\mark{first article}% 2.6 was: \opentoc\readpages\mark{first article}}
  \ToAuthorCount@=0\ToAuthorToks@{}\ToAuthorExists@false
  \def\beforeHeader@{\relax}\def\afterHeader@{\relax}%
  \def\beforeTitle@{\relax}\def\afterTitle@{\relax}%
  \def\beforeAuthors@{\relax}\def\afterAuthors@{\relax}%
  \def\beforeAbstract@{\relax}\def\afterAbstract@{\relax}%
  \def\beforeDOI@{\relax}\def\afterDOI@{\relax}%
  \def\beforeKeywords@{\relax}\def\afterKeywords@{\relax}%
  \def\beforeDates@{\relax}\def\afterDates@{\relax}%
  \def\beforeFunding@{\relax}\def\afterFunding@{\relax}%
  \def\beforeConflicts@{\relax}\def\afterConflicts@{\relax}%
  \def\beforeOpenAccess@{\relax}\def\afterOpenAccess@{\relax}%
  \def\beforeRefs@{\relax}\def\afterRefs@{\relax}%
  \def\beforePublishersNote@{\relax}\def\afterPublishersNote@{\relax}%
  \def\beforeAffils@{\relax}\def\afterAffils@{\relax}%
  % \def\beforeTOC@{\relax}\def\afterTOC@{\relax}% Don't do this!
}

\outer\def\endtopmatter{\runaway@{abstract}%
  \ifx\all@emails\relax\errmessage{ERROR: There are no emails}\fi
  \ifx\first@author@FamilyName\relax\errmessage{ERROR: There are no authors}\fi
  \ifx\authors@specified\relax\build@authors@toks\fi
  \writesplitfile
  \firstpage@=\pageno
  \global\endcount@=1
  \advance\articlecount@ by 1
  \makeDOI
  \writetoc
  \ifx\thesource@\empty
    \ifx\origin@specified\relax
      \source The article was submitted by the author\ifnum\author@count>\@ne s\fi\space in English.\endsource
    \fi
  \fi
  \ifx\thededication@\empty\else\vfootnote{\dedicationmark@}{\thededication@}\fi
  \insert\infoins{\begingroup\baselineskip 12\p@ \rightskip=\z@ plus 1fil
    \indent\ninerm
    \ifx\thesource@\empty\else{\sourcemark@}{\thesource@\par}\fi
    \beforeDates@
      Original~article submitted \thedate@%
      \ifx\thedaterevised@\empty\else; revised \thedaterevised@\fi%
      \ifx\thedateaccepted@\empty\else; accepted \thedateaccepted@\fi.\par
    \afterDates@
    \endgroup\vskip-10pt}%
  \vbox{\let\\\break
      \beforeHeader@
      \vbox{\baselineskip=10.5\p@
        \noindent{\ninepoint
          \ifTestXML@
            {\bf Testing XML\quad Testing XML\quad Testing XML\quad Testing XML\quad Testing XML\quad Testing XML}%
          \else
            \ifnum\@issuenumber>0%
              \sl ISSN 0037--4466, \it Siberian Mathematical Journal, {\sl\number\@issueyear},
              \kern-1pt\relax Vol.\,{\sl\number\@volume,} No.\,{\sl\number\@issuenumber,}
              pp.\,{\sl\csname\filename pages\endcsname}.
              \ifx\openAccess@flag\@ne
                {\rm\copyright}\ The Author(\hskip-.5pt s\hskip-.5pt), {\sl\number\@issueyear}.\break This article is an open access publication%
              \else
                {\rm\copyright}\ Pleiades Publishing, Ltd., {\sl\number\@issueyear}%
              \fi
              \ifx\@updateyear\empty\else,\break corrected publication {\sl\@updateyear}\gdef\@updateyear{}\fi.%
            \else
              \it Siberian Mathematical Journal%
              \ifx\openAccess@flag1\break This article is an open access publication.\fi
            \fi
          \fi
        }\par
        \ifx\o@FirstPage\relax\else
          \ifnum\@issuenumber>0%
            \ifvoid\o@Journal
              \let\origin@specified\relax
              \Origin\endOrigin
            \fi
            \noindent{\ninepoint\rightskip\z@ plus 1 fil\relax\it Russian Text\/ {\rm\copyright}\,\it The\,Author(\hskip-.5pt s\hskip-.5pt),
            \unhbox\o@CopyrightYear,
            published in \unhbox\o@Journal,
            \unhbox\o@Year,
            \ifvoid\o@Volume\else\kern-1pt\ninepoint\it Vol.\,\unhbox\o@Volume, \fi
            \ifvoid\o@Issue\else No.\,\unhbox\o@Issue, \fi
            pp.\,{\sl\o@FirstPage\hbox{--}\unhbox\o@LastPage}.}\par
          \else
            \noindent{\ninepoint\rightskip\z@ plus 1 fil\relax\it Russian Text\/ {\rm\copyright}\,\it The\,Author(\hskip-.5pt s\hskip-.5pt)}\par
          \fi
        \fi
    % \fi
      }% of \vbox
      \afterHeader@
       % \vskip25\p@\box\titlebox@
        \vskip21\p@
        \beforeTitle@\box\titlebox@\afterTitle@
        \vskip 4\p@
        \beforeAuthors@
        \line{\setbox0=\hbox{\rm UDC\ \theUDclass@}\indent\vtop{\parindent=0pt
         \advance\hsize by -\wd0 \advance\hsize by -.5truein
         \rightskip=0pt plus 1fil
         \bf\the\authors@toks}\hfill\box0}
        \afterAuthors@
        \vskip 15.5pt
        {\leftskip=\parindent\rightskip=1.5\parindent
            \tenpoint
            \beforeAbstract@\noindent{\bf Abstract---}\theabstract@\par\afterAbstract@
            \medskip
            \beforeDOI@\noindent{\bf DOI:}\enspace\theDOI@\par\afterDOI@
            \medskip
            \beforeKeywords@\noindent{\bf Keywords:}\enspace\thekeywords@\par\afterKeywords@
          }%
          \vskip15.5pt
  }%
  \begingroup\noindent%
}

% DOI

\newcount\checkcount@
\def\shortyear@{\count@=\@issueyear \divide\count@ by 100%
 \multiply\count@ by 100%
 \count@@=\@issueyear \advance\count@@ by - \count@
 \ifnum\count@@<10 0\fi\number\count@@}

\def\makeDOI{\checkcount@=1000 % this is the part from 00374466
 % add 7 time the issue number
 \count@=7\multiply\count@ by \@issuenumber
 \advance\checkcount@ by \count@
 %\W@{check sum, issue number: \the\checkcount@}
 % 17 * (last digit of the year)
 \count@=\@issueyear \divide\count@ by 10%
 \multiply\count@ by 10%
 \count@@=\@issueyear \advance\count@@ by -\count@
 %\W@{Prev digit of the year: \the\count@@}
 \count@=\count@@
 \multiply\count@ by 17
 \advance\checkcount@ by \count@
 %\W@{check sum, year last digit: \the\checkcount@}
 % 19 * (the previous digit)
 \count@=\@issueyear \divide\count@ by 100 \multiply\count@ by 10%
 \count@@=\@issueyear \divide\count@@ by 10%
 \advance\count@@ by -\count@
 %\message{Previous digit of the year: \the\count@@}
 \multiply\count@@ by 19
 \advance\checkcount@ by \count@@
 %\W@{check sum, year prev digit: \the\checkcount@}
 % the article number
 \count@=\articlecount@ \divide\count@ by 10%
 \count@@=3 \multiply \count@@ by \count@
 %\message{prev digit of the art: \the\count@}
 \advance\checkcount@ by \count@@
 %\W@{check sum, art prev digit: \the\checkcount@}
 \multiply\count@ by 10%
 \count@@=\articlecount@ \advance\count@@ by -\count@
 \count@=2 \multiply\count@ by \count@@
 %\W@{last digit of the art: \the\count@@}
 \advance\checkcount@ by \count@
 %\W@{check sum: \the\checkcount@}
 % the residue
 \count@@=\checkcount@ \divide\count@@ by 11 \multiply\count@@ by 11
 \advance\checkcount@ by -\count@@
 \def\theDOI@{10.1134/S00374466\shortyear@0\number\@issuenumber0%
 \ifnum\articlecount@<10 0\fi\number\articlecount@
\ifnum\checkcount@>9 X\else\number\checkcount@\fi}}
%% Russian DOI
%\def\theRussianDOI@{10.17377/smzh.20\shortyear@.\ifnum\@volume<10 0\fi\number\@volume.%
% \number\@issuenumber\ifnum\articlecount@<10 0\fi\number\articlecount@}

% Standard tags

\newbox\titlebox@
\newtoks\title@toks
\def\title#1\endtitle{\title@toks={#1}%
 \global\setbox\titlebox@\vtop{\xiipointbf\bf
 \raggedright@\ignorespaces\uppercasetext@{#1\strut\unskip}%\thanksmark@
 \endgraf}}

\newtoks\emptytok \emptytok{}

\def\pipsno#1\endpipsno{\def\thepipsno@{#1}}\def\thepipsno@{000000}
%\def\shorttitle#1\endshorttitle{}
\def\opages#1--#2\endopages{%
  \ifx\origin@specified\@ne\errmessage{ERROR: \string\opages\space cannot be used together with \string\Origin}\fi\let\origin@specified\@ne
  \def\o@FirstPage{#1}\setbox\o@LastPage\hbox{\ninepoint\sl#2\unskip}%
}
%\def\epages#1--#2\endepages{\def\theepages@{#1--#2}}
\def\address#1\endaddress{}
%\def\email#1\endemail{}
%\def\date#1\enddate{\def\thedate@{\ignorespaces#1\unskip}}
\def\datesubmitted#1\enddatesubmitted{\def\thedate@{\ignorespaces#1\unskip}}
\def\daterevised#1\enddaterevised{\def\thedaterevised@{\ignorespaces#1\unskip}}
\def\dateaccepted#1\enddateaccepted{\def\thedateaccepted@{\ignorespaces#1\unskip}}
\def\thethanks@{}
\def\theconflicts@{}
\def\thededication@{}
\def\thesource@{}
% \def\thanksmark@{}
\def\dedicationmark@{} % ${}^{\dag)}$
\def\sourcemark@{}
\def\thanks#1\endthanks{\gdef\thethanks@{\ignorespaces#1\unskip}}
\long\def\conflicts#1\endconflicts{\gdef\theconflicts@{\ignorespaces#1\unskip}}
\def\dedication#1\enddedication{\gdef\thededication@{\ignorespaces#1\unskip\vrule width 0pt height 0pt depth 1.5ex\relax}}
\def\source#1\endsource{\gdef\thesource@{\ignorespaces#1\unskip}}
\def\keywords#1\endkeywords{\def\thekeywords@{#1}}
%\def\DOI#1\endDOI{\def\theDOI@{#1}}
\def\subjclass#1\endsubjclass{}
\def\UDclass#1\endUDclass{\def\theUDclass@{\ignorespaces#1\unskip}}
\def\translator#1\endtranslator{}
%\def\issuedate#1\endissuedate{\def\theissuedate@{#1}}
%\issuedate{*undefined*}\endissuedate
\def\abstract#1\endabstract{\def\theabstract@{#1}}

%%%
\newif\ifpagesopen \pagesopenfalse
\newif\ifreadpages \readpagesfalse
\newwrite\pagesfile
\def\readpages{\ifreadpages\else\readpagestrue
  \input@{pages\number\@issuenumber.tex}\fi}
\def\openpages{\ifpagesopen\else\pagesopentrue
  \immediate\openout\pagesfile pages\number\@issuenumber.tex\fi}
\def\closepages{\ifpagesopen\immediate\closeout\pagesfile\pagesopenfalse\fi}
\def\writepages{%
  \ifpagesopen
    \write\pagesfile{\string\expandafter\string\gdef\string\csname\space\filename pages\endcsname{\the\firstpage@--\the\pageno}}%
  \fi
  \ifDataOpen
    \write\Datafile{Article '\filename.ams' \the\firstpage@\space \the\pageno}%
  \fi}

%%% "pageination.txt" for Pleiades
\newwrite\paginationfile
\newtoks\th@shortyear
\newif\ifpaginationopen \paginationopenfalse
\def\openpagination{\ifpaginationopen\else\paginationopentrue
  \immediate\openout\paginationfile pagination.txt\fi}
\def\closepagination{\ifpaginationopen\immediate\closeout\paginationfile\paginationopenfalse\fi}
\def\writepagination{\count@=\@issueyear \divide\count@ by 100%
  \multiply\count@ by 100%
  \count@@=\@issueyear \advance\count@@ by - \count@
  \ifnum\count@@<10\def\fill@r{0}\else\def\fill@r{}\fi
  \ifpaginationopen
    \immediate\write\paginationfile{SIMJ%
    \number\@issuenumber_\fill@r\the\count@@\first@author@FamilyName LO.ps\space\space\space\space pp.\space
    \the\firstpage@\space-\space\the\pageno}%
  \fi}

%%% "SibMatJXX.eot" for Pleiades
\newwrite\eotfile
\newtoks\th@shortyear
\newif\ifeotopen \eotopenfalse
\def\openeot{\ifeotopen\else\eotopentrue
 \count@=\@issueyear \divide\count@ by 100%
 \multiply\count@ by 100%
 \count@@=\@issueyear \advance\count@@ by - \count@
 \ifnum\count@@<10\def\fill@r{0}\else\def\fill@r{}\fi
  \immediate\openout\eotfile SIMJ\number\@issuenumber_\fill@r\the\count@@.eot\fi}
\def\closeeot{\ifeotopen\immediate\closeout\eotfile\eotopenfalse\fi}
{\catcode`\^^I=12
\gdef\writeeot{\ifeotopen
  \begingroup\catcode`\^^I=12%
  \immediate\write\eotfile{\first@author@FamilyName^^I\all@emails}%
  \endgroup
\fi}}
%%% End of May 2, 2018

\newif\iftocopen \tocopenfalse
\newwrite\tocfile
\def\opentoc{%
  \iftocopen\else
    \tocopentrue
    \immediate\openout\tocfile econt\number\@issuenumber.tex
    \immediate\write\tocfile{\string\documentstyle{SibMatJ}}%
    \immediate\write\tocfile{\string\issueyear{\number\@issueyear}}%
    \immediate\write\tocfile{\string\issuenumber{\number\@issuenumber}}%
    \immediate\write\tocfile{\space}%
    \immediate\write\tocfile{\string\pagenomo}%
    \immediate\write\tocfile{\string\toc}%
    \immediate\write\tocfile{\beforeTOC@}%
  \fi
}

\def\closetoc{%
  \iftocopen
    \immediate\write\tocfile{\string\endtoc}%
    \immediate\write\tocfile{\afterTOC@}%
    \immediate\write\tocfile{\string\vskip2cm \string\begingroup\string\leftskip=1.1in%
      \string\rightskip=1.1in\string\tenpoint\string\noindent}%
    \immediate\write\tocfile{{\string\it\space Siberian Mathematical Journal\string\/} is abstracted or indexed in}%
    \immediate\write\tocfile{ANVUR, Astrophysics Data System (ADS), Baidu, CLOCKSS, CNKI, CNPIEC,}%
    \immediate\write\tocfile{Dimensions, EBSCO, Google Scholar, Japanese Science and Technology Agency (JST),}%
    \immediate\write\tocfile{Mathematical Reviews, Naver, OCLC WorldCat Discovery Service, Portico,}%
    \immediate\write\tocfile{ProQuest, SCImago, SCOPUS, Science Citation Index Expanded (SCIE),}%
    \immediate\write\tocfile{TD Net Discovery Service, UGC-CARE List (India), Wanfang, zbMATH.}%
    \immediate\write\tocfile{\string\par\string\endgroup}%
    \immediate\write\tocfile{\string\begingroup\string\enddocument}%
    \immediate\closeout\tocfile\tocopenfalse
  \fi
}

\def\writetoc{%
  \iftocopen
    \immediate\write\tocfile{\string\title\string\bf\space\the\authors@toks}%
    \immediate\write\tocfile{\space\space\string\unskip\string\rm,\string\quad\string\it\space\the\title@toks}
    \immediate\write\tocfile{\space\space\string\page{\number\pageno}\string\endtitle}%
  \fi
}

\def\xwritetoc#1{\immediate\write\tocfile{\string\title\space#1\string\endtitle}}

\def\tocspecial#1{\immediate\write\tocfile{#1}}
\def\tocbreak{\vfill\eject}

%%%%%% split
\ifx\pdfpageheight\undefined\else\pdfpageheight=11in
                                 \pdfpagewidth=8.5in\fi
\def\splitfile{split.bat}
\def\extension{dvi}
\def\comline{amstex.bat}
\newwrite\splitfile
\newif\ifsplitopen
\def\opensplit{\splitopentrue\openout\splitfile}
\def\closesplit{\splitopenfalse\immediate\closeout\splitfile}
\def\writesplitfiletoc{\ifsplitopen
  \write\splitfile{call \comline\space   econt\the\@issuenumber.tex}%
  \write\splitfile{move econt\the\@issuenumber.\extension\space
     simjcont.\extension}%
  \write\splitfile{dvips.exe -Ppdf -tletter simjcont.\extension}\fi}
\def\articlenumber#1{\articlecount@=#1\relax\advance\articlecount@ by-1}
\def\writesplitfile{\ifsplitopen
  \write\splitfile{call \comline\space
  \string\documentstyle{SibMatJ}\space
  \string\pf\space
  \string\overfullrule=0pt
  %\string\pdfpageheight=11in\space\string\pdfpagewidth=8.5in\space
  \string\issueyear{\the\@issueyear}\string\issuenumber{\the\@issuenumber}\string\articlenumber{\the\articlecount@}\space
  \string\pageno=\the\pageno\space
  \string\Input\space\filename.ams\string\end}%
  \write\splitfile{move sibmatj.\extension\space\thepipsno@.\extension}%
  \write\splitfile{move sibmatj.log\space\thepipsno@.log}%
  \write\splitfile{dvips.exe -Ppdf -tletter \thepipsno@.dvi}%
\fi}%

\newif\ifDataOpen
\newwrite\Datafile
\def\openData#1{%
  \ifDataOpen\else
    \DataOpentrue
    \immediate\openout\Datafile Data.ps1
    \write\Datafile{Issue \number\@issueyear\space \number\@issuenumber\space #1}
  \fi}
\def\closeData{\ifDataOpen\immediate\closeout\Datafile\DataOpenfalse\fi}

\newcount\@issueyear
\newcount\@volume
\def\issueyear#1{\@issueyear=#1 \@volume=-1959 \advance\@volume by \@issueyear}
\issueyear{1960}
\def\shortyear@{\count@=\@issueyear \divide\count@ by 100%
 \multiply\count@ by 100%
 \count@@=\@issueyear \advance\count@@ by - \count@
 \ifnum\count@@<10 0\fi\number\count@@}
\newcount\@issuenumber \def\issuenumber#1{\@issuenumber=#1} \issuenumber0

\def\@issuemonths{\ifcase\@issuenumber *******--*******\or
January--February\or March--April\or May--June\or July--August\or
September--October\or November--December\else Invalid issue number\fi}

\newbox\tocheadbox@ \newbox\tocbox@

\def\jtitle{\bgroup\def\={\kern -0.08em}\IVxviiss
\rightline{\vrule height 30\p@ width 0\p@ S\=I\=B\=E\=R\=I\=A\=N}%
\rightline{\vrule height 30\p@ width 0\p@
M\=A\=T\=H\=E\=M\=A\=T\=I\=C\=A\=L\kern10pt J\=O\=U\=R\=N\=A\=L}
\bigskip
%\rightline{\tenrm A translation of \tenit Sibirskii\ Matematicheskii\
%Zhurnal}
\bigskip
%\rightline{\xiisf\theissuedate@}
%\bigskip
\hrule height 1pt
\bigskip
\line{\tenbf Volume \number\@volume, Number \number\@issuenumber \hfill
\@issuemonths, \number\@issueyear}
\bigskip \hrule height 1pt \bigskip \bigskip
\rightline{\IVtenssdc C\=O\=N\=T\=E\=N\=T\=S}
%\rightline{\vbox to 6mm{}\xiibf Engl./Russ.}
\vskip 1cm\egroup}

\def\pagenomo{\pageno=-1}
\def\maketoc{\global\endcount@=2\input@{econt\number\@issuenumber}}
\newif\iftoc
\def\toc{\jtitle\mark{empty}\writesplitfiletoc\bgroup\toctrue\newtocdefs}
\def\newtocdefs{\tenpoint
%  \rightskip=3.5cm plus1fil
   \rightskip=1cm plus1fil
   \parskip=1pt plus 0.5pt
   \def \title##1\endtitle
       {\penaltyandskip@\z@\smallskipamount
        \hangindent.5in\noindent{\bf##1}\par}%
%  \def\page##1%
%      {\unskip\penalty\@M\quad\dotfill
%       \rlap{\hbox to2cm{\hfil\rm##1}}\penalty\@M}%
   \def\page##1%
       {\unskip\penalty\@M\quad\dotfill
        \rlap{\hbox to1cm{\hfil\rm##1}}\penalty\@M\ignorespaces}%
%  \def\rpage##1{
%      {\unskip\penalty\@M
%       \rlap{\hbox to3.5cm{\hfil\rm##1}}\penalty\@M\ignorespaces}%
%  \def\rpage##1{}%
   \def\chapter##1{}%
   \def\specialhead##1\endspecialhead{}%
   \def\head##1 ##2\endhead{}}
\def\endtoc{\par\mark{empty}\tocfalse\egroup
  \ifnum\pageno<-1\insert\topins{%
     \rightline{\def\={\kern -0.08em}\IVtenssdc C\=O\=N\=T\=E\=N\=T\=S}
     \rightline{\vrule height 5mm depth 2mm width 0pt\sevenrm (continued)}
     %\rightline{\vbox to 4mm{}\xiibf Engl./Russ.}
     \vskip 1cm}
  \fi}

%%%%%%%%%%%%%%%%%%% output routines %%%%%%%%%%%%%%%%%%%%%%%%%%
\newdimen\pagehsize \pagehsize=\hsize
\newdimen\pagevsize \pagevsize=\vsize

\newinsert\infoins
\skip\infoins=\bigskipamount
\count\infoins=1000
\dimen\infoins=8in

\footline={\ninerm
  \xdef\next@{\firstmark}\xdef\next@@{\topmark}\def\next@@@{first article}%
  \def\next@@@@{empty}%
  \ifx\next@\next@@@@\hfill\else
  \ifodd\pageno\hfill
      \ifx\next@\next@@\else\ifx\next@\next@@@
      %{0037-4466/\shortyear@/%
      %\the\@volume0\the\@issuenumber--\fourpagenumber\
%      \$25.00
%\copyright\ \number\@issueyear\
%      by Pleiades Publishing, Ltd.}%
      \fi\fi
   \hfill\llap{\number\pageno}%
  \else
    \rlap{\number\pageno}\hfill
      \ifx\next@\next@@\else\ifx\next@\next@@@
 %     {0037-4466/\shortyear@/%
%      \the\@volume0\the\@issuenumber--\fourpagenumber\
%      \$25.00
%\copyright\ \number\@issueyear\
%      by Pleiades Publishing, Ltd.}%
      \fi\fi
    \hfill
  \fi\fi}

\def\fourpagenumber{\ifnum\pageno<10{}0\fi\ifnum\pageno<100{}0\fi
    \ifnum\pageno<1000{}0\fi\number\pageno}

\output={\smjonepageout{\unvbox255}}

\def\smjonepageout#1{\shipout\vbox{%
  \makeheadline
  \vbox to\pagevsize{\boxmaxdepth\maxdepth
    \ifvoid\topins\else\unvbox\topins\fi
    \dimen@=\dp\@cclv #1 % open up \box255
    \ifvoid\footins\else % footnote info is present
    \vskip\skip\footins
    \footnoterule
    \unvbox\footins\fi
    \ifvoid\infoins\else % this is a title page
    \vskip\skip\infoins
    \kern-3\p@ \hrule width \hsize \kern 5\p@
    \unvbox\infoins\fi} % end of "page body"
  \baselineskip24\p@\hbox to\pagehsize{\the\footline}}% end of the vbox just shiped out
  \advancepageno
  \ifnum\outputpenalty>-\@MM \else\dosupereject\fi}

% Footnote macro taken from manmac.tex:
\def\footnote#1{\edef\@sf{\spacefactor\the\spacefactor}#1\@sf
      \insert\footins\bgroup\ninepoint\baselineskip=10.5pt
      \setbox\strutbox=\hbox{\vrule height7.5pt depth3pt width\z@}%
      \interlinepenalty100 \let\par\endgraf
        \leftskip=\z@skip \rightskip=\z@skip
        \splittopskip=10pt plus 1pt minus 1pt \floatingpenalty=20000
        \item{#1}\bgroup\strut\aftergroup\@foot\let\next}
\def\vfootnote#1{\insert\footins\bgroup\ninepoint\baselineskip=10.5pt
      \setbox\strutbox=\hbox{\vrule height7.5pt depth3pt width\z@}%
      \interlinepenalty100 \let\par\endgraf
        \leftskip=\z@skip \rightskip=\z@skip
        \splittopskip=10pt plus 1pt minus 1pt \floatingpenalty=20000
        \item{#1}\bgroup\strut\aftergroup\@foot\let\next}

\skip\footins=12pt plus 2pt minus 4pt % space added when footnote is present
\count\footins=1000 % footnote magnification factor (1 to 1)
\dimen\footins=30pc % maximum footnotes per page
\let\plainfootnote\footnote

% for three column output % What is it?
\newbox\partialpage
\def\beginthreecolumns{\begingroup
  \output={\global\setbox\partialpage=\vbox{\unvbox255\bigskip}}\eject
  \output={\threecolumnout} \hsize=.332\pagehsize \vsize=3.1\pagevsize}
\def\endthreecolumns{\output={\balancecolumns}\eject
  \endgroup \pagegoal=\vsize}

\def\threecolumnout{\splittopskip=\topskip \splitmaxdepth=\maxdepth
  \dimen@=\pagevsize \advance\dimen@ by-\ht\partialpage
                     \advance\dimen@ by -3pt
  \setbox0=\vsplit255 to\dimen@
  \setbox2=\vsplit255 to\dimen@
  \setbox4=\vsplit255 to\dimen@
  \smjonepageout\pagesofar
  \unvbox255 \penalty\outputpenalty}

\def\pagesofar{\unvbox\partialpage
  \wd0=\hsize \wd2=\hsize \wd4=\hsize
  \hbox to\pagehsize{\box0\hfil\box2\hfil\box4}}

\def\balancecolumns{\setbox0=\vbox{\unvbox255} \dimen@=\ht0
  \advance\dimen@ by\topskip \advance\dimen@ by-\baselineskip
  \divide\dimen@ by3 \splittopskip=\topskip
  {\vbadness=10000 \loop \global\setbox5=\copy0
    \global\setbox1=\vsplit5 to\dimen@
    \global\setbox3=\vsplit5 to\dimen@
    \ifdim\ht5>\dimen@ \global\advance\dimen@ by1pt \repeat}
  \setbox0=\vbox to\dimen@{\unvbox1}
  \setbox2=\vbox to\dimen@{\unvbox3}
  \setbox4=\vbox to\dimen@{\unvbox5}
  \pagesofar}

%%% sectioning and proclaims from amsppt

\def\widestnumber#1#2{\begingroup\let\head\null
   \ifx#1\head\global\setbox\tocheadbox@\hbox{#2.\enspace}%
   \else\ifx#1\key\bgroup\let\endrefitem@\egroup
        \key#2\endrefitem@\global\refindentwd\wd\keybox@
   \else\ifx#1\no\bgroup\let\endrefitem@\egroup
        \no#2\endrefitem@\global\refindentwd\wd\nobox@
   \else\ifx#1\page\global\setbox\pagesbox@\hbox{\quad\bf#2}%
   \else\ifx#1\item\setboxz@h{#2}\global\rosteritemwd\wdz@
        \global\advance\rosteritemwd by.5\parindent
   \else\message{\string\widestnumber is not defined for this option
   (\string#1)}%
\fi\fi\fi\fi\fi\fi\endgroup}
\let\varindent@\indent
%%%
%\def\document{\let\fontlist@\relax\let\alloclist@\relax\xiipoint}
\def\document{\let\fontlist@\relax\let\alloclist@\relax\xipoint}
\newskip\aboveheadskip       \aboveheadskip\bigskipamount
\newdimen\belowheadskip      \belowheadskip6\p@
\def\headfont@{\bf\boldmath}
\def\penaltyandskip@#1#2{\relax\ifdim\lastskip<#2\relax\removelastskip
      \ifnum#1=\z@\else\penalty@#1\relax\fi\vskip#2%
  \else\ifnum#1=\z@\else\penalty@#1\relax\fi\fi}
\def\nobreak{\penalty\@M}
 % \ifvmode\def\penalty@{\let\penalty@\penalty\count@@@}%
 % \everypar{\let\penalty@\penalty\everypar{}}\fi}
\let\penalty@\penalty
\def\heading#1\endheading{\head#1\endhead}
\def\Acknowledgment{\head Acknowledgment\endhead}
\def\Acknowledgments{\head Acknowledgments\endhead}
\def\acknowledgment{\par\medskip{\bf Acknowledgment. }\ignorespaces}
\def\acknowledgments{\par\medskip{\bf Acknowledgments. }\ignorespaces}
\def\specialheadfont@{\bf\boldmath}
\outer\def\specialhead{\par\penaltyandskip@{-200}\aboveheadskip
  \begingroup\interlinepenalty\@M\rightskip\z@ plus\hsize \let\\\break
  \specialheadfont@\noindent\ignorespaces}
\def\endspecialhead{\par\endgroup\nobreak\vskip\belowheadskip}
\outer\def\head#1\endhead{\par\penaltyandskip@{-200}\aboveheadskip
 {\headfont@\raggedcenter@\interlinepenalty\@M
 \ignorespaces#1\endgraf}\nobreak
 \vskip\belowheadskip
 \headmark{#1}}
\let\headmark\eat@
\def\proclaimheadfont@{\bf}
\outer\def\proclaim{\runaway@{proclaim}\def\envir@{proclaim}%
  \nofrills@{.\enspace}\proclaim@
 \DNii@##1{\penaltyandskip@{-100}\medskipamount\varindent@
   \usualspace@{{\proclaimheadfont@\enspace}}\proclaimheadfont@
   \ignorespaces##1\unskip\proclaim@
  \sl\ignorespaces}%
 \FN@\next@}
\outer\def\endproclaim{\let\envir@\relax\par\rm
  \penaltyandskip@{55}\smallskipamount}
\def\demoheadfont@{\smc}
\def\demo{\runaway@{proclaim}\nofrills@{.\enspace}\demo@
     \DNii@##1{\par\penaltyandskip@\z@\smallskipamount
  {\usualspace@{{\demoheadfont@\enspace}}%
  \varindent@\demoheadfont@\ignorespaces##1\unskip\demo@}\rm
  \ignorespaces}\FN@\next@}
\def\enddemo{\par\medskip}
\def\qed{\ifhmode\unskip\nobreak\fi\quad\ifmmode\square\else$\m@th\square$\fi}
\let\remark\demo
\let\endremark\enddemo % \def\endremark{}
\def\definitionheadfont@{\smc}
\def\definition{\runaway@{proclaim}%
  \nofrills@{.\definitionheadfont@\enspace}\definition@
        \DNii@##1{\penaltyandskip@{-100}\medskipamount
        {\usualspace@{{\definitionheadfont@\enspace}}%
        \varindent@\definitionheadfont@\ignorespaces##1\unskip\definition@}%
        \rm \ignorespaces}\FN@\next@}
\def\enddefinition{\par\medskip}
\let\example\definition
\let\endexample\enddefinition
\newdimen\rosteritemwd
\newcount\rostercount@
\newif\iffirstitem@
\let\plainitem@\item
\newtoks\everypartoks@
\def\par@{\everypartoks@\expandafter{\the\everypar}\everypar{}}
\def\roster{\edef\leftskip@{\leftskip\the\leftskip}%
 \relaxnext@
 \rostercount@\z@
 \def\item{\FN@\rosteritem@}%
 \DN@{\ifx\next\runinitem\let\next@\nextii@\else
  \let\next@\nextiii@\fi\next@}%
 \DNii@\runinitem
  {\unskip
   \DN@{\ifx\next[\let\next@\nextii@\else
    \ifx\next"\let\next@\nextiii@\else\let\next@\nextiv@\fi\fi\next@}%
   \DNii@[####1]{\rostercount@####1\relax
    \enspace{\rm(\number\rostercount@)}~\ignorespaces}%
   \def\nextiii@"####1"{\enspace{\rm####1}~\ignorespaces}%
   \def\nextiv@{\enspace{\rm(1)}\rostercount@\@ne~}%
   \par@\firstitem@false
   \FN@\next@}%
 \def\nextiii@{\par\par@
  \penalty\@m\smallskip\vskip-\parskip
  \firstitem@true}%
 \FN@\next@}
\def\rosteritem@{\iffirstitem@\firstitem@false\else\par\vskip-\parskip\fi
 \leftskip3\parindent\noindent
 \DNii@[##1]{\rostercount@##1\relax
  \llap{\hbox to2.5\parindent{\hss\rm(\number\rostercount@)}%
   \hskip.5\parindent}\ignorespaces}%
 \def\nextiii@"##1"{%
  \llap{\hbox to2.5\parindent{\hss\rm##1}\hskip.5\parindent}\ignorespaces}%
 \def\nextiv@{\advance\rostercount@\@ne
  \llap{\hbox to2.5\parindent{\hss\rm(\number\rostercount@)}%
   \hskip.5\parindent}}%
 \ifx\next[\let\next@\nextii@\else\ifx\next"\let\next@\nextiii@\else
  \let\next@\nextiv@\fi\fi\next@}
\def\therosteritem#1{{\rm(\ignorespaces#1\unskip)}}
\newif\ifnextRunin@
\def\endroster{\relaxnext@
 \par\leftskip@
 \penalty-50 \vskip-\parskip\smallskip
 \DN@{\ifx\next\Runinitem\let\next@\relax
  \else\nextRunin@false\let\item\plainitem@
   \ifx\next\par
    \DN@\par{\everypar\expandafter{\the\everypartoks@}}%
   \else
    \DN@{\noindent\everypar\expandafter{\the\everypartoks@}}%
  \fi\fi\next@}%
 \FN@\next@}
\newcount\rosterhangafter@
\def\Runinitem#1\roster\runinitem{\relaxnext@
 \rostercount@\z@
 \def\item{\FN@\rosteritem@}%
 \def\runinitem@{#1}%
 \DN@{\ifx\next[\let\next\nextii@\else\ifx\next"\let\next\nextiii@
  \else\let\next\nextiv@\fi\fi\next}%
 \DNii@[##1]{\rostercount@##1\relax
  \def\item@{{\rm(\number\rostercount@)}}\nextv@}%
 \def\nextiii@"##1"{\def\item@{{\rm##1}}\nextv@}%
 \def\nextiv@{\advance\rostercount@\@ne
  \def\item@{{\rm(\number\rostercount@)}}\nextv@}%
 \def\nextv@{\setbox\z@\vbox
  {\ifnextRunin@\noindent\fi
  \runinitem@\unskip\enspace\item@~\par
  \global\rosterhangafter@\prevgraf}%
  \firstitem@false
  \ifnextRunin@\else\par\fi
  \hangafter\rosterhangafter@\hangindent3\parindent
  \ifnextRunin@\noindent\fi
  \runinitem@\unskip\enspace
  \item@~\ifnextRunin@\else\par@\fi
  \nextRunin@true\ignorespaces}%
 \FN@\next@}
% \Item, \Subitem, etc.
  \def\item@head@width{4ex}
  \def\item@head#1{\hbox to\item@head@width{\rm\hss#1\hss\hskip1ex}}
  \def\item@indent@amount{\parindent}
  \def\pre@item{\par
    \hangindent\item@indent@amount\advance\hangindent\item@head@width\relax
    \noindent\hskip\item@indent@amount
  }
  \def\subitem@indent@amount{1.9\parindent}
  \def\pre@subitem{\par
    \hangindent\subitem@indent@amount\advance\hangindent\item@head@width\relax
    \noindent\hskip\subitem@indent@amount
  }
  %
  \def\Items#1{\smallskip\begingroup\ItemHeadWidth{#1ex}}
  \def\endItems{\par\endgroup\smallskip}
  \def\ItemHeadWidth#1{\def\item@head@width{#1}\ignorespaces}
  \def\ItemIdentation#1{\def\item@indent@amount{#1}\ignorespaces}
  \def\SubitemIdentation#1{\def\subitem@indent@amount{#1}\ignorespaces}
  \long\def\Item #1 {\pre@item\item@head{#1}\ignorespaces}
  \def\ItemIndent{\pre@item\hskip\item@head@width\relax}
  \long\def\Subitem #1 {\pre@subitem\item@head{#1}\ignorespaces}
  \def\SubitemIndent{\pre@subitem\hskip\item@head@width\relax}
  \def\itm{\nolinebreak\hskip.7pt\relax}
%
\def\footmarkform@#1{$\m@th^{#1}$}
\let\thefootnotemark\footmarkform@
\def\makefootnote@#1#2{\insert\footins
 {\interlinepenalty\interfootnotelinepenalty
 \ninepoint\splittopskip\ht\strutbox\splitmaxdepth\dp\strutbox
 \floatingpenalty\@MM\leftskip\z@\rightskip\z@\spaceskip\z@\xspaceskip\z@
 \leavevmode{#1}\footstrut\ignorespaces#2\unskip\lower\dp\strutbox
 \vbox to\dp\strutbox{}}}
\newcount\footmarkcount@
\footmarkcount@\z@
\def\footnotemark{\let\@sf\empty\relaxnext@
 \ifhmode\edef\@sf{\spacefactor\the\spacefactor}\/\fi
 \DN@{\ifx[\next\let\next@\nextii@\else
  \ifx"\next\let\next@\nextiii@\else
  \let\next@\nextiv@\fi\fi\next@}%
 \DNii@[##1]{\footmarkform@{##1}\@sf}%
 \def\nextiii@"##1"{{##1}\@sf}%
 \def\nextiv@{\iffirstchoice@\global\advance\footmarkcount@\@ne\fi
  \footmarkform@{\number\footmarkcount@}\@sf}%
 \FN@\next@}
\def\footnotetext{\relaxnext@
 \DN@{\ifx[\next\let\next@\nextii@\else
  \ifx"\next\let\next@\nextiii@\else
  \let\next@\nextiv@\fi\fi\next@}%
 \DNii@[##1]##2{\makefootnote@{\footmarkform@{##1}}{##2}}%
 \def\nextiii@"##1"##2{\makefootnote@{##1}{##2}}%
 \def\nextiv@##1{\makefootnote@{\footmarkform@{\number\footmarkcount@}}{##1}}%
 \FN@\next@}
\def\footnote{\let\@sf\empty\relaxnext@
 \ifhmode\edef\@sf{\spacefactor\the\spacefactor}\/\fi
 \DN@{\ifx[\next\let\next@\nextii@\else
  \ifx"\next\let\next@\nextiii@\else
  \let\next@\nextiv@\fi\fi\next@}%
 \DNii@[##1]##2{\footnotemark[##1]\footnotetext[##1]{##2}}%
 \def\nextiii@"##1"##2{\footnotemark"##1"\footnotetext"##1"{##2}}%
 \def\nextiv@##1{\footnotemark\footnotetext{##1}}%
 \FN@\next@}
\def\adjustfootnotemark#1{\advance\footmarkcount@#1\relax}
\def\footnoterule{\kern-3\p@
  \hrule width 5pc\kern 2.6\p@}
\def\captionfont@{\smc}
\def\topcaption#1#2\endcaption{%
  {\dimen@\hsize \advance\dimen@-\captionwidth@
   \rm\raggedcenter@ \advance\leftskip.5\dimen@ \rightskip\leftskip
  {\captionfont@#1}%
  \if\notempty{#2}.\enspace\ignorespaces#2\fi
  \endgraf}\nobreak\bigskip}
\def\botcaption#1#2\endcaption{%
  \nobreak\bigskip
  \setboxz@h{\captionfont@#1\if\notempty{#2}.\enspace\rm#2\fi}%
  {\dimen@\hsize \advance\dimen@-\captionwidth@
   \leftskip.5\dimen@ \rightskip\leftskip
   \noindent \ifdim\wdz@>\captionwidth@
   \else\hfil\fi
  {\captionfont@#1}\if\notempty{#2}.\enspace\rm#2\fi\endgraf}}
\def\@ins{\par\begingroup\def\vspace##1{\vskip##1\relax}%
  \def\captionwidth##1{\captionwidth@##1\relax}%
  \setbox\z@\vbox\bgroup} % start a \vbox
\def\block{\RIfMIfI@\nondmatherr@\block\fi
       \else\ifvmode\vskip\abovedisplayskip\noindent\fi
        $$\def\endblock{\par\egroup$$}\fi
  \vbox\bgroup\advance\hsize-2\indenti\noindent}
\def\endblock{\par\egroup}
\def\cite#1{{\rm[{\m@th#1}]}}

\newcount\endcount@ \endcount@=0 % 0 - \end, 1 - article, 2 - toc
\def\enddocument{%
  \ifnum\endcount@=1
    \insertFundingText
    \insertConflictsText
    \insertOpenAccessText
  \fi
  \endgroup
  \ifcase\endcount@ % 0
    \def\next{\end}
  \or % 1
    \ifnum\@issuenumber>0%
      \def\next{\closedocument}%
    \else
      \def\next{\closetoc\closedocument\end}%
    \fi
  \or % 2
    \def\next{\vfill\eject\endinput}%
  \fi
  \next}
%\let\enddocument\relax
\def\postdoc{\closetoc\vfill}
\def\closedocument{%
 \vskip0.2in
 \beforePublishersNote@
 {\parindent=0\p@\ninepoint\noindent{\bf Publisher's Note}\par
  Pleiades Publishing remains neutral with regard to jurisdictional claims
  in published maps and institutional affiliations.\par
  AI tools may have been used in the translation or editing of this article.\par}%
 \afterPublishersNote@
 \vskip0.2in
 \vbox{\let\\\break%\parskip=2\p@
 \leftskip=\parindent \parindent=0\p@ \rightskip\z@ plus 1fil\relax
 \beforeAffils@
 \ninepoint
 \print@authors@with@affils
 \afterAffils@}%
 \ToAuthorCount@=0\the\ToAuthorToks@
 \writepages\writepagination\writeeot\mark{last article}%
 \vfill\eject\def\filename{}%
 %\let\theepages@\undefined
}

%%%%% biblio
\newskip\aboveheadskip       \aboveheadskip\bigskipamount
\newdimen\belowheadskip      \belowheadskip6\p@
\newdimen\comm@skip

\def\penaltyandskip@#1#2{\relax\ifdim\lastskip<#2\relax\removelastskip
      \ifnum#1=\z@\else\penalty#1\relax\fi\vskip#2%
  \else\ifnum#1=\z@\else\penalty#1\relax\fi\fi}

\newbox\bookbox@
\newbox\bookinfobox@
\newbox\bybox@
\newbox\dtbox@
\newbox\finalinfobox@
\newbox\ignorebox@
\newbox\inbookbox@
\newbox\inbybox@
\newbox\issuebox@
\newbox\jourbox@
\newbox\keybox@
\newbox\langbox@
\newbox\nobox@
\newbox\numbox@
\newbox\pagesbox@
\newbox\paperbox@
\newbox\paperinfobox@
\newbox\preprintbox@
\newbox\publaddrbox@
\newbox\publbox@
\newbox\sizebox@
\newbox\unstructuredbox@
\newbox\urlbox@
\newbox\volbox@
\newbox\yrbox@

\newif\ifrefstarted@
\newif\ifpaperopen@
\newif\ifed@
\newif\ifeds@
\newif\iftoappear@
\newif\ifdoi@

\let\refsfont    \ninepoint
\let\nofont@     \rm
\let\authorfont@ \rm
\let\jourfont@   \rm
\let\bookfont@   \it
\let\doifont@    \rm
\let\urlfont@    \tt

\newdimen\refindentwd
\setbox\z@\hbox{\nofont@ 00.\enspace}
\refindentwd\wd\z@

\def\Refs{%
  \insertFundingText
  \insertConflictsText
  \insertOpenAccessText
  % The following fields are for XML only (so they just fill the unused \ignorebox@):
  \let\By      \ignore
  \let\Prefix  \ignore
  \let\Initials\ignore
  \let\Particle\ignore
  \let\Suffix  \ignore
  \let\Degrees \ignore
  \let\Edition \ignore
  \let\Lang    \ignore
  \let\Yr      \ignore
  \beforeRefs@
  \global\let\ref@type\relax
  \relaxnext@
  \setbox\z@=\hbox{\refsfont\jourfont@.}\comm@skip=\wd\z@
  \def\next@{\ifx\next\nofrills\def\next@\nofrills{\nextii@}
             \else\def\next@{\nextii@{References}}\fi\next@}%
  \def\nextii@##1{\def\@temp{##1}\ifx\@temp\empty\else\penaltyandskip@{-200}\aboveheadskip
                  \line{\hfil\bf\ignorespaces##1\unskip\hfil}\nobreak
                  \vskip\belowheadskip\fi
                  \begingroup\refsfont\sfcode`.=998}%
  \futurelet\next\next@
}

\def\endRefs{\par\afterRefs@\endgroup}

\let\moreref@this\relax % = 1 if the current reference was started by a \moreref
\let\moreref@next\relax % = 1 if the current reference is followed by a \moreref

\def\ref{\begingroup\global\let\moreref@this\relax\global\let\moreref@next\relax\start@ref}
\def\moreref{\global\let\moreref@next1\endref\begingroup\global\let\moreref@this1\global\let\moreref@next\relax\start@ref}

\let\key\undefined

\def\book        {\endrefitem@\setbox\bookbox@         \hbox\bgroup\bookfont@  \def\nocomma{\gdef\book@nocomma{\let\no@comma1}}\ignorespaces}
\def\bookinfo    {\endrefitem@\setbox\bookinfobox@     \hbox\bgroup\nofont@    \ignorespaces}
\def\by          {\endrefitem@\setbox\bybox@           \hbox\bgroup\authorfont@\ignorespaces}
\def\doi         {\endrefitem@\doi@true\setbox\urlbox@ \hbox\bgroup\doifont@   \def\nofrills{\gdef\doi@{}}\def\frills##1{\gdef\doi@{##1}\ignorespaces}\ignorespaces}
\def\dt          {\endrefitem@\setbox\dtbox@           \hbox\bgroup\nofont@    \ignorespaces}
\def\ed          {\endrefitem@\ed@true                      \bgroup\nofont@    \ignorespaces}
\def\eds         {\endrefitem@\ed@true\eds@true             \bgroup\nofont@    \ignorespaces}
\def\etal        {\unskip{{\nofont@\ et~al.}}\ignorespaces}
\def\finalinfo   {\endrefitem@\setbox\finalinfobox@    \hbox\bgroup\nofont@    \ignorespaces}
\def\inbook      {\endrefitem@\setbox\inbookbox@       \hbox\bgroup\bookfont@  \def\nocomma{\gdef\inbook@nocomma{\let\no@comma1}}\ignorespaces}
\def\inby        {\endrefitem@\setbox\inbybox@         \hbox\bgroup\nofont@    \ignorespaces}
\def\issue       {\endrefitem@\setbox\issuebox@        \hbox\bgroup\nofont@    \def\nofrills{\gdef\nom@{}}\def\frills##1{\gdef\nom@{##1}\ignorespaces}\ignorespaces}
\def\jour        {\endrefitem@\setbox\jourbox@         \hbox\bgroup\jourfont@  \ignorespaces}
\def\lang        {\endrefitem@\setbox\langbox@         \hbox\bgroup\nofont@    \ignorespaces}
\def\no          {\endrefitem@\setbox\nobox@           \hbox\bgroup\nofont@    \def\endrefitem@{\unskip.\enspace\egroup}\ignorespaces}
\def\num         {\endrefitem@\setbox\numbox@          \hbox\bgroup\nofont@    \def\nofrills{\gdef\num@{}}\def\frills##1{\gdef\num@{##1}\ignorespaces}\ignorespaces}
\def\size        {\endrefitem@\setbox\sizebox@         \hbox\bgroup\nofont@    \def\nofrills{\gdef\size@{}}\def\frills##1{\gdef\size@{##1}\ignorespaces}\ignorespaces}
\def\pages       {\endrefitem@\setbox\pagesbox@        \hbox\bgroup\nofont@    \def\nofrills{\gdef\pp@{}}\def\frills##1{\gdef\pp@{##1}\ignorespaces}\ignorespaces}
\let\page\pages
\def\paper       {\endrefitem@\setbox\paperbox@        \hbox\bgroup\nofont@    \def\nocomma{\gdef\paper@nocomma{\let\no@comma1}}\ignorespaces}
\def\preprint    {\endrefitem@\setbox\preprintbox@     \hbox\bgroup\bookfont@  \def\nofrills{\gdef\preprint@{}}\def\frills##1{\gdef\preprint@{##1}\ignorespaces}\ignorespaces}
\def\publ        {\endrefitem@\setbox\publbox@         \hbox\bgroup\nofont@    \ignorespaces}
\def\publaddr    {\endrefitem@\setbox\publaddrbox@     \hbox\bgroup\nofont@    \ignorespaces}
\def\toappear    {\endrefitem@\toappear@true                \bgroup\nofont@    \ignorespaces}
\def\unstructured{\endrefitem@\setbox\unstructuredbox@ \hbox\bgroup\nofont@    \ignorespaces}
\def\url         {\endrefitem@\doi@false\setbox\urlbox@\hbox\bgroup\urlfont@   \ignorespaces}
\def\vol         {\endrefitem@\setbox\volbox@          \hbox\bgroup\nofont@    \def\nofrills{\gdef\vv@{}}\def\frills##1{\gdef\vv@{##1}\ignorespaces}\ignorespaces}
\def\yr          {\endrefitem@\setbox\yrbox@           \hbox\bgroup\nofont@    \ignorespaces}

\def\ignore{\endrefitem@\setbox\ignorebox@\hbox\bgroup\def\endrefitem@{\egroup}}

\let\inpress\toappear

\let\no@comma\relax
\def\comma#1{\ifx\no@comma\relax#1\else\let\no@comma\relax\fi}

\def\start@ref{%
  \def\pp@{}\def\vv@{vol.~}\def\nom@{no.~}\def\num@{}\def\size@{~pp.}\def\preprint@{Preprint}\def\doi@{doi~}%
  \refstarted@false\paperopen@false\ed@false\eds@false\toappear@false\doi@false
  \let\no@comma\relax\let\paper@nocomma\relax\let\book@nocomma\relax\let\inbook@nocomma\relax
  \def\nocomma{\errmessage{\string\nocomma\space is only allowed in \string\paper, \string\book, and \string\inbook}}%
  \noindent\hangindent\refindentwd
  \bgroup\let\endrefitem@\egroup\ignorespaces
}

\def\endrefitem@{\unskip\egroup}

\def\close@paper{\ifpaperopen@''\paperopen@false\fi}
\def\insert@text@#1#2{%
  \ifrefstarted@#1\fi
  \close@paper
  \ifrefstarted@\ \fi
  \refstarted@true
  #2%
}
\def\insert@text#1{\insert@text@{\comma,}{#1}}
\def\insert@box@#1#2#3#4{\ifvoid#3\else\insert@text@{#1}{#2\unhbox#3#4}\fi}
\def\insert@box#1#2#3{\insert@box@{\comma,}{#1}{#2}{#3}}
\def\insert@byandpaper{%
  \insert@box{}\bybox@{}%
  \ifvoid\paperbox@\else
    \ifrefstarted@\comma, \fi
    ``\unhbox\paperbox@\paper@nocomma
    \refstarted@true
    \paperopen@true
  \fi
}
\def\insert@once#1{\ifx\once@inserted\relax#1\let\once@inserted1\fi}
\def\insert@book#1#2#3#4{% #1 = optional text "in: ", #2 = "by" box, #3 = "book" box, #4 = \(book|inbook)@nocomma
  \let\once@inserted\relax
  \ifed@\else\insert@box{\insert@once{#1}}#2{}\fi
  \insert@box{\insert@once{#1}}#3{\/}#4%
  \insert@box@{\comma.}{}\bookinfobox@{}%
  \insert@box\vv@\volbox@{}%
  \ifed@\insert@box{\insert@once{#1}}#2{ (ed\ifeds@ s\fi.)}\fi
  \insert@box{}\publbox@{}%
  \insert@box{}\publaddrbox@{}%
  \insert@box@{}(\yrbox@)%
}

\let\ref@unstruct 0
\let\ref@article  1 % ARTICLE: by paper jour (vol | bookinfo)? issue? (pages | num size?) yr toappear? lang? finalinfo? (url|doi)?
                    % ARTICLE toappear: by paper jour toappear lang? finalinfo? (url|doi)?
\let\ref@book     2 % BOOK: by eds? book bookinfo? vol? publ publaddr yr lang? finalinfo? (url|doi)?
\let\ref@inbook   3 % INBOOK: by paper inbook bookinfo? vol? inby? eds? publ? publaddr? yr pages lang? finalinfo? (url|doi)?
\let\ref@preprint 4 % PREPRINT: by preprint bookinfo? issue? publ? publaddr? yr? lang? finalinfo? (url|doi)?
\let\ref@viniti   5 % VINITI: by paper dt? issue lang? finalinfo? (url|doi)?

\def\endref{\endrefitem@
  \ifx\moreref@this\relax
    \ifvoid\nobox@ % this case is inadmissible (\no should be always specified)
      \ifvoid\keybox@\indent\fi % badly designed
    \else
      \hbox to\refindentwd{\hss\unhbox\nobox@}% this should always happen
    \fi
  \fi
  % \ifvoid\keybox@\else % this never happens (since the current definition of \key does not work)
  %   \ifdim\wd\keybox@>\refindentwd\box\keybox@\else\hbox to\refindentwd{\unhbox\keybox@\hfil}\fi
  % \fi
  % Determine \ref@type:
  \ifx\moreref@this\relax
    \global\let\ref@type\relax
    \ifvoid\unstructuredbox@\else % +unstructured => UNSTRUCTURED
      \global\let\ref@type\ref@unstruct
    \fi
    \ifx\ref@type\relax\ifvoid\jourbox@\else % +jour => ARTICLE
      \global\let\ref@type\ref@article
    \fi\fi
    \ifx\ref@type\relax\ifvoid\bookbox@\else\ifvoid\paperbox@ % +book -paper => BOOK
      \global\let\ref@type\ref@book
    \fi\fi\fi
    \ifx\ref@type\relax\ifvoid\inbookbox@\else\ifvoid\paperbox@\else % +inbook +paper => INBOOK
      \global\let\ref@type\ref@inbook
    \fi\fi\fi
    \ifx\ref@type\relax\ifvoid\preprintbox@\else % +preprint => PREPRINT
      \global\let\ref@type\ref@preprint
    \fi\fi
    \ifx\ref@type\relax\ifvoid\paperbox@\else\ifvoid\inbookbox@\ifvoid\publbox@\else % -inbook +paper +publ => VINITI
      \global\let\ref@type\ref@viniti
    \fi\fi\fi\fi
  \fi
  \ifx\ref@type\ref@article % ARTICLE: by paper jour (vol | bookinfo)? issue? (pages | num size?) yr toappear? lang? finalinfo? (url|doi)?
    \insert@byandpaper
    \insert@box{}\jourbox@{}%
    \insert@box{}\bookinfobox@{}%
    \insert@box\vv@\volbox@{}%
    \insert@box\nom@\issuebox@{}%
    \insert@box\num@\numbox@{}%
    \insert@box{}\sizebox@\size@%
    \insert@box\pp@\pagesbox@{}%
    \insert@box@{}(\yrbox@)%
    \iftoappear@\insert@text@{}{(in~press)}\fi
    \final@
  \else\ifx\ref@type\ref@book % BOOK: by eds? book bookinfo? vol? publ publaddr yr lang? finalinfo? (url|doi)?
    \insert@book{}\bybox@\bookbox@\book@nocomma
    \final@
  \else\ifx\ref@type\ref@inbook % INBOOK: by paper inby? eds? inbook bookinfo? vol? publ? publaddr? yr pages lang? finalinfo? (url|doi)?
    \insert@byandpaper
    \insert@book{in: }\inbybox@\inbookbox@\inbook@nocomma
    \insert@box\pp@\pagesbox@{}%
    \final@
  \else\ifx\ref@type\ref@preprint % PREPRINT: by preprint bookinfo? issue? publ? publaddr? yr? lang? finalinfo? (url|doi)?
    \insert@box{}\bybox@{}%
    \insert@box{}\preprintbox@{\/}%
    \ifx\preprint@\empty
      \ifvoid\issuebox@\else\insert@text@{}[\nom@\box\issuebox@]\fi
    \else
      \insert@text@{}[\preprint@\ifvoid\issuebox@\else\comma, \nom@\box\issuebox@\fi]%
    \fi
    \insert@box@{\comma.}{}\bookinfobox@{}%
    \insert@box{}\publbox@{}%
    \insert@box{}\publaddrbox@{}%
    \insert@box@{}(\yrbox@)%
    \final@
  \else\ifx\ref@type\ref@viniti % VINITI: by paper dt? issue lang? finalinfo? (url|doi)?
    \insert@byandpaper
    % The following is in Russian version only (\publ is even required there):
    % \unhbox\publbox@, \unhbox\publaddrbox@, \unhbox\yrbox@, \pp@\box\pagesbox@
    \insert@text{submitted to VINITI}%
    \insert@box@{}{on }\dtbox@{}%
    \insert@box\nom@\issuebox@{}%
    \final@
  \else\ifx\ref@type\ref@unstruct % UNSTRUCTURED
    \unhbox\unstructuredbox@
  \else
    {\bf UNKNOWN REFERENCE TYPE.}%
  \fi\fi\fi\fi\fi\fi
  \ifx\moreref@next\relax\par\else\ \fi
  \endgroup
}

\def\final@{%
  \insert@box@{}[\langbox@]%
  \insert@box@{}(\finalinfobox@)%
  \ifvoid\urlbox@
    \ifx\moreref@next\relax.\else;\fi
    \close@paper
  \else
    .\close@paper\ %
    \ifdoi@\doi@\fi\unhbox\urlbox@
    \ifx\moreref@next\relax\else;\fi
  \fi
}

\def\mref#1{\begingroup\ninepoint\noindent\hangindent\refindentwd
 \hbox to\refindentwd{\hss#1\enspace}\ignorespaces}

\def\endmref{\par\endgroup}

%%% \Origin example: %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% \Origin               % Cannot be used together with \opages
%   \Journal \VMZh      % If omitted, \SMZh is used
%   \Year 2022          % If omitted, the current SMJ year is used
%   \CopyrightYear 2021 % If omitted, \Year or the current SMJ year is used
%   \Volume 12          % Optional (if omitted together with \Journal, the current SMJ volume number is used)
%   \Issue 3            % Optional (if omitted together with \Journal, the current SMJ issue number is used)
%   \Pages 456--467     % Mandatory (must have the form "digits--digits")
%   \DOI 10.23671/VNC.2022.01.23456 % Optional (used in XML only)
% \endOrigin
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\def\SMZh{Sibirskii Matematicheskii Zhurnal}
\def\VMZh{Vladikavkazskii Matematicheskii Zhurnal}

\newbox\o@Journal
\newbox\o@Year
\newbox\o@CopyrightYear
\newbox\o@Volume
\newbox\o@Issue
\newbox\o@LastPage

\let\origin@specified\relax
\def\o@end{\unskip\egroup}

\def\Origin{%
  \ifx\origin@specified1\errmessage{ERROR: \string\Origin\space cannot be used together with \string\opages}\fi\let\origin@specified\@ne
  \setbox\ignorebox@\hbox\bgroup
}
\def\Journal      {\o@end\setbox\o@Journal      \hbox\bgroup\ninepoint\it\ignorespaces}
\def\Year         {\o@end\setbox\o@Year         \hbox\bgroup\ninepoint\sl\ignorespaces}
\def\CopyrightYear{\o@end\setbox\o@CopyrightYear\hbox\bgroup\ninepoint\sl\ignorespaces}
\def\Volume       {\o@end\setbox\o@Volume       \hbox\bgroup\ninepoint\sl\ignorespaces}
\def\Issue        {\o@end\setbox\o@Issue        \hbox\bgroup\ninepoint\sl\ignorespaces}
\def\DOI          {\o@end\setbox\ignorebox@     \hbox\bgroup}
\def\Pages#1--{\o@end\def\o@FirstPage{#1}\setbox\o@LastPage\hbox\bgroup\ninepoint\sl\ignorespaces}
\def\endOrigin{%
  \o@end
  \ifvoid\o@Volume\ifvoid\o@Journal\setbox\o@Volume\hbox{\ninepoint\sl\number\@volume}\fi\fi
  \ifvoid\o@Issue\ifvoid\o@Journal\setbox\o@Issue\hbox{\ninepoint\sl\number\@issuenumber}\fi\fi
  \ifx\o@FirstPage\relax\errmessage{ERROR: \string\Pages\space is absent in \string\Origin}\fi
  \ifvoid\o@Journal\setbox\o@Journal\hbox{\ninepoint\it\SMZh}\fi
  \ifvoid\o@Year\setbox\o@Year\hbox{\ninepoint\sl\number\@issueyear}\fi
  \ifvoid\o@CopyrightYear\setbox\o@CopyrightYear\hbox{\copy\o@Year}\fi
}

%%% TODO engine %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\def\TODO@s{15\p@} % separator
\def\TODO@h{20\p@} % height
\def\TODO@w{30\p@} % width
\def\TODO@t{5\p@}  % thickness
\def\TODO@start{\raise\baselineskip\hbox{\vrule height\z@ depth\TODO@h width\TODO@t\vrule height\z@ depth\TODO@t width\TODO@w}}
\def\TODO@end  {\raise\baselineskip\hbox{\vrule height\TODO@h depth\z@ width\TODO@t\vrule height\TODO@t depth\z@ width\TODO@w}}

\newtoks\TODO@savedEverypar
\newcount\TODO@count
\let\TODO@armed\relax

\def\TODO@smash#1{\setbox\z@=\hbox{#1}\ht\z@=\z@\dp\z@=\z@\box\z@} % Plain-compatible smash (no \leavevmode)
\def\TODO@inject#1{\vadjust{\TODO@smash{\llap{#1\hskip\TODO@s}}}}
\def\TODO@do{%
  \ifnum\TODO@count=\@ne
    \TODO@inject\TODO@start
  \else
    \TODO@inject\TODO@end
  \fi
}
\def\TODO@restore{\global\everypar=\TODO@savedEverypar\global\let\TODO@armed\relax}

\def\TODO{%
  \global\advance\TODO@count\@ne
  \ifnum\TODO@count>\tw@\errmessage{\string\TODO\space is called more than twice}\fi
  \ifvmode
    \ifx\TODO@armed\relax
      \global\TODO@savedEverypar=\everypar
      \global\everypar{\the\TODO@savedEverypar\TODO@do\TODO@restore}%
      \global\let\TODO@armed\@ne
    \fi
  \else
    \TODO@do
  \fi
  \ifnum\TODO@count=\tw@\Rus\fi
}

%%% XML-related macros %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\def\xmlOnly@#1{\errmessage{#1 is allowed only in XML mode}\fi}

\def\file#1{\xmlOnly@{\string\file}}

\long\def\fortex#1{#1}
\long\def\forxml#1{}
\long\def\iftex#1\else#2\fi{#1}
\long\def\ifxml#1\else#2\fi{#2}

\newif\ifTestXML@
\def\TestXML{%
  \TestXML@true
  \long\def\fortex##1{}%
  \long\def\forxml##1{##1}%
  \long\def\iftex##1\else##2\fi{##2}%
  \long\def\ifxml##1\else##2\fi{##1}%
  \def\file##1{\text{\tt[File]}}%
}

\let\@onlinedatewritten\relax
\def\OnlineDate#1\endOnlineDate{%
  \ifDataOpen\ifx\@onlinedatewritten\relax
    \write\Datafile{OnlineDate #1}%
    \global\let\@onlinedatewritten\@ne
  \fi\fi
}

\def\@updateyear{}
\def\Change#1\Date#2.#3\endChange{\gdef\@updateyear{#2}}
  \let\Date    \relax
  \let\Details \relax

\def\Keywords#1\endKeywords{}
  \let\Keyword\relax

\newif\ifMath@ \newif\ifDisplay@
\everymath{\Math@true}
\everydisplay{\Math@true\Display@true}

\def\textOnly@#1{\ifMath@\errmessage{#1 is not allowed in a formula}\fi}
\def\notInlineMath@#1{\ifMath@\ifDisplay@\else\errmessage{#1 is not allowed in an inline formula}\fi\fi}

\def\Sec#1#2{\textOnly@{\string\Sec}{#2}}
\def\Par#1#2{\textOnly@{\string\Par}{#2}}
\def\Equ#1#2{\textOnly@{\string\Equ}{#2}}
\def\EquTag#1#2{\textOnly@{\string\EquTag}{#2}}
\def\Tag(#1){\textOnly@{\string\Tag}{{\rm(#1)}}}
\def\Fig#1#2{\textOnly@{\string\Fig}{#2}}
\def\Tab#1#2{\textOnly@{\string\Tab}{#2}}
\def\Url#1#2{\textOnly@{\string\Url}{#2}}
\def\Label#1{\notInlineMath@{\string\Label}\ignorespaces}

\let\openindex\relax
\let\closeindex\relax
\let\issuedate\relax
\let\endissuedate\relax

\let\opname\qopname@
\let\opnamewithlimits\qopnamewl@

\input@{smjmac.tex}

\language0
\xipoint

\ifx\fontprefix\fontprefixla
\font\smc=lacc1000
\font\sc=lacc1000\fi
\catcode`\@=\active
\endinput