diff options
author | Karl Berry <karl@freefriends.org> | 2013-11-19 00:56:32 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2013-11-19 00:56:32 +0000 |
commit | 0c16ddd29d43c785b867739f9b8fad8885ee548b (patch) | |
tree | 7402f2695ae367f7c96dba3224b4f1158900f077 /Master/texmf-dist/tex/latex/xymtex/chemist/chemist.sty | |
parent | 717e7ac16b923e6683f358eab146a2a96a46d7e4 (diff) |
xymtex (now lppl, minus manuals without sources)
git-svn-id: svn://tug.org/texlive/trunk@32182 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/xymtex/chemist/chemist.sty')
-rw-r--r-- | Master/texmf-dist/tex/latex/xymtex/chemist/chemist.sty | 1492 |
1 files changed, 1492 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/xymtex/chemist/chemist.sty b/Master/texmf-dist/tex/latex/xymtex/chemist/chemist.sty new file mode 100644 index 00000000000..a633df70a03 --- /dev/null +++ b/Master/texmf-dist/tex/latex/xymtex/chemist/chemist.sty @@ -0,0 +1,1492 @@ +%% +%% This is file `chemist.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% chemist.dtx (with options: `chemist') +%% +%% This is a generated file. +%% +%% Copyright 1996, 2000, 2001, 2004, 2005, 2009, 2010, 2013 by Shinsaku Fujita6 +%% +%% This file is part of the ChemSci system. +%% ======================================= +%% +%% Released on June 1, 1996 +%% Released on November 3, 2000 (v2.00a) +%% Released on June 20, 2001 (v2.01) +%% Released on August 30, 2004 (v4.01) +%% Released on November 17, 2004 (v4.01b) +%% Released on December 02, 2004 (v4.01c) +%% Released on September 02, 2005 (v4.03) +%% Released on October 25, 2009 (v4.04) +%% Released on November 08, 2009 (v4.05) +%% Released on November 21, 2010 (v5.00a) bug fix +%% Released on June 06, 2013 (v5.01) bug fix +%% +%% Copyright (C) 1996, 2000, 2001, 2004, 2005, 2009, 2010, 2013 by Shinsaku Fujita, all rights reserved. +%% This style file is created for submitting a manuscript to +%% scientific journals. This style file is to be contained in the +%% ``chemist'' or ``xymtex'' directory which is an input directory for TeX. +%% +%% For using this file, see +%% Shinsaku Fujita, ``LaTeX for Chemists and Biochemists'' +%% Tokyo Kagaku Dojin, Tokyo (1993), Chapter 16. +%% +%% For PostScript output, use chmst-ps.sty together with chemist.sty. +%% +%% Copying of this file is authorized only if either +%% +%% (1) you make absolutely no changes to your copy, including name and +%% directory name +%% (2) if you do make changes, +%% (a) you name it something other than the names included in the +%% ``chemist'' directory and +%% (b) you acknowledge the original name. +%% This restriction ensures that all standard styles are identical. +%% +%% ======================================= +%% +%% This file is a modification of latex.tex (LaTeX2.09) and of latex.ltx +%% (a LaTeX2e), the reused parts of which is subject to +%% Copyright 1994 the LaTeX3 project and the individual authors (For further +%% copyright information see the file legal.txt of the LaTeX2e standard +%% distribution, and any other copyright indicated in this file.) +%% +%%%%%%%%%% +%%%%%%%%%% +%%%%%%%%%% +%%%%%%%%%% +%%%%%%%%%% +%%%%%%%%%% +%%%%%%%%%% +%% \CharacterTable +%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z +%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z +%% Digits \0\1\2\3\4\5\6\7\8\9 +%% Exclamation \! Double quote \" Hash (number) \# +%% Dollar \$ Percent \% Ampersand \& +%% Acute accent \' Left paren \( Right paren \) +%% Asterisk \* Plus \+ Comma \, +%% Minus \- Point \. Solidus \/ +%% Colon \: Semicolon \; Less than \< +%% Equals \= Greater than \> Question mark \? +%% Commercial at \@ Left bracket \[ Backslash \\ +%% Right bracket \] Circumflex \^ Underscore \_ +%% Grave accent \` Left brace \{ Vertical bar \| +%% Right brace \} Tilde \~} +%% +%% `chemist.dtx' ver1.01a (for LaTeX2e) 1996/06/15 +%% `chemist.dtx' ver1.02 (for LaTeX2e) 2009/11/08 +%% `chemist.dtx' ver5.00 (for LaTeX2e) 2010/10/01 +%% `chemist.dtx' ver5.00a (for LaTeX2e) 2010/11/21 +%% by Shinsaku Fujita +%% + +%%%%%%%% +\def\j@urnalname{chemist} \def\journalID{chemist} +\def\versi@ndate{June 6, 2013} +\def\versi@nno{ver5.01} +\def\copyrighth@lder{SF} % Shinsaku Fujita +%%%%%%%%%% +\typeout{Package `\j@urnalname' (\versi@nno) <\versi@ndate>\space +[\copyrighth@lder]} +\typeout{chemist.sty ver5.01 (for LaTeX2e) 2013/06/06[SF]} +\@ifundefined{ifchemtimes}{\newif\ifchemtimes}{}%from chemtimes +\@ifundefined{if@chemtimes}{\newif\if@chemtimes}{} +\@ifundefined{if@@chemtimes}{\newif\if@@chemtimes}{}%from chemtimes +\DeclareOption{chemtimes}{\@chemtimestrue} +\@chemtimesfalse +\ProcessOptions +\if@chemtimes +\if@@chemtimes\else +\ifchemtimes\else + \PackageError{chemist} + {The option ``chemtimes'' is not permitted} + {You should use this option after the chemtimes package is loaded} +\fi\fi\fi +\@ifundefined{chapter}{\newcounter{compd}}{\newcounter{compd}[chapter]} +\def\thecompd{\arabic{compd}} +\def\compd{\leavevmode\refstepcounter{compd}{\large\bf \thecompd}} +\def\nocompd{\refstepcounter{compd}} +\def\compdlabel#1{\compd \label{#1}} +\def\nocompdlabel#1{\nocompd \label{#1}} +\@ifundefined{bf}{\def\bf{\normalfont\bfseries}}{} +\def\cref#1{{\bf \ref{#1}}} +\def\compdfbox#1#2#3{\framebox[#1]{\rule[-0.3mm]{0pt}{#2} #3 }} +\def\compdmbox#1#2#3{\makebox[#1]{\rule[-0.3mm]{0pt}{#2} #3 }} +\def\lbcompdpbox#1#2#3{\parbox{#2}{\vskip 2em + \parbox{#2}{#3 \par \centering{\compdlabel{#1}}\vskip 2em }}} +\newcounter{deriv}[compd] +\def\thederiv {\thecompd\alph{deriv}} +\def\deriv{\leavevmode\refstepcounter{deriv}{\large\bf \thederiv}} +\def\noderiv{\refstepcounter{deriv}} +\def\derivnum{% +\leavevmode\refstepcounter{deriv}{\large\bf \alph{deriv}}} +\def\derivlabel#1{\deriv \label{#1}} +\def\noderivlabel#1{\noderiv \label{#1}} +\def\derivfbox#1#2#3{\framebox[#1]{\rule[-0.3mm]{0pt}{#2} #3 }} +\def\derivmbox#1#2#3{\makebox[#1]{\rule[-0.3mm]{0pt}{#2} #3 }} +\def\lbderivpbox#1#2#3{\parbox{#2}{\vskip 2em + \parbox{#2}{#3 \par \centering{\derivlabel{#1}}\vskip 2em }}} +\def\deriva{\leavevmode\refstepcounter{deriv}{\large\bf \alph{deriv}}} +\def\noderiva{\refstepcounter{deriv}} +\def\derivalabel#1{\deriva \label{#1}} +\def\noderivalabel#1{\noderiva \label{#1}} +\def\cdonecell#1#2#3{\raisebox{#1}{\parbox{#2}{\centering{#3}}}} +\def\cdtwocell#1#2#3#4{\raisebox{#1}{ + \parbox{#2}{\centering{#3} \par \vskip 3pt \centering{#4} }}} +\def\leftrightarrowfill{$\m@th \mathord\leftarrow \mkern-6mu + \cleaders\hbox{$\mkern-2mu \mathord- \mkern-2mu$}\hfill + \mkern-6mu \mathord\rightarrow$} +\def\Leftarrowfill{$\m@th \mathord\Leftarrow \mkern-6mu + \cleaders\hbox{$\mkern-2mu \mathord= \mkern-2mu$}\hfill + \mkern-6mu \mathord=$} +\def\Rightarrowfill{$\m@th \mathord= \mkern-6mu + \cleaders\hbox{$\mkern-2mu \mathord= \mkern-2mu$}\hfill + \mkern-6mu \mathord\Rightarrow$} +\def\Leftrightarrowfill{$\m@th \mathord\Leftarrow \mkern-6mu + \cleaders\hbox{$\mkern-2mu \mathord= \mkern-2mu$}\hfill + \mkern-6mu \mathord\Rightarrow$} +\newdimen\reactarrowsep +\def\reactarrowseprate{1.0} +\reactarrowsep=0pt +\def\oldreactrarrow{\@ifnextchar[{\oldreact@rarrow}{\oldreact@rarrow[0pt]}} +\def\oldreact@rarrow[#1]#2#3#4#5{\ensuremath{\mathbin{\hskip#1\raisebox{#2}{% + \parbox{#3}{\centering + \baselineskip=.8\normalbaselineskip \ChemStrut{#4}\par + \vskip-0.2\normalbaselineskip\vskip\reactarrowsep + \leavevmode\rightarrowfill \par + \vskip\reactarrowseprate\reactarrowsep + \vskip-0.1\normalbaselineskip\ChemStrut{#5}}}}}} +\def\oldreactlarrow{\@ifnextchar[{\oldreact@larrow}{\oldreact@larrow[0pt]}} +\def\oldreact@larrow[#1]#2#3#4#5{\ensuremath{\mathbin{\hskip#1\raisebox{#2}{% + \parbox{#3}{\centering + \baselineskip=.8\normalbaselineskip \ChemStrut{#4}\par + \vskip-0.2\normalbaselineskip\vskip\reactarrowsep + \leavevmode\leftarrowfill \par + \vskip\reactarrowseprate\reactarrowsep + \vskip-0.1\normalbaselineskip\ChemStrut{#5}}}}}} +\def\oldreactlrarrow{\@ifnextchar[{\oldreact@lrarrow}{\oldreact@lrarrow[0pt]}} +\def\oldreact@lrarrow[#1]#2#3#4#5{\ensuremath{\mathbin{\hskip#1\raisebox{#2}{% + \parbox{#3}{\centering + \baselineskip=.8\normalbaselineskip + \ChemStrut{#4}\par + \vskip-0.2\normalbaselineskip\vskip\reactarrowsep + \leavevmode\centering{\leftrightarrowfill} \par + \vskip\reactarrowseprate\reactarrowsep + \vskip-0.1\normalbaselineskip\ChemStrut{#5}}}}}} +\def\oldreacteqarrow{\@ifnextchar[{\oldreact@eqarrow}{\oldreact@eqarrow[0pt]}} +\def\oldreact@eqarrow[#1]#2#3#4#5{\ensuremath{\mathbin{\hskip#1\raisebox{#2}{% + \parbox{#3}{\centering + \baselineskip=.8\normalbaselineskip + \ChemStrut{#4}\par + \vskip-0.2\normalbaselineskip\vskip\reactarrowsep + \leavevmode\rightarrowfill \par \vskip-0.55\normalbaselineskip% + \leavevmode\leftarrowfill \par + \vskip\reactarrowseprate\reactarrowsep + \vskip-0.1\normalbaselineskip\ChemStrut{#5}}}}}} +%%%%%%2009/11/19 +\def\eqlbarrowstretch{0.6}%reduction rate of arrow length +\def\oldreactreqarrow{\@ifnextchar[{\oldreact@reqarrow}{\oldreact@reqarrow[0pt]}} +\def\oldreact@reqarrow[#1]#2#3#4#5{\ensuremath{\mathbin{\hskip#1\raisebox{#2}{% + \parbox{#3}{\centering\dimen0=#3 + \baselineskip=.8\normalbaselineskip + \ChemStrut{#4}\par + \vskip-0.2\normalbaselineskip\vskip\reactarrowsep + \leavevmode\rightarrowfill \par \vskip-0.55\normalbaselineskip% + \leavevmode\hbox to\eqlbarrowstretch\dimen0{\leftarrowfill} \par + \vskip\reactarrowseprate\reactarrowsep + \vskip-0.1\normalbaselineskip\ChemStrut{#5}}}}}} +\def\oldreactleqarrow{\@ifnextchar[{\oldreact@leqarrow}{\oldreact@leqarrow[0pt]}} +\def\oldreact@leqarrow[#1]#2#3#4#5{\ensuremath{\mathbin{\hskip#1\raisebox{#2}{% + \parbox{#3}{\centering\dimen0=#3 + \baselineskip=.8\normalbaselineskip + \ChemStrut{#4}\par + \vskip-0.2\normalbaselineskip\vskip\reactarrowsep + \leavevmode\hbox to\eqlbarrowstretch\dimen0{\rightarrowfill} \par + \vskip-0.55\normalbaselineskip% + \leavevmode\leftarrowfill \par + \vskip\reactarrowseprate\reactarrowsep + \vskip-0.1\normalbaselineskip\ChemStrut{#5}}}}}} +%%%%%2009/11/19 +\def\k@nz@n#1{\@tempdima=#1\relax +\@tempcnta=\@tempdima \@tempcntb=\unitlength +\divide\@tempcnta by \@tempcntb +\edef\kanzanchi{\the\@tempcnta}% +\divide\@tempcnta by2\relax +\edef\kanzanhalf{\the\@tempcnta}} +\def\oldreactdarrow{\@ifnextchar[{\oldreact@darrow}{\oldreact@darrow[0pt]}} +\def\oldreact@darrow[#1]#2#3#4#5{\hskip#1\raisebox{#2}{\k@nz@n{#3}% +\def\arraystretch{0.8}% +\begin{tabular}{l}#4\end{tabular}% +{\tabcolsep=0pt +\begin{tabular}{c}\begin{sfpicture}(0,\kanzanchi)(0,0) +\Put@Direct(0,\kanzanchi){\vector(0,-1){\kanzanchi}} +\end{sfpicture}\end{tabular}}% +\begin{tabular}{l}#5\end{tabular}}} +\def\oldreactuarrow{\@ifnextchar[{\oldreact@uarrow}{\oldreact@uarrow[0pt]}} +\def\oldreact@uarrow[#1]#2#3#4#5{\hskip#1\raisebox{#2}{\k@nz@n{#3}% +\def\arraystretch{0.8}% +\begin{tabular}{l}#4\end{tabular}% +{\tabcolsep=0pt +\begin{tabular}{c}\begin{sfpicture}(0,\kanzanchi)(0,0) +\Put@Direct(0,0){\vector(0,1){\kanzanchi}} +\end{sfpicture}\end{tabular}}% +\begin{tabular}{l}#5\end{tabular}}} +\def\oldreactveqarrow{\@ifnextchar[%] +{\oldreact@veqarrow}{\oldreact@veqarrow[0pt]}} +\def\oldreact@veqarrow[#1]#2#3#4#5{\hskip#1\raisebox{#2}{\k@nz@n{#3}% +\def\arraystretch{0.8}% +\begin{tabular}{l}#4\end{tabular}% +{\tabcolsep=0pt +\begin{tabular}{c}\begin{sfpicture}(40,\kanzanchi)(0,0) +\Put@Direct(40,0){\vector(0,1){\kanzanchi}}% +\Put@Direct(0,\kanzanchi){\vector(0,-1){\kanzanchi}}% +\end{sfpicture}\end{tabular}}% +\begin{tabular}{l}#5\end{tabular}}} +\def\oldreactduarrow{\@ifnextchar[{\oldreact@duarrow}{\oldreact@duarrow[0pt]}} +\def\oldreact@duarrow[#1]#2#3#4#5{\hskip#1\raisebox{#2}{\k@nz@n{#3}% +\def\arraystretch{0.8}% +\begin{tabular}{l}#4\end{tabular}% +{\tabcolsep=0pt +\begin{tabular}{c}\begin{sfpicture}(0,\kanzanchi)(0,0) +\Put@Direct(0,\kanzanhalf){\vector(0,1){\kanzanhalf}}% +\Put@Direct(0,\kanzanhalf){\vector(0,-1){\kanzanhalf}}% +\end{sfpicture}\end{tabular}}% +\begin{tabular}{l}#5\end{tabular}}} +%%%%2009/11/19 +\def\oldreactsearrow{\@ifnextchar[{\oldreact@searrow}{\oldreact@searrow[0pt]}} +\def\oldreact@searrow[#1]#2#3#4#5{\hskip#1\raisebox{#2}{\k@nz@n{#3}% +\def\arraystretch{0.8}% +\begin{sfpicture}(\kanzanchi,\kanzanchi)(0,0) +\Put@Direct(0,\kanzanchi){\vector(1,-1){\kanzanchi}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\hbox to0pt{% +\begin{tabular}[b]{l}#4\end{tabular}\hss}} +\Put@Direct(\kanzanhalf,\kanzanhalf){\lower2ex\hbox to0pt{\hss +\begin{tabular}[t]{r}#5\end{tabular}}}% +\end{sfpicture}}} +\def\oldreactnwarrow{\@ifnextchar[{\oldreact@nwarrow}{\oldreact@nwarrow[0pt]}} +\def\oldreact@nwarrow[#1]#2#3#4#5{\hskip#1\raisebox{#2}{\k@nz@n{#3}% +\def\arraystretch{0.8}% +\begin{sfpicture}(\kanzanchi,\kanzanchi)(0,0)% +\Put@Direct(\kanzanchi,0){\vector(-1,1){\kanzanchi}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\hbox to0pt{% +\begin{tabular}[b]{l}#4\end{tabular}\hss}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\lower2ex\hbox to0pt{\hss +\begin{tabular}[t]{r}#5\end{tabular}}}% +\end{sfpicture}}} +\def\oldreactnearrow{\@ifnextchar[{\oldreact@nearrow}{\oldreact@nearrow[0pt]}} +\def\oldreact@nearrow[#1]#2#3#4#5{\hskip#1\raisebox{#2}{\k@nz@n{#3}% +\def\arraystretch{0.8}% +\begin{sfpicture}(\kanzanchi,\kanzanchi)(0,0) +\Put@Direct(0,0){\vector(1,1){\kanzanchi}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\lower2ex\hbox to0pt{% +\begin{tabular}[t]{l}#5\end{tabular}\hss}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\hbox to0pt{\hss +\begin{tabular}[b]{r}#4\end{tabular}}}% +\end{sfpicture}}} +\def\oldreactswarrow{\@ifnextchar[{\oldreact@swarrow}{\oldreact@swarrow[0pt]}} +\def\oldreact@swarrow[#1]#2#3#4#5{\hskip#1\raisebox{#2}{\k@nz@n{#3}% +\def\arraystretch{0.8}% +\begin{sfpicture}(\kanzanchi,\kanzanchi)(0,0)% +\Put@Direct(\kanzanchi,\kanzanchi){\vector(-1,-1){\kanzanchi}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\lower2ex\hbox to0pt{% +\begin{tabular}[t]{l}#5\end{tabular}\hss}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\hbox to0pt{\hss +\begin{tabular}[b]{r}#4\end{tabular}}}% +\end{sfpicture}}} +%%%%%2009/11/19 +\def\oldreactdeqarrow{\@ifnextchar[%] +{\oldreact@deqarrow}{\oldreact@deqarrow[0pt]}} +\def\oldreact@deqarrow[#1]#2#3#4#5{\hskip#1\raisebox{#2}{\k@nz@n{#3}% +\def\arraystretch{0.8}% +\begin{sfpicture}(\kanzanchi,\kanzanchi)(0,0)% +\Put@Direct(0,\kanzanchi){\Put@Direct(15,15){\vector(1,-1){\kanzanchi}}}% +\Put@Direct(\kanzanchi,0){\Put@Direct(-15,-15){\vector(-1,1){\kanzanchi}}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\raise1ex\hbox to0pt{% +\begin{tabular}[b]{l}#4\end{tabular}\hss}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\lower2ex\hbox to0pt{\hss +\begin{tabular}[t]{r}#5\end{tabular}}}% +\end{sfpicture}}} +\def\oldreactueqarrow{\@ifnextchar[%] +{\oldreact@ueqarrow}{\oldreact@ueqarrow[0pt]}} +\def\oldreact@ueqarrow[#1]#2#3#4#5{\hskip#1\raisebox{#2}{\k@nz@n{#3}% +\def\arraystretch{0.8}% +\begin{sfpicture}(\kanzanchi,\kanzanchi)(0,0) +\Put@Direct(0,0){\Put@Direct(-15,15){\vector(1,1){\kanzanchi}}} +\Put@Direct(\kanzanchi,\kanzanchi){\Put@Direct(15,-15){\vector(-1,-1){\kanzanchi}}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\lower2ex\hbox to0pt{% +\begin{tabular}[t]{l}#5\end{tabular}\hss}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\raise1ex\hbox to0pt{\hss +\begin{tabular}[b]{r}#4\end{tabular}}}% +\end{sfpicture}}} +\def\oldreactulrarrow{\@ifnextchar[%] +{\oldreact@ulrarrow}{\oldreact@ulrarrow[0pt]}} +\def\oldreact@ulrarrow[#1]#2#3#4#5{\hskip#1\raisebox{#2}{\k@nz@n{#3}% +\def\arraystretch{0.8}% +\begin{sfpicture}(\kanzanchi,\kanzanchi)(0,0)% +\Put@Direct(\kanzanhalf,\kanzanhalf){\vector(1,1){\kanzanhalf}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\vector(-1,-1){\kanzanhalf}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\lower2ex\hbox to0pt{% +\begin{tabular}[t]{l}#5\end{tabular}\hss}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\raise1ex\hbox to0pt{\hss +\begin{tabular}[b]{r}#4\end{tabular}}}% +\end{sfpicture}}} +\def\oldreactdlrarrow{\@ifnextchar[%] +{\oldreact@dlrarrow}{\oldreact@dlrarrow[0pt]}} +\def\oldreact@dlrarrow[#1]#2#3#4#5{\hskip#1\raisebox{#2}{\k@nz@n{#3}% +\def\arraystretch{0.8}% +\begin{sfpicture}(\kanzanchi,\kanzanchi)(0,0)% +\Put@Direct(\kanzanhalf,\kanzanhalf){\vector(-1,1){\kanzanhalf}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\vector(1,-1){\kanzanhalf}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\hbox to0pt{% +\begin{tabular}[b]{l}#4\end{tabular}\hss}}% +\Put@Direct(\kanzanhalf,\kanzanhalf){\lower2ex\hbox to0pt{\hss +\begin{tabular}[t]{r}#5\end{tabular}}}% +\end{sfpicture}}} +%%%%%2009/11/19 +\def\oldschemelarrow#1#2#3#4{\raisebox{#1}{% + \parbox{#2}{\centering + \baselineskip=.8\normalbaselineskip #3 \par + \vskip-0.2\normalbaselineskip + \centering{\Leftarrowfill} \par + \vskip-0.1\normalbaselineskip #4}}} +\def\oldschemerarrow#1#2#3#4{\raisebox{#1}{% + \parbox{#2}{\centering + \baselineskip=.8\normalbaselineskip #3 \par + \vskip-0.2\normalbaselineskip + \centering{\Rightarrowfill} \par + \vskip-0.1\normalbaselineskip #4}}} +\def\oldschemelrarrow#1#2#3#4{\raisebox{#1}{% + \parbox{#2}{\centering + \baselineskip=.8\normalbaselineskip #3 \par + \vskip-0.2\normalbaselineskip + \centering{\Leftrightarrowfill} \par + \vskip-0.1\normalbaselineskip #4}}} +%%%%2009/11/19 +\def\ChemStrut{\mbox{\vphantom{A}}} +\def\changespace#1{\def\baselinestretch{#1} \@normalsize} +\def\tbcaption{\def\@captype{table}\caption} +\def\fgcaption{\def\@captype{figure}\caption} +\def\smcaption{\def\@captype{scheme}\caption} +%%%%%%%%%%%1991 November 7%%%chapinitial%%%%%%%%%%%%% +\def\chap@initial#1% +{\medbreak\begingroup\clubpenalty=10000 + \def\par{\endgraf\endgroup\medbreak} + \noindent\hangindent28pt\hangafter=-2 +\hbox to0pt{\hskip-\hangindent +\hbox to28pt{\hss\raise-4pt\hbox{\lower3pt\hbox{\Huge\bf #1}} } +} \hskip-5pt plus2pt minus2pt} +\outer\def\chapinitial{\chap@initial} +\def\yen{\leavevmode\hbox{\setbox0=\hbox{Y}% +\setbox1=\vbox{\hrule height.05\ht0 width.96\wd0% +\kern.18\ht0\hrule height.05\ht0 width.96\wd0}% +\setbox1=\hbox to\wd0{\raise.3\ht0\box1\hss}% +{\ooalign{\hfil\box1\hfil\crcr\box0}}}} +\newif\ifverbswitch \verbswitchtrue +\let\old@verbatim\@verbatim +\let\old@xverbatim\@xverbatim +\let\old@sxverbatim\@sxverbatim +\begingroup + \catcode`\|=0 \catcode`\\=13 + |gdef|verbh@@k{|catcode`|\=13 |let\=|yen} +|endgroup +\def\verb{\begingroup \catcode``=13 \@noligs + \tt \let\do\@makeother \dospecials + \ifverbswitch \verbh@@k \fi \@ifstar{\@sverb}{\@verb}} +\begingroup +\catcode`|=0 \catcode`[=1 \catcode`]=2 +\catcode`\{=12 \catcode`\}=12 \catcode`\\=13 +|gdef|@xverbatim#1\end{verbatim}[#1|end[verbatim]] +|gdef|@sxverbatim#1\end{verbatim*}[#1|end[verbatim*]] +|endgroup +\newdimen\verbatimleftmargin \verbatimleftmargin\leftmargini +\newdimen\verbatimbaselineskip \verbatimbaselineskip11pt +\def\verbatimsize{\small} +\def\@verbatim{\trivlist \item[]% + \if@minipage \else \vskip\baselineskip% + \vskip-\verbatimbaselineskip \vskip\parskip\fi + \leftskip\@totalleftmargin + \if@minipage \else \advance\leftskip\verbatimleftmargin \fi + \rightskip\z@ \parindent\z@ \parfillskip\@flushglue \parskip\z@ + \@tempswafalse \def\par{\if@tempswa\hbox{}\fi\@tempswatrue\@@par} + \obeylines \verbatimsize \baselineskip\verbatimbaselineskip \tt + \catcode``=13 \@noligs \let\do\@makeother \dospecials} +\def\verbatim{\ifverbswitch \@verbatim \else \old@verbatim \fi +\frenchspacing \@vobeyspaces +\ifverbswitch \verbh@@k \@xverbatim \else \old@xverbatim \fi} +\@namedef{verbatim*}{% + \ifverbswitch \@verbatim \verbh@@k \@sxverbatim + \else \old@verbatim \old@sxverbatim \fi} +\def\@sverb#1{\def\@tempa ##1#1{##1\endgroup}\@tempa} +\def\@verb{\obeyspaces \frenchspacing \@sverb} +\def\@sverbtim{\obeyspaces\@verbatim} +\let\endverbatim=\endtrivlist +\@namedef{varbatim*}{\@verbatim\@sxverbatim} +\expandafter\let\csname endverbatim*\endcsname =\endtrivlist +\long\def\fb@xit#1#2#3#4{% +\setbox4=\vbox{\hsize#3\noindent#4}% +\vbox{\hrule\@height#1\hbox{\vrule\@width#1\kern#2\vbox{% +\kern#2\box4\kern#2}\kern#1\vrule\@width#1}\hrule\@height#1}} +\long\def\fboxit#1#2{\fb@xit{\fboxrule}{\fboxsep}{#1}{#2}} +\long\def\leftshfr@me#1#2#3#4{\leavevmode% + \vbox{\hbox{\hsize #3\vbox{% + \hbox{\vrule\@width #1% + \vbox{\kern-#1\fb@xit{% + \fboxrule}{#2}{#3}{#4}\kern-\fboxrule}\kern-#1}% + \hrule\@height#1}}}\strut\hskip #1\relax} +\long\def\leftshframe#1#2{% + \leftshfr@me{\fboxsep}{\fboxsep}{#1}{#2}} +\long\def\leftshfbox#1{\leavevmode\setbox0=\hbox{\fbox{#1}}% + \vbox{\hbox{\vbox{\hbox{\vrule\@width\fboxsep\vbox{% + \kern-\fboxsep\box0\kern-\fboxrule}\kern-\fboxsep}% + \hrule\@height\fboxsep}}}\hskip\fboxsep\relax} %%%% +\long\def\rightshfr@me#1#2#3#4{\leavevmode% + \vbox{\hbox{\kern#1\vbox{\hsize#3\vbox{\kern-#1\hbox{% + \kern-#1\fb@xit{\fboxrule}{#2}{#3}{#4}}\hrule\@height#1}}% + \vrule\@width#1}}\strut} +\long\def\rightshframe#1#2{% + \rightshfr@me{\fboxsep}{\fboxsep}{#1}{#2}} +\long\def\rightshfbox#1{\leavevmode% + \vbox{\hbox{\kern\fboxsep\vbox{\vbox{\kern-\fboxsep\hbox{% + \kern-\fboxsep\fbox{#1}}\hrule\@height\fboxsep}}% + \vrule\@width\fboxsep}}} +\def\ffboxit{\par\vskip1pc\hfil\vbox\bgroup + \hrule\hbox\bgroup\vrule\kern3pt\vbox\bgroup\kern3pt} +\def\endffboxit{\kern3pt\egroup\kern3pt\vrule\egroup\hrule\egroup + \hfil\\} +\def\ffparbox#1#2{\vbox{\hsize=#1 \noindent\strut #2\strut}} +\long\def\fr@meboxit#1#2#3{\gdef\fr@meline{#1}\gdef\fr@mesp{#2}% + \global\setbox4=\hbox\bgroup\minipage{#3}} +\def\endfr@meboxit{\endminipage\egroup% + \hbox{\vbox{\hrule\@height\fr@meline% + \hbox{\vrule\@width\fr@meline\kern\fr@mesp% + \vbox{\kern\fr@meline\kern\fr@mesp\box4\kern\fr@mesp}% + \kern\fr@mesp}\hrule\@height\fr@meline}% + \vrule\@width\fr@meline}} +\def\frameboxit#1{\leavevmode\fr@meboxit{\fboxrule}{\fboxsep}{#1}} +\let\endframeboxit=\endfr@meboxit +\def\lshfr@meboxit#1#2#3#4{\gdef\sh@hwidth{#1}\gdef\sh@vwidth{#2}% +\leavevmode% + \vbox\bgroup\hbox\bgroup\hsize #4\vbox\bgroup% + \hbox\bgroup\vrule\@width\sh@vwidth% + \vbox\bgroup\kern-\sh@hwidth\fr@meboxit{\fboxrule}{#3}{#4}} +\def\endlshfr@meboxit{\endfr@meboxit%%%%\kern-\fboxrule + \egroup\kern-\sh@vwidth\egroup% + \hrule\@height\sh@hwidth\egroup\egroup\egroup% + \strut\kern\sh@hwidth\relax} +\def\lshfboxit#1{\leavevmode% + \lshfr@meboxit{\fboxsep}{\fboxsep}{\fboxsep}{#1}} +\let\endlshfboxit=\endlshfr@meboxit +\def\rshfr@meboxit#1#2#3#4{% + \gdef\sh@hwidth{#1}\gdef\sh@vwidth{#2}% + \leavevmode% + \vbox\bgroup\hbox\bgroup\kern\sh@vwidth% + \vbox\bgroup\hsize#4\vbox\bgroup% + \kern-\sh@hwidth\hbox\bgroup\kern-\sh@vwidth% + \fr@meboxit{\fboxrule}{#3}{#4}} +\def\endrshfr@meboxit{\endfr@meboxit\egroup% + \hrule\@height\sh@hwidth% + \egroup\egroup\vrule\@width\sh@vwidth\egroup\egroup\strut} +\def\rshfboxit#1{\leavevmode% + \rshfr@meboxit{\fboxsep}{\fboxsep}{\fboxsep}{#1}} +\let\endrshfboxit=\endrshfr@meboxit +\newdimen\hsgr@d \newdimen\vsgr@d +\newdimen\vwgr@d \newdimen\hwgr@d +\newdimen\vsepgr@d \newdimen\hsepgr@d +\newcount\nrep \newcount\nrepmax +\nrepmax=25 +\def\grshfr@meboxit#1#2#3#4{% + \hsgr@d=0pt \advance\hsgr@d by#1 \divide\hsgr@d by\nrepmax% + \vsgr@d=0pt \advance\vsgr@d by#2 \divide\vsgr@d by\nrepmax% + \leavevmode% + \setbox0=\vbox\bgroup\fr@meboxit{\fboxrule}{#3}{#4}} +\def\brb@xit#1{\vbox{\setbox1=\hbox{#1}% + \offinterlineskip% + \hbox{\copy1\vsepgr@d=\nrep\vsgr@d% + \vwgr@d=\ht1\advance\vwgr@d by-\vsepgr@d% + \vrule\@height\vwgr@d\@width\vsgr@d}% + \hbox{\hsepgr@d=\nrep\hsgr@d\kern\hsepgr@d% + \vbox{\hwgr@d=\wd1\advance\hwgr@d by-\hsepgr@d% + \hrule\@height\hsgr@d\@width\hwgr@d}}}} +\def\lprb@xit{\expandafter\setbox0=\expandafter\brb@xit{\box0}} +\def\endgrshfr@meboxit{\endfr@meboxit\egroup% + \nrep=\@ne\@whilenum\nrep<\nrepmax\do% + {\lprb@xit\advance\nrep\@ne}\box0\relax} +\def\grshfboxit#1{\leavevmode% + \grshfr@meboxit{\fboxsep}{\fboxsep}{\fboxsep}{#1}} +\let\endgrshfboxit=\endgrshfr@meboxit +\def\glshfr@meboxit#1#2#3#4{% + \hsgr@d=0pt \advance\hsgr@d by#1 \divide\hsgr@d by\nrepmax% + \vsgr@d=0pt \advance\vsgr@d by#2 \divide\vsgr@d by\nrepmax% + \leavevmode% + \setbox0=\vbox\bgroup\fr@meboxit{\fboxrule}{#3}{#4}} +\def\blb@xit#1{% + \vbox{\setbox1=\hbox{#1}% + \offinterlineskip% + \vsepgr@d=\nrep\vsgr@d% + \vwgr@d=\ht1\advance\vwgr@d by-\vsepgr@d% + \hsepgr@d=\nrep\hsgr@d% + \hwgr@d=\wd1\advance\hwgr@d by-\hsepgr@d% + \hbox{\vrule\@height\vwgr@d\@width\vsgr@d\copy1}% + \hbox{\kern-\vsgr@d% + \vrule\@height\hsgr@d\@width\hwgr@d}}} +\def\lplb@xit{\expandafter\setbox0=\expandafter\blb@xit{\box0}} +\def\endglshfr@meboxit{\endfr@meboxit\egroup% + \nrep=\@ne\@whilenum\nrep<\nrepmax\do% + {\lplb@xit\advance\nrep\@ne}\box0\relax} +\def\glshfboxit#1{\leavevmode% + \glshfr@meboxit{\fboxsep}{\fboxsep}{\fboxsep}{#1}} +\let\endglshfboxit=\endglshfr@meboxit +\@ifundefined{ybaselineshift}{% +\newdimen\ybaselineshift \ybaselineshift=\z@}{} +\@ifundefined{tbaselineshift}{% +\newdimen\tbaselineshift \tbaselineshift=\z@}{} +\newdimen\@savetbaselineshift \@savetbaselineshift=\z@ +\def\@oval(#1,#2)[#3]{\begingroup\boxmaxdepth \maxdimen + \@ovttrue \@ovbtrue \@ovltrue \@ovrtrue + \@tfor\@tempa :=#3\do{\csname @ov\@tempa false\endcsname}\@ovxx + #1\unitlength \@ovyy #2\unitlength + \@tempdimb \ifdim \@ovyy >\@ovxx \@ovxx\else \@ovyy \fi + \advance\@tempdimb -2pt\relax + \@getcirc \@tempdimb + \@ovro \ht\@tempboxa \@ovri \dp\@tempboxa + \@ovdx\@ovxx \advance\@ovdx -\@tempdima \divide\@ovdx \tw@ + \@ovdy\@ovyy \advance\@ovdy -\@tempdima \divide\@ovdy \tw@ + \@circlefnt \setbox\@tempboxa + \hbox{\if@ovr \@ovvert32\kern -\@tempdima \fi + \if@ovl \kern \@ovxx \@ovvert01\kern -\@tempdima \kern -\@ovxx \fi + \if@ovt \@ovhorz \kern -\@ovxx \fi + \if@ovb \raise \@ovyy \@ovhorz \fi}\advance\@ovdx\@ovro + \advance\@ovdy\@ovro \ht\@tempboxa\z@ \dp\@tempboxa\z@ + \@put{-\@ovdx}{-\@ovdy}{\box\@tempboxa}% + \endgroup} +\def\h@b@x#1#2#3{\hbox to\dimen1% + {\@oval(#3,#3)[#1]\hfil\@oval(#3,#3)[#2]}} +\def\@vrf@#1#2{\vskip#1\leaders\vrule\@width#2\vfil\vskip#1} +\let\miniscreentoprule=\hrule +\def\miniscreen{\@ifnextchar[{\@miniscreen}{\@miniscreen[0]}} +\def\miniscreen{\@ifnextchar[{\@miniscreen}{\@miniscreen[0]}} +\def\@miniscreen[#1]#2{\dimen1=#2\relax% +\@savetbaselineshift\tbaselineshift \tbaselineshift\z@ +\@tempcnta=-2 \multiply\@tempcnta by#1\relax% +\advance\@tempcnta by 20\relax \dimen5=1pt +\multiply\dimen5\@tempcnta +\dimen4=-1pt \multiply\dimen4 by#1\relax +\advance\dimen4 by 10pt +\dimen3=\dimen4 \advance\dimen3 by -.2pt +\par\vspace{.3\baselineskip}% +\dimen6=\dimen1 \advance\dimen6 by .1pt +\advance\dimen1 -\dimen5\relax% +\setbox0=\hbox\bgroup\minipage{\dimen1 +\tbaselineshift\@savetbaselineshift}}% +\def\endminiscreen{\endminipage\egroup% +\setbox1=\hbox to\dimen6{\hfil\vbox{\offinterlineskip% +\thinlines\unitlength=1pt +\miniscreentoprule%\hrule +\kern\dimen3% +\h@b@x{tl}{tr}{\@tempcnta}% +\kern-\dimen4\box0\h@b@x{bl}{br}{\@tempcnta}% +\kern-.4pt\hrule}\hfil}\dimen0=\ht1\noindent% +\hbox to\dimen6{\hbox to.4pt{% +\vbox to\dimen0{\@vrf@{\dimen4}{.4pt}}\hss}% +\box1\hbox to.2pt{% + \hss\vbox to\dimen0{\@vrf@{\dimen4}{.4pt}}}\hss}}% +\def\screen{\@ifnextchar[{\@screen}{\@miniscreen[0]{\linewidth}}} +\def\@screen[#1]{\miniscreen[#1]{\linewidth}} +\let\endscreen=\endminiscreen +\def\tboxscreentoprule{% +\hbox to\wd0{\smash{\lower.4ex\hbox{% +\fboxsep=2pt \fbox{\small \tboxtitle}}}\hrulefill}} +\def\tboxtitle{\bf Memorandum} +\def\tboxminiscreen{\@ifnextchar[{\vskip8pt + \let\miniscreentoprule=\tboxscreentoprule% + \@miniscreen}{\vskip8pt + \let\miniscreentoprule=\tboxscreentoprule% + \@miniscreen[0]}} +\let\endtboxminiscreen=\endminiscreen +\def\tboxscreen{\@ifnextchar[{\@tboxscreen}% +{\@tboxscreen[0]}} +\def\@tboxscreen[#1]{\tboxminiscreen[#1]{\linewidth}} +\let\endtboxscreen=\endtboxminiscreen +\def\sboxit#1#2{\vbox{\hrule\hbox% +{\vrule\vbox{\kern3pt\vbox{\hsize #1 \noindent #2}% +\kern3pt}\vrule}\hrule}} +\def\bury{\@ifnextchar [{\@bury}{\@bury[.5\normalbaselineskip]}} +\def\@bury[#1]#2{\smash{\lower#1\hbox{#2}}} +\def\finpushw@ll{\wd0=0pt \box0} +\def\makepushw@ll#1{\setbox0=\hbox{#1}\finpushw@ll} +\def\mathpushw@ll#1#2{\setbox0=\hbox{$\m@th#1{#2}$}\finpushw@ll} +\def\pushtowall{\relax \leavevmode + \ifmmode\def\next{\mathpalette\mathpushw@ll} + \else\let\next\makepushw@ll \fi \next} +\def\penetrate#1#2{\pushtowall{\hbox{\hskip#1\hbox{#2}}}} +\def\cyandye{\mbox{$\bigcirc$\kern-.06em{--}\kern-.06em + \ooalign{\hfil + \raise.05ex\hbox{\scriptsize C}\hfil\cr\cr$\bigcirc$}\,}} +\def\magentadye{\mbox{$\bigcirc$\kern-.06em{--}\kern-.06em + \ooalign{\hfil + \raise.05ex\hbox{\scriptsize M}\hfil\cr\cr$\bigcirc$}\,}} +\def\yellowdye{\mbox{$\bigcirc$\kern-.06em{--}\kern-.06em + \ooalign{\hfil + \raise.05ex\hbox{\scriptsize Y}\hfil\cr\cr$\bigcirc$}\,}} +\def\cyandv{\mbox{$\bigotimes$\kern-.06em{--}\kern-.06em + \ooalign{\hfil + \raise.05ex\hbox{\scriptsize C}\hfil\cr\cr$\bigcirc$}\,}} +\def\magentadv{\mbox{$\bigotimes$\kern-.06em{--}\kern-.06em + \ooalign{\hfil + \raise.05ex\hbox{\scriptsize M}\hfil\cr\cr$\bigcirc$}\,}} +\def\yellowdv{\mbox{$\bigotimes$\kern-.06em{--}\kern-.06em + \ooalign{\hfil + \raise.05ex\hbox{\scriptsize Y}\hfil\cr\cr$\bigcirc$}\,}} +\def\agxlatent{% + \mbox{\ooalign{% + \hfil\raise.07ex\hbox{\footnotesize $\bullet$}\hfil\cr\cr + $\triangle$}\,}} +\def\agxdv{% + \mbox{\ooalign{\hfil\raise.07ex\hbox{% + \small $\spadesuit$}\hfil\cr\cr + $\triangle$}\,}} +\def\agx{\mbox{$\triangle$}} +\def\oldllongrightarrow{%%%---> +\relbar\joinrel\relbar\joinrel\relbar\joinrel\rightarrow} +\def\oldllongleftarrow{%%%<--- + \leftarrow\joinrel\relbar\joinrel\relbar\joinrel\relbar} +\def\oldllongleftrightarrow{%%%<---> + \leftarrow\joinrel\relbar\joinrel\relbar\joinrel\rightarrow} +\def\oldEquilibarrow{%%%<--- and ---> + \mathrel{\ooalign{\raise.35ex\hbox{$\oldllongrightarrow$}\crcr + \lower.35ex\hbox{$\oldllongleftarrow$}}}} +\def\oldLlongrightarrow{%%%===> + \Relbar\joinrel\Relbar\joinrel\Relbar\joinrel\Rightarrow} +\def\oldLlongleftarrow{%%%<=== + \Leftarrow\joinrel\Relbar\joinrel\Relbar\joinrel\Relbar} +\def\oldLlongleftrightarrow{%%<===> + \Leftarrow\joinrel\Relbar\joinrel\Relbar\joinrel\Rightarrow} +%%%%%2009/11/19 old... +\def\oldllongleftharpoondown{%%% /--- + \mathrel{\leftharpoondown}\joinrel\relbar\joinrel\relbar\joinrel\relbar} +\def\oldllongrightharpoonup{%%%---/ + \relbar\joinrel\relbar\joinrel\relbar\joinrel\mathrel{\rightharpoonup}} +\def\oldequilibarrow{%%% /--- and ---/ + \mathrel{\ooalign{% + \raise.3ex\hbox{$\oldllongrightharpoonup$}\crcr + \lower.3ex\hbox{$\oldllongleftharpoondown$}}}} +%%%%%2009/11/19 +\def\eqproton{\stackrel{{\rm \displaystyle H}^{+}}{\Equilibarrow}} +\def\oldlllongrightarrow{\relbar\joinrel\relbar% + \joinrel\relbar\joinrel\relbar\joinrel\rightarrow} +\def\oldlllongleftarrow{%%%<------- + \leftarrow\joinrel\relbar\joinrel\relbar% + \joinrel\relbar\joinrel\relbar} +\def\oldlllongleftrightarrow{%%%<-------> + \leftarrow\joinrel\relbar\joinrel\relbar% + \joinrel\relbar\joinrel\rightarrow} +\def\oldEquiliblongarrow{%%%<------- and -------> + \mathrel{\ooalign{\raise.35ex\hbox{$\oldlllongrightarrow$}\crcr + \lower.35ex\hbox{$\oldlllongleftarrow$}}}} +\def\oldLllongrightarrow{%%%=======> + \Relbar\joinrel\Relbar\joinrel\Relbar\joinrel% + \Relbar\joinrel\Rightarrow} +\def\oldLllongleftarrow{%%%<======= + \Leftarrow\joinrel\Relbar\joinrel\Relbar\joinrel% + \Relbar\joinrel\Relbar} +\def\oldLllongleftrightarrow{%%<=======> + \Leftarrow\joinrel\Relbar\joinrel\Relbar\joinrel% + \Relbar\joinrel\Rightarrow} +%%%%2009/11/19 +\def\oldlllongleftharpoondown{%%% /------- + \mathrel{\leftharpoondown}\joinrel\relbar\joinrel\relbar% + \joinrel\relbar\joinrel\relbar} +\def\oldlllongrightharpoonup{%%%-------/ + \relbar\joinrel\relbar\joinrel\relbar\joinrel% + \relbar\joinrel\mathrel{\rightharpoonup}} +\def\oldequiliblongarrow{%%% /------ and ------/ + \mathrel{\ooalign{% + \raise.3ex\hbox{$\oldlllongrightharpoonup$}\crcr + \lower.3ex\hbox{$\oldlllongleftharpoondown$}}}} +%%%%%%%%2009/11/19 +\def\deHBr{\stackrel{\displaystyle \rm -HBr}% +{\stackrel{\displaystyle \lllongrightarrow}{\rm E2}}} +\def\chemcorr{% + \fontdimen16\textfont2=3.05pt + \fontdimen17\textfont2=3.05pt + %\fontdimen14\textfont2=3.8pt +} +\def\leavechemcorr{% + \fontdimen16\textfont2=1.49998pt + \fontdimen17\textfont2=2.47217pt + %\fontdimen14\textfont2=3.62892pt +} +\newif\ifnewl@tex \newl@textrue +\@ifundefined{DeclareMathVersion}% + {\global\newl@texfalse}{\global\newl@textrue}% +\if@chemtimes\else%for chemtimes package +\def\math@chem{chem} +\def\math@boldchem{boldchem} +\def\math@bold{bold} +\def\math@normal{normal} +%%added 2005/09/02 +\let\oldalpha=\alpha +\let\oldbeta=\beta +\let\oldgamma=\gamma +\let\olddelta=\delta +\let\oldepsilon=\epsilon +\let\oldzeta=\zeta +\let\oldeta=\eta +\let\oldtheta=\theta +\let\oldiota=\iota +\let\oldkappa=\kappa +\let\oldlambda=\lambda +\let\oldmu=\mu +\let\oldnu=\nu +\let\oldxi=\xi +\let\oldpi=\pi +\let\oldrho=\rho +\let\oldsigma=\sigma +\let\oldtau=\tau +\let\oldupsilon=\upsilon +\let\oldphi=\phi +\let\oldchi=\chi +\let\oldpsi=\psi +\let\oldomega=\omega +\let\oldvarepsilon=\varepsilon +\let\oldvartheta=\vartheta +\let\oldvarpi=\varpi +\let\oldvarrho=\varrho +\let\oldvarsigma=\varsigma +\let\oldvarphi=\varphi +\let\oldGamma=\Gamma +\let\oldDelta=\Delta +\let\oldTheta=\Theta +\let\oldLamda=\Lambda +\let\oldXi=\Xi +\let\oldPi=\Pi +\let\oldSigma=\Sigma +\let\oldUpsilon=\Upsilon +\let\oldPhi=\Phi +\let\oldPsi=\Psi +\let\oldOmega=\Omega +\fi +\if@chemtimes\else%for chemtimes package +\def\chemGreekletter#1#2{% +\expandafter\def\csname #1\endcsname{\bgroup%added 2010/11/21 +\ifx\math@version\math@chem +\mathord{\hbox{\mathversion{normal}$\mathchar"#2$}}\else +\ifx\math@version\math@boldchem +\mathord{\hbox{\mathversion{bold}$\mathchar"#2$}}\else +\ifx\math@version\math@bold +\csname old#1\endcsname +\else +\csname old#1\endcsname +\fi\fi\fi\egroup}}%added 2010/11/21 +\fi +%%%\if@chemtimes\else%for chemtimes package +\newif\ifupgreekrm \upgreekrmfalse +\DeclareOldFontCommand{\rm}{\normalfont\rmfamily}{\upgreekrmtrue\mathrm} +%%%\fi +\if@chemtimes\else\relax%for chemtimes package +\def\chemUpGreekletter#1#2#3{% +\expandafter\def\csname #1\endcsname{\bgroup%added 2010/11/21 by SF +\ensuremath{% +\ifx\math@version\math@chem +#2{\hbox{\usefont{OML}{cmm}{m}{it}\char"#3}}\else +\ifx\math@version\math@boldchem +#2{\hbox{\usefont{OML}{cmm}{b}{it}\char"#3}}\else +\ifx\math@version\math@bold +\ifupgreekrm +#2{\hbox{\usefont{OML}{cmm}{b}{it}\char"#3}}% +\upgreekrmfalse +\else +#2{\hbox{\usefont{OML}{cmm}{b}{it}\char"#3}}% +\fi +\else +#2{\hbox{\usefont{OML}{cmm}{m}{it}\char"#3}}% +\fi\fi\fi}\egroup}}%added 2010/11/21 by SF +\fi +\if@chemtimes\else%for chemtimes package +\def\ChemAccent#1#2#3{% +\expandafter\def\csname #1\endcsname{% +\ifx\math@version\math@chem +#2{\hbox{\kern-0.15em\usefont{OML}{cmm}{m}{it}\char"#3}}\else +\ifx\math@version\math@boldchem +#2{\hbox{\kern-0.2em\usefont{OML}{cmm}{b}{it}\char"#3}}\else +\ifx\math@version\math@bold +\ifupgreekrm +#2{\hbox{\usefont{OML}{cmm}{b}{it}\char"#3}}% +\upgreekrmfalse +\else +#2{\hbox{\usefont{OML}{cmm}{b}{it}\char"#3}}% +\fi +\else +#2{\hbox{\usefont{OML}{cmm}{m}{it}\char"#3}}% +\fi\fi\fi}} +\fi +\if@chemtimes\else%for chemtimes package +\def\SetChemSymbol{% +\chemGreekletter{alpha}{010B}% +\chemGreekletter{beta}{010C}% +\chemGreekletter{gamma}{010D}% +\chemGreekletter{delta}{010E}% +\chemGreekletter{epsilon}{010F}% +\chemGreekletter{zeta}{0110}% +\chemGreekletter{eta}{0111}% +\chemGreekletter{theta}{0112}% +\chemGreekletter{iota}{0113}% +\chemGreekletter{kappa}{0114}% +\chemGreekletter{lambda}{0115}% +\chemGreekletter{mu}{0116}% +\chemGreekletter{nu}{0117}% +\chemGreekletter{xi}{0118}% +\chemGreekletter{pi}{0119}% +\chemGreekletter{rho}{011A}% +\chemGreekletter{sigma}{011B}% +\chemGreekletter{tau}{011C}% +\chemGreekletter{upsilon}{011D}% +\chemGreekletter{phi}{011E}% +\chemGreekletter{chi}{011F}% +\chemGreekletter{psi}{0120}% +\chemGreekletter{omega}{0121}% +\chemGreekletter{varepsilon}{0122}% +\chemGreekletter{vartheta}{0123}% +\chemGreekletter{varpi}{0124}% +\chemGreekletter{varrho}{0125}% +\chemGreekletter{varsigma}{0126}% +\chemGreekletter{varphi}{0127}% +\chemUpGreekletter{Gamma}{\mathord}{00}% +\chemUpGreekletter{Delta}{\mathord}{01}% +\chemUpGreekletter{Theta}{\mathord}{02}% +\chemUpGreekletter{Lambda}{\mathord}{03}% +\chemUpGreekletter{Xi}{\mathord}{04}% +\chemUpGreekletter{Pi}{\mathord}{05}% +\chemUpGreekletter{Sigma}{\mathord}{06}% +\chemUpGreekletter{Upsilon}{\mathord}{07}% +\chemUpGreekletter{Phi}{\mathord}{08}% +\chemUpGreekletter{Psi}{\mathord}{09}% +\chemUpGreekletter{Omega}{\mathord}{0A}% +\chemUpGreekletter{imath}{\mathord}{7B}% +\chemUpGreekletter{jmath}{\mathord}{7C}% +\chemUpGreekletter{mathless}{\mathrel}{3C}%in place of < +\chemUpGreekletter{mathgreater}{\mathrel}{3E}% in place of > +\chemUpGreekletter{leftharpoonup}{\mathrel}{28}% +\chemUpGreekletter{leftharpoondown}{\mathrel}{29}% +\chemUpGreekletter{rightharpoonup}{\mathrel}{2A}% +\chemUpGreekletter{rightharpoondown}{\mathrel}{2B}% +\chemUpGreekletter{ell}{\mathord}{60}% +\chemUpGreekletter{wp}{\mathord}{7D}% +\chemUpGreekletter{partial}{\mathord}{40}% +\chemUpGreekletter{flat}{\mathord}{5B}% +\chemUpGreekletter{natural}{\mathord}{5C}% +\chemUpGreekletter{sharp}{\mathord}{5D}% +\chemUpGreekletter{triangleleft}{\mathbin}{2F}% +\chemUpGreekletter{triangleright}{\mathbin}{2E}% +\chemUpGreekletter{smile}{\mathrel}{5E}% +\chemUpGreekletter{frown}{\mathrel}{5F}% +\chemUpGreekletter{star}{\mathbin}{3F}% +\ChemAccent{vec}{\rlap}{7E}% +} +\fi +\if@chemtimes\else%for chemtimes package +\DeclareRobustCommand\mathversion[1] + {\@nomath\mathversion + \expandafter\ifx\csname mv@#1\endcsname\relax + \@latex@error{Math version `#1' is not defined}\@eha\else + \edef\math@version{#1}% + \gdef\glb@currsize{}% +%%%%%%2002/5/30, 2004/11/17, and 2009/10/25 +\ifx\math@version\math@chem + \mathcode`\.="012E + \mathcode`\,="612C + \mathcode`\/="012F + \mathcode`\=="313D + \mathcode`\?="513F + \mathcode`\[="415B + \mathcode`\]="515D + \mathcode`\(="4128 + \mathcode`\)="5129 + \SetChemSymbol +\else\ifx\math@version\math@boldchem + \mathcode`\.="012E + \mathcode`\,="612C + \mathcode`\/="012F + \mathcode`\=="313D + \mathcode`\?="513F + \mathcode`\[="415B + \mathcode`\]="515D + \mathcode`\(="4128 + \mathcode`\)="5129 + \def\check{\mathaccent"7114 } + \def\dot{\mathaccent"715F } + \def\acute{\mathaccent"7113 } + \def\grave{\mathaccent"7112 } + \def\ddot{\mathaccent"717F } + \def\bar{\mathaccent"7116 } + \def\breve{\mathaccent"7115 } + \SetChemSymbol +\else\ifx\math@version\math@bold + \mathcode`\.="013A + \mathcode`\,="613B + \mathcode`\/="013D + \mathcode`\=="303D + \mathcode`\?="503F + \mathcode`\[="405B + \mathcode`\]="505D + \mathcode`\(="4028 + \mathcode`\)="5029 + \SetChemSymbol% +\else + \mathcode`\.="013A + \mathcode`\,="613B + \mathcode`\/="013D + \mathcode`\=="303D + \mathcode`\?="503F + \mathcode`\[="405B + \mathcode`\]="505D + \mathcode`\(="4028 + \mathcode`\)="5029 + \SetChemSymbol% +\fi\fi\fi +%%%%%% + \aftergroup\glb@settings + \fi} +\fi +\if@chemtimes\else%for chemtimes package +\ifnewl@tex +\@ifundefined{mv@chem}{\DeclareMathVersion{chem}% +\SetSymbolFont{letters}{chem}{OT1}{cmr}{m}{n}%OT1-->T1-->OT1 +\SetSymbolFont{operators}{chem}{OT1}{cmr} {m}{n}% +\SetSymbolFont{symbols} {chem}{OMS}{cmsy}{m}{n}% +\DeclareMathVersion{boldchem}%2002/5/30 +\SetSymbolFont{operators}{boldchem}{OT1}{cmr} {bx}{n}% +\SetSymbolFont{letters} {boldchem}{OT1}{cmr} {b}{n}% +\SetSymbolFont{symbols} {boldchem}{OMS}{cmsy}{b}{n}% +}{} +\fi +\fi +\if@chemtimes\else%for chemtimes package +\let\oldmathnormal=\mathnormal +\def\mathnormal#1{% +\ifx\math@version\math@chem +\mathord{\hbox{\usefont{OML}{cmm}{m}{it}#1}}% +\else\ifx\math@version\math@boldchem +\mathord{\hbox{\usefont{OML}{cmm}{b}{it}#1}}% +\else\ifx\math@version\math@bold +\ifupgreekrm +\oldmathnormal{#1}% +\upgreekrmfalse +\else +\oldmathnormal{#1}% +\fi +\else +\oldmathnormal{#1}% +\fi\fi\fi}% +\fi +\if@chemtimes\else%for chemtimes package +\def\oldstyle{\egroup% +\ifx\math@version\math@chem +\hbox\bgroup\usefont{OML}{cmm}{m}{it}% +\else\ifx\math@version\math@boldchem +\hbox\bgroup\usefont{OML}{cmm}{b}{it}% +\else\ifx\math@version\math@bold +\ifupgreekrm +\oldmathnormal\bgroup% +\upgreekrmfalse +\else +\oldmathnormal\bgroup% +\fi +\else +\oldmathnormal\bgroup% +\fi\fi\fi}% +\fi +\if@chemtimes\else%for chemtimes package +\let\oldmathcal=\mathcal +\def\mathcal#1{% +\ifx\math@version\math@chem +\mathgroup\tw@{\usefont{OMS}{cmsy}{m}{n}#1}% +\else\ifx\math@version\math@boldchem +\mathgroup\tw@{\usefont{OMS}{cmsy}{b}{n}#1}% +\else\ifx\math@version\math@bold +\ifupgreekrm \oldmathcal{#1}\upgreekrmfalse +\else \oldmathcal{#1}\fi +\else +\oldmathcal{#1}% +\fi\fi\fi}% +\fi +\if@chemtimes\else%for chemtimes package +\let\oldcal=\cal +\def\cal{% +\ifx\math@version\math@chem +\mathgroup\tw@\usefont{OMS}{cmsy}{m}{n}% +\else\ifx\math@version\math@boldchem +\mathgroup\tw@\usefont{OMS}{cmsy}{b}{n}% +\else\ifx\math@version\math@bold +\ifupgreekrm \oldcal\upgreekrmfalse +\else\oldcal\fi +\else +\oldcal% +\fi\fi\fi}% +\fi +\ifnewl@tex +\def\chemform#1{{\mathversion{chem}% +$\chemcorr #1$\leavechemcorr}} +\else +\def\chemform#1{\chemcorr +$\rm #1$\leavechemcorr} +\fi +\ifnewl@tex +\def\chemmath{\begingroup\mathversion{chem}\[\chemcorr} +\def\endchemmath{\]\endgroup\leavechemcorr} +\else +\def\chemmath{\chemcorr\[\rm} +\def\endchemmath{\] \leavechemcorr} +\fi +\ifnewl@tex +\def\chemeqn{\begingroup\mathversion{chem}\equation\chemcorr} +\def\endchemeqn{\endequation\leavechemcorr\endgroup}%bug fix 2013/6/15 +\else +\def\chemeqn{\chemcorr\equation\rm} +\def\endchemeqn{\endequation\leavechemcorr} +\fi +\ifnewl@tex +\def\chemeqnarray{\stepcounter{equation} + \let\@currentlabel=\theequation + \global\@eqnswtrue + \global\@eqcnt\z@\tabskip\@centering + \let\\=\@eqncr + \begingroup\mathversion{chem} +$$\chemcorr\halign to \displaywidth\bgroup + \@eqnsel\hskip\@centering + $\rm \displaystyle\tabskip\z@{##}$ & + \global\@eqcnt\@ne + \hskip \arraycolsep \hfil$\rm{##}$\hfil & + \global\@eqcnt\tw@ \hskip \arraycolsep + $\rm \displaystyle\tabskip\z@{##}$\hfil + \tabskip\@centering & + \llap{##}\tabskip\z@\cr} +\def\endchemeqnarray{\endeqnarray\endgroup +\leavechemcorr} +\else +\def\chemeqnarray{\stepcounter{equation} + \let\@currentlabel=\theequation + \global\@eqnswtrue + \global\@eqcnt\z@\tabskip\@centering + \let\\=\@eqncr \chemcorr +$$\halign to \displaywidth\bgroup + \@eqnsel\hskip\@centering + $\rm \displaystyle\tabskip\z@{##}$ & + \global\@eqcnt\@ne + \hskip \arraycolsep \hfil$\rm{##}$\hfil & + \global\@eqcnt\tw@ \hskip \arraycolsep + $\rm \displaystyle\tabskip\z@{##}$\hfil + \tabskip\@centering & + \llap{##}\tabskip\z@\cr} +\def\endchemeqnarray{\endeqnarray +\leavechemcorr} +\fi +\let\@seqncr=\@eqncr +\ifnewl@tex +\@namedef{chemeqnarray*}{% +\def\@eqncr{\nonumber\@seqncr}\chemeqnarray} +\@namedef{endchemeqnarray*}{\nonumber\endchemeqnarray} +\else +\@namedef{chemeqnarray*}{% +\def\@eqncr{\nonumber\@seqncr\rm}\chemeqnarray} +\@namedef{endchemeqnarray*}{\nonumber\endchemeqnarray} +\fi +\def\chemeqnarraya{\chemeqn@rraya \chemeqnarray} +\def\chemeqn@rraya{% + \c@enumi=\c@equation + \advance\c@enumi\@ne + \c@equation=\z@ + \@ifundefined{chapter}% +{\def\theequation{\theenumi\alph{equation}}}% +{\def\theequation{% +\thechapter.\theenumi\alph{equation}}}} +\def\endchemeqnarraya{\endchemeqnarray +\global\c@equation=\c@enumi} +\@ifundefined{if@display}{\newif\if@display}{} +\newif\ifupgreekrm \upgreekrmfalse +\let\ChemEqFont=\rm +\def\ChemEquation{\everymath{\ChemEqFont\chemcorr\upgreekrmtrue}% +\everydisplay{\ChemEqFont\chemcorr\@displaytrue\upgreekrmtrue}\equation} +\def\endChemEquation{\endequation\everymath{}\everydisplay{}% +\@displayfalse\leavechemcorr\upgreekrmfalse} + +\def\ChemEqnarray{\everymath{\ChemEqFont\chemcorr\upgreekrmtrue}% +\eqnarray} +\def\endChemEqnarray{\endeqnarray\everymath{}% +\leavechemcorr\upgreekrmfalse} +\def\ChemForm#1{\everymath{\ChemEqFont\chemcorr\upgreekrmtrue}$#1$\everymath{}% +\leavechemcorr\upgreekrmfalse} +\@namedef{ChemEqnarray*}{\def\@eqncr{\nonumber\@seqncr}\ChemEqnarray} +\@namedef{endChemEqnarray*}{\nonumber\endChemEqnarray} +\def\newchemenvironment#1#2{% +\expandafter\def\csname #1\endcsname{% +\everymath{\ChemEqFont\chemcorr\upgreekrmtrue}% +\csname #2\endcsname}% +\expandafter\def\csname end#1\endcsname{% +\csname end#2\endcsname\everymath{}% +\leavechemcorr\upgreekrmfalse}} +\def\XyMcompd(#1,#2)(#3,#4)#5#6{% +\begingroup +\edef\xymrefa{#5}\edef\xymrefb{#6}% +\edef\kkk{#1}% +\begin{tabular}{c} +\ifx\kkk\empty\else +\begin{sfpicture}(#1,#2)(#3,#4)\fi\ignorespaces} +\def\endXyMcompd{% +\ifx\kkk\empty\else\end{sfpicture}\fi +\\[-\baselineskip] +\ifx\xymrefa\empty\else{\bf \compd\xymrefb +\expandafter\label{\xymrefa}}\fi +\end{tabular}\endgroup} +\def\XyMtab#1{\center\tabular{#1c}} +\def\endXyMtab{\endtabular\endcenter} +\def\derivlist#1{% +\mbox{}\\ +\begingroup\def\arraystretch{0.7}% +\begin{tabular}{l} +\@forsemicol\member:=#1\do{% +\ifx\member\empty\else% +\hbox to2em{\hss\derivnum}:\space\member \\ +\fi}\end{tabular}\endgroup} +\def\XyMderiv{\tabular{c}} +\def\endXyMderiv{\endtabular} +\def\endash{\mbox{--{}}} +\def\Cent{\mbox{\raise.9ex\hbox{% + \scriptsize$\circ$}\kern-.12em\hbox{C}}} +\def\degC{\mbox{\kern-.2em\char'27\kern-.3em C}} +\def\degF{\mbox{\kern-.2em\char'27\kern-.3em F}} +\def\yubin{$\overline{\top}$} +\def\Yubin#1{\leavevmode\hbox{\vbox{\hrule\@height.12ex\@width.7em +\kern.28ex\hrule\@height.12ex\@width.7em +\hbox{\kern.35em\kern-.06ex +\vbox{\hrule\@height1ex\@width.12ex}}}\kern.1em{#1}}} +\def\xlethead#1{% + \kern-.6667\baselineskip \line{\hrulefill\phantom{ #1 }\hrulefill} + \kern-.6667\baselineskip \line{\hrulefill\phantom{ #1 }\hrulefill} + \kern-.6667\baselineskip \line{\hrulefill\hbox{ #1 }\hrulefill}} +\def\lethead#1#2#3{\def\line{\hbox to\textwidth} + \vbox{\line{\hrulefill} + \xlethead{#1} \xlethead{#2} \xlethead{#3} + \kern-.6667\baselineskip \line{\hrulefill}}} +\def\horizon{\rule{12pt}{0.1pt}} +\newcount\TestCount \def\tmpkern{\kern0pt} +\ifnewl@tex \else +\def\resetfontsize{% + \ifx\@currsize\normalsize% + \def\tmpf@ntsize{% + \load{\footnotesize}{\sf}% + \load{\footnotesize}{\sl}% + \load{\footnotesize}{\bf}% + \def\tmpkern{\kern0.05em}% + \footnotesize}\fi + \ifx\@currsize\scriptsize \let\tmpf@ntsize=\tiny\fi + \ifx\@currsize\footnotesize \let\tmpf@ntsize=\tiny\fi + \ifx\@currsize\small \let\tmpf@ntsize=\scriptsize\fi + \ifx\@currsize\large \let\tmpf@ntsize=\small\fi + \ifx\@currsize\Large \let\tmpf@ntsize=\@normalsize\fi + \ifx\@currsize\LARGE \let\tmpf@ntsize=\large\fi + \ifx\@currsize\huge \let\tmpf@ntsize=\Large\fi + \ifx\@currsize\Huge \let\tmpf@ntsize=\LARGE\fi} +\fi +\ifnewl@tex \else +\def\Bib{\ifnum \fam=\m@ne \fam=\z@ \fi\TestCount=\fam\leavevmode% + \edef\aaa{\fontname\scriptfont\fam}% + \edef\bbb{\fontname\textfont\fam}% + \resetfontsize% + \hbox{$\fam=\TestCount\textstyle B$}% + \ifx\aaa\bbb% + \hbox{\tmpf@ntsize\bf + $\fam=\TestCount\kern-.025em I\kern-.045em B$}% + \else% + \hbox{$\fam\TestCount\scriptstyle\kern-.025em I\kern-.045em B$}% + \fi +} +\fi +\ifnewl@tex +\DeclareRobustCommand{\BibTeX}{% + B\hbox{$\m@th$\csname S@\f@size\endcsname + \fontsize\sf@size\z@ \math@fontsfalse\selectfont + \kern-.025em I\kern-.045em B}\kern-.08em\TeX} +\else \def\BibTeX{\Bib\kern-.08em\TeX} \fi +\ifnewl@tex +\DeclareRobustCommand{\jBibTeX}{\mbox{% + \if b\expandafter\@car\f@series\@nil\boldmath\fi + \leavevmode\lower.46ex\hbox{J}\kern-.08em\BibTeX}} +\else +\def\jBibTeX{\leavevmode\lower.46ex\hbox{J}% + \kern-.08em\Bib\kern-.08em\TeX} +\fi +\def\jTeX{\leavevmode\lower.46ex\hbox{J}\kern-.15em\TeX} +\def\pTeX{p\kern-.15em\TeX} +\ifnewl@tex \else +\def\Sub{\leavevmode\ifnum \fam=\m@ne \fam=\z@ \fi% + \TestCount=\fam{S}% + \edef\aaa{\fontname\scriptfont\fam}% + \edef\bbb{\fontname\textfont\fam}% + \ifx\aaa\bbb\resetfontsize% + \hbox{\tmpf@ntsize\bf% + $\fam=\TestCount\kern-.045em{U}\kern-.12em{B}$}% + \else% + \hbox{$\fam\TestCount% + \scriptstyle\kern-.045em{U}\kern-.12em{B}$}% + \fi} +\fi +\ifnewl@tex +\DeclareRobustCommand{\SubBib}{S\hbox{$\m@th$% + \csname S@\f@size\endcsname\fontsize\sf@size\z@ + \math@fontsfalse\selectfont% + \kern-.045em{U}\kern-.12em{B}}B\hbox{$\m@th$% + \csname S@\f@size\endcsname\fontsize\sf@size\z@ + \math@fontsfalse\selectfont \kern-.025em I\kern-.045em B}} +\else \def\SubBib{\Sub\kern-.08em\Bib} \fi +\ifnewl@tex \else +\def\La{\ifnum \fam=\m@ne \fam=\z@ \fi\TestCount=\fam% + \edef\aaa{\fontname\scriptfont\fam}% + \edef\bbb{\fontname\textfont\fam}\leavevmode{L}% + \ifx\aaa\bbb \resetfontsize% + \raise.46ex\hbox{{\tmpf@ntsize\bf% + $\fam\TestCount\kern-.4em\tmpkern{A}$}}% + \else% + \raise.42ex\hbox{$\fam\TestCount\scriptstyle\kern-.3em{A}$}% + \fi} +\fi +\ifnewl@tex \else \def\LaTeX{\La\kern-.15em\TeX}\fi +\ifnewl@tex + \DeclareRobustCommand{\jLaTeX}% + {\leavevmode\lower.46ex\hbox{J}\kern-.08em\LaTeX} +\else + \def\jLaTeX{\leavevmode\lower.46ex\hbox{J}\kern-.08em\LaTeX} +\fi +\def\PiC{P\kern-.12em\lower.5ex\hbox{I}\kern-.075emC} +\ifnewl@tex +\DeclareRobustCommand{\PiCTeX}{\PiC\kern-.11em\TeX} +\else +\def\PiCTeX{\PiC\kern-.11em\TeX} +\fi +\ifnewl@tex +\DeclareRobustCommand{\tpic}{T\hbox{$\m@th$% + \csname S@\f@size\endcsname\fontsize\sf@size\z@ + \math@fontsfalse\selectfont + \kern-.025em P\kern-.025em I\kern-.025emC}} +\else +\def\tpic{\ifnum \fam=\m@ne \fam=\z@ \fi% + \TestCount=\fam \leavevmode% + \edef\aaa{\fontname\scriptfont\fam}% + \edef\bbb{\fontname\textfont\fam}% + \resetfontsize\hbox{$\fam=\TestCount\textstyle T$}% + \ifx\aaa\bbb\hbox{\tmpf@ntsize\bf$\fam=\TestCount% + \kern-.025em P\kern-.025em I\kern-.025emC$}\else% + \hbox{$\fam\TestCount\scriptstyle% + \kern-.025em P\kern-.025em I\kern-.025emC$}\fi} +\fi +\ifnewl@tex \else +\def\Post{\ifnum \fam=\m@ne \fam=\z@ \fi% + \TestCount=\fam\leavevmode% + \edef\aaa{\fontname\scriptfont\fam}% + \edef\bbb{\fontname\textfont\fam}% + \resetfontsize% + \hbox{$\fam=\TestCount\textstyle P$}% + \ifx\aaa\bbb% + \hbox{\tmpf@ntsize\bf% + $\fam=\TestCount\kern-.045em O\kern-.015em ST$}% + \else% + \hbox{$\fam\TestCount% + \scriptstyle\kern-.045em O\kern-.015em ST$}% + \fi} +\def\Script{\ifnum \fam=\m@ne \fam=\z@ \fi% + \TestCount=\fam\leavevmode% + \edef\aaa{\fontname\scriptfont\fam}% + \edef\bbb{\fontname\textfont\fam}% + \resetfontsize% + \hbox{$\fam=\TestCount\textstyle S$}% + \ifx\aaa\bbb% + \hbox{\tmpf@ntsize\bf$\fam=\TestCount\kern-.035em % + C\kern-.015em R\kern-.015em IP\kern-.035em T$}% + \else% + \hbox{$\fam\TestCount\scriptstyle\kern-.035em % + C\kern-.015em R\kern-.015em IP\kern-.035em T$}% + \fi} +\fi +\ifnewl@tex +\DeclareRobustCommand{\PostScript}{P\hbox{$\m@th$% + \csname S@\f@size\endcsname\fontsize\sf@size\z@ + \math@fontsfalse\selectfont + \kern-.045em O\kern-.015em ST}S\hbox{$\m@th$% + \csname S@\f@size\endcsname\fontsize\sf@size\z@ + \math@fontsfalse\selectfont + \kern-.035em C\kern-.015em R\kern-.015em IP\kern-.035em T}} +\else +\def\PostScript{\Post\Script} +\fi +\def\triplebond{\leavevmode\kern.2pt\raisebox{.2ex}{% +\hbox{\vbox{\hrule height.03ex width1em\kern.4ex +\hrule height.03ex width1em\kern.4ex +\hrule height.03ex width1em}}}\hskip.4pt} +\def\doublebond{\leavevmode\kern.2pt\raisebox{.3ex}{% +\hbox{\vbox{\hrule height.03ex width1em\kern.6ex +\hrule height.03ex width1em}}}\hskip.4pt} +\let\tbond=\triplebond +\let\dbond=\doublebond +\def\upwardarrowcalcA{% +\@tempcntXc=\@tempcntXa +\advance\@tempcntXc by\@tempcntXb +\advance\@tempcntXc by-\@tempcntYb +\advance\@tempcntXc by\@tempcntYa +\divide\@tempcntXc by2\relax +%% +\@tempcntYc=\@tempcntYa +\advance\@tempcntYc by\@tempcntYb +\advance\@tempcntYc by-\@tempcntXa +\advance\@tempcntYc by\@tempcntXb +\divide\@tempcntYc by2\relax} +\def\upwardarrowcalcB{% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +\advance\@tempcntXc by\@tempcntXd +\advance\@tempcntYc by\@tempcntYd +\advance\@cnttempa by-\@tempcntXd +\advance\@cnttempb by-\@tempcntYd} +\def\downwardarrowcalcA{% +\@tempcntXc=\@tempcntXa +\advance\@tempcntXc by\@tempcntXb +\advance\@tempcntXc by\@tempcntYb +\advance\@tempcntXc by-\@tempcntYa +\divide\@tempcntXc by2\relax +\@tempcntYc=\@tempcntYa +\advance\@tempcntYc by\@tempcntYb +\advance\@tempcntYc by\@tempcntXa +\advance\@tempcntYc by-\@tempcntXb +\divide\@tempcntYc by2\relax} +\def\downwardarrowcalcB{% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +\advance\@tempcntXc by\@tempcntXd +\advance\@tempcntYc by\@tempcntYd +\advance\@cnttempa by-\@tempcntXd +\advance\@cnttempb by-\@tempcntYd} +\def\calcontrolpoints#1{% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +\@tempcntXd=\@tempcntXb +\advance\@tempcntXd by-\@tempcntXa +\divide\@tempcntXd by4\relax +\@tempcntYd=\@tempcntYb +\advance\@tempcntYd by-\@tempcntYa +\divide\@tempcntYd by4\relax +\ifcase#1\relax%upward round: 0 +\upwardarrowcalcA% +\@cnttempa=\@tempcntXc +\@cnttempb=\@tempcntYc +\upwardarrowcalcB% +\or%downward-round: 1 +\downwardarrowcalcA% +\@cnttempa=\@tempcntXc +\@cnttempb=\@tempcntYc +\downwardarrowcalcB% +\or%upward round: 2 +\upwardarrowcalcA% +\advance\@tempcntXc by-\@tempcntYd +\advance\@tempcntYc by\@tempcntXd +\@cnttempa=\@tempcntXc +\@cnttempb=\@tempcntYc +\upwardarrowcalcB% +\or%downward-round: 3 +\downwardarrowcalcA% +\advance\@tempcntXc by\@tempcntYd +\advance\@tempcntYc by-\@tempcntXd +\@cnttempa=\@tempcntXc +\@cnttempb=\@tempcntYc +\downwardarrowcalcB% +\or%upward round: 4 +\upwardarrowcalcA% +\advance\@tempcntXc by-\@tempcntYd +\advance\@tempcntXc by-\@tempcntYd +\advance\@tempcntYc by\@tempcntXd +\advance\@tempcntYc by\@tempcntXd +\@cnttempa=\@tempcntXc +\@cnttempb=\@tempcntYc +\upwardarrowcalcB% +\or%downward-round: 5 +\downwardarrowcalcA% +\advance\@tempcntXc by\@tempcntYd +\advance\@tempcntXc by\@tempcntYd +\advance\@tempcntYc by-\@tempcntXd +\advance\@tempcntYc by-\@tempcntXd +\@cnttempa=\@tempcntXc +\@cnttempb=\@tempcntYc +\downwardarrowcalcB% +\fi} +\def\chemistsw{%setting of the chemist package +\let\reactrarrow=\oldreactrarrow% +\let\reactlarrow=\oldreactlarrow +\let\reactlrarrow=\oldreactlrarrow +\let\reacteqarrow=\oldreacteqarrow +%%%% +\let\reactreqarrow=\oldreactreqarrow% +\let\reactleqarrow=\oldreactleqarrow +%%%% +\let\reactdarrow=\oldreactdarrow% +\let\reactuarrow=\oldreactuarrow +\let\reactveqarrow=\oldreactveqarrow +\let\reactduarrow=\oldreactduarrow +%%%% +\let\reactsearrow=\oldreactsearrow% +\let\reactnwarrow=\oldreactnwarrow +\let\reactnearrow=\oldreactnearrow +\let\reactswarrow=\oldreactswarrow +%%%% +\let\reactdeqarrow=\oldreactdeqarrow% +\let\reactueqarrow=\oldreactueqarrow +\let\reactulrarrow=\oldreactulrarrow +\let\reactdlrarrow=\oldreactdlrarrow +%%%% +\let\schemelarrow=\oldschemelarrow% +\let\schemerarrow=\oldschemerarrow +\let\schemelrarrow=\oldschemelrarrow +%%%% +\let\llongrightarrow=\oldllongrightarrow%%%--->% +\let\llongleftarrow=\oldllongleftarrow%%%<--- +\let\llongleftrightarrow=\oldllongleftrightarrow%%%<---> +\let\Equilibarrow=\oldEquilibarrow%%%<--- and ---> +\let\Llongrightarrow=\oldLlongrightarrow%%%===> +\let\Llongleftarrow=\oldLlongleftarrow%%%<=== +\let\Llongleftrightarrow=\oldLlongleftrightarrow%%<===> +%%%%% +\let\llongleftharpoondown=\oldllongleftharpoondown%%% /---% +\let\llongrightharpoonup=\oldllongrightharpoonup%%%---/ +\let\equilibarrow=\oldequilibarrow%%% /--- and ---/ +%%%%% +\let\lllongrightarrow=\oldlllongrightarrow%%%%------>% +\let\lllongleftarrow=\oldlllongleftarrow%%%<------- +\let\lllongleftrightarrow=\oldlllongleftrightarrow%%%<-------> +\let\Equiliblongarrow=\oldEquiliblongarrow%%%<------- and -------> +\let\Lllongrightarrow=\oldLllongrightarrow%%%=======> +\let\Lllongleftarrow=\oldLllongleftarrow%%%<======= +\let\Lllongleftrightarrow=\oldLllongleftrightarrow%%<=======> +%%%%% +\let\lllongleftharpoondown=\oldlllongleftharpoondown%%% /-------% +\let\lllongrightharpoonup=\oldlllongrightharpoonup%%%-------/ +\let\equiliblongarrow=\oldequiliblongarrow%%% /------ and ------/ +%%%%tentative setting +\let\reactDEqarrow=\oldreactdeqarrow +\let\reactUEqarrow=\oldreactueqarrow +\let\reactVEqarrow=\oldreactveqarrow +\let\reactREqarrow=\oldreactreqarrow +\let\reactLEqarrow=\oldreactleqarrow +\let\reactEqarrow=\oldreacteqarrow +\let\lllongleftharpoonup=\oldlllongleftarrow +\let\lllongrightharpoondown=\oldlllongrightarrow +\let\llongleftharpoonup=\oldllongleftarrow +\let\llongrightharpoondown=\oldllongrightarrow +%%%% +} +\RequirePackage{assurechemist} +\chemistsw%setting of the chemist package +\mathversion{normal} +\endinput +%% +%% End of file `chemist.sty'. |