From 8650f6e3d8df6655cddbdcdfc63e83dcc0c0cf6f Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Mon, 9 Oct 2006 23:07:15 +0000 Subject: cool update git-svn-id: svn://tug.org/texlive/trunk@2293 c570f23f-e606-0410-a88d-b1316a301751 --- .../doc/latex/cool/Content_LaTeX_Package_Demo.pdf | Bin 159960 -> 161424 bytes Master/texmf-dist/doc/latex/cool/README | 84 ++-- Master/texmf-dist/doc/latex/cool/cool.pdf | Bin 311475 -> 322045 bytes Master/texmf-dist/source/latex/cool/cool.dtx | 502 +++++++++++---------- Master/texmf-dist/source/latex/cool/cool.ins | 78 ++-- Master/texmf-dist/tex/latex/cool/cool.sty | 468 ++++++++++--------- Master/texmf-dist/tpm/cool.tpm | 10 +- 7 files changed, 596 insertions(+), 546 deletions(-) diff --git a/Master/texmf-dist/doc/latex/cool/Content_LaTeX_Package_Demo.pdf b/Master/texmf-dist/doc/latex/cool/Content_LaTeX_Package_Demo.pdf index 0bff259ca5b..007afcc0c7e 100644 Binary files a/Master/texmf-dist/doc/latex/cool/Content_LaTeX_Package_Demo.pdf and b/Master/texmf-dist/doc/latex/cool/Content_LaTeX_Package_Demo.pdf differ diff --git a/Master/texmf-dist/doc/latex/cool/README b/Master/texmf-dist/doc/latex/cool/README index 9d5710e2993..d2b3cc6b7d9 100644 --- a/Master/texmf-dist/doc/latex/cool/README +++ b/Master/texmf-dist/doc/latex/cool/README @@ -1,43 +1,43 @@ -Description ------------ - -The cool of the cool package stands for COntent Oriented LaTeX. It is designed -to give LaTeX the power to retain mathematical meaning of its expressions in -addition to the typsetting instructions. - -One advantage of keeping mathematical meaning is that conversion of LaTeX -documents to other executable formats (such as Content MathML or Mathematica -code) is greatly simplified. - -This package requires the following, non-standard LaTeX packages -(all of which are available on www.ctan.org): - -* coolstr -* coollist -* forloop - - -Installation ------------- - -To install this package, run cool.ins through LaTeX. This will generate -a file called cool.sty. Put this file somewhere where LaTeX will find -it---for instance localtexmf/tex/latex/cool/ (note that you will need -to create the folder cool). - -If you are using MikTeX, you then need to refresh the file name database -by using MikTeX Options - - -License -------- - -This pacakge is released under the Lesser GNU General Public License. See -http://www.gnu.org/licenses/licenses.html#LGPL for more details. - -Contact -------- - -Any bugs may be reported to the author by sending an email to the address with -the first part being nsetzer, then an at sign, the next part is umd, and +Description +----------- + +The cool of the cool package stands for COntent Oriented LaTeX. It is designed +to give LaTeX the power to retain mathematical meaning of its expressions in +addition to the typsetting instructions. + +One advantage of keeping mathematical meaning is that conversion of LaTeX +documents to other executable formats (such as Content MathML or Mathematica +code) is greatly simplified. + +This package requires the following, non-standard LaTeX packages +(all of which are available on www.ctan.org): + +* coolstr +* coollist +* forloop + + +Installation +------------ + +To install this package, run cool.ins through LaTeX. This will generate +a file called cool.sty. Put this file somewhere where LaTeX will find +it---for instance localtexmf/tex/latex/cool/ (note that you will need +to create the folder cool). + +If you are using MikTeX, you then need to refresh the file name database +by using MikTeX Options + + +License +------- + +This pacakge is released under the Lesser GNU General Public License. See +http://www.gnu.org/licenses/licenses.html#LGPL for more details. + +Contact +------- + +Any bugs may be reported to the author by sending an email to the address with +the first part being nsetzer, then an at sign, the next part is umd, and finally it ends in dot edu. \ No newline at end of file diff --git a/Master/texmf-dist/doc/latex/cool/cool.pdf b/Master/texmf-dist/doc/latex/cool/cool.pdf index 47917b2d216..a48d0ac234b 100644 Binary files a/Master/texmf-dist/doc/latex/cool/cool.pdf and b/Master/texmf-dist/doc/latex/cool/cool.pdf differ diff --git a/Master/texmf-dist/source/latex/cool/cool.dtx b/Master/texmf-dist/source/latex/cool/cool.dtx index 0312fb8fee0..c1a2086d1f6 100644 --- a/Master/texmf-dist/source/latex/cool/cool.dtx +++ b/Master/texmf-dist/source/latex/cool/cool.dtx @@ -2,18 +2,20 @@ % %\NeedsTeXFormat{LaTeX2e}[1999/12/01] %\ProvidesPackage{cool} -% [2006/09/17 v1.2 COntent Oriented LaTeX] +% [2006/10/07 v1.3 COntent Oriented LaTeX] %\RequirePackage{ifthen} %\RequirePackage{coollist} %\RequirePackage{coolstr} %\RequirePackage{forloop} %\RequirePackage{amsmath} %\RequirePackage{amssymb} +%\RequirePackage{bbm} % % %<*driver> \documentclass{ltxdoc} \usepackage{cool} +\usepackage[bbgreekl]{mathbbol} \usepackage{url} \EnableCrossrefs \CodelineIndex @@ -49,6 +51,7 @@ % \changes{v1.0}{2005/08/27}{Initial Release} % \changes{v1.1}{2006/03/19}{Added listlenstore to package to allow storing of the list length} % \changes{v1.2}{2006/09/17}{Split off the list, string, and forloop parts to separate packages} +% \changes{v1.3}{2006/10/07}{Redefined the {\tt in*} commands to have a {\tt mathopen} before the {\tt left}. Added {\tt IntegrateDifferentialDSymb} and {\tt DSymb} options for {\tt Integrate} and {\tt D}. Added {\tt IdentityMatrixSymb} for {\tt IdentityMatrix} and changed the default to display a double-struck $1$. Added {\tt ESymb}, {\tt ISymb}, {\tt PISymb}, and {\tt EulerGammaSymb} for fundamental constants} % % \GetFileInfo{cool.sty} % @@ -351,6 +354,8 @@ % This is the \textsf{cool} package: a COntent Oriented \LaTeX{} package. That is, it is designed to give \LaTeX{} % commands the ability to contain the mathematical meaning while retaining the typesetting versatility. % +% Please note that there are examples of use of each of the defined commands at the location where they are defined. +% % This package requires the following, non-standard \LaTeX{} packages (all of which are available on \url{www.ctan.org}): % \textsf{coolstr}, % \textsf{coollist}, @@ -377,15 +382,15 @@ % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % \begin{macrocode} -\newcommand{\inp}[2][0cm]{\left(#2\parbox[h][#1]{0cm}{}\right)} +\newcommand{\inp}[2][0cm]{\mathopen{}\left(#2\parbox[h][#1]{0cm}{}\right)} % in parentheses () -\newcommand{\inb}[2][0cm]{\left[#2\parbox[h][#1]{0cm}{}\right]} +\newcommand{\inb}[2][0cm]{\mathopen{}\left[#2\parbox[h][#1]{0cm}{}\right]} % in brackets [] -\newcommand{\inbr}[2][0cm]{\left\{#2\parbox[h][#1]{0cm}{}\right\}} +\newcommand{\inbr}[2][0cm]{\mathopen{}\left\{#2\parbox[h][#1]{0cm}{}\right\}} % in braces {} -\newcommand{\inap}[2][0cm]{\left<{#2}\parbox[h][#1]{0cm}{}\right>} +\newcommand{\inap}[2][0cm]{\mathopen{}\left<{#2}\parbox[h][#1]{0cm}{}\right>} % in angular parentheses <> -\newcommand{\nop}[1]{\left.{#1}\right.} +\newcommand{\nop}[1]{\mathopen{}\left.{#1}\right.} % no parentheses % \end{macrocode} % @@ -570,23 +575,32 @@ % % see \url{http://functions.wolfram.com/} for the definitions % \begin{macro}{\I} -% The square root of minus 1 ($\sqrt{-1}$), $\I$. +% The square root of minus 1, $\I = \sqrt{-1}$. +% +% |\Style{ISymb=\mathbbm{i}}| \Style{ISymb=\mathbbm{i}}, |\I| gives $\I$. \Style{ISymb=i} % \begin{macrocode} -\newcommand{\I}{i} + \newcommand{\COOL@notation@ISymb}{i} +\newcommand{\I}{\COOL@notation@ISymb} % \end{macrocode} % \end{macro} % % \begin{macro}{\E} -% Euler's constant and the base of the natural logarithm, $\E$. +% Euler's constant and the base of the natural logarithm, $\E$. +% +%|\Style{ESymb=\mathbbm{e}}| \Style{ESymb=\mathbbm{e}}, |\E| gives $\E$. \Style{ESymb=e} % \begin{macrocode} -\newcommand{\E}{e} + \newcommand{\COOL@notation@ESymb}{e} +\newcommand{\E}{\COOL@notation@ESymb} % \end{macrocode} % \end{macro} % % \begin{macro}{\PI} -% Pi---the ratio of the circumference of a circle to its diameter, $\PI$. +% Pi---the ratio of the circumference of a circle to its diameter, $\PI$. +% +% |\Style{PISymb=\bbpi}| \footnote{to get the `bbpi' symbol , you will need to use the package \textsf{mathbbol} and pass the \textsf{bbgreekl} option} \Style{PISymb=\bbpi}, |\PI| gives $\PI$. \Style{PISymb=\pi} % \begin{macrocode} -\newcommand{\PI}{\pi} + \newcommand{\COOL@notation@PISymb}{\pi} +\newcommand{\PI}{\COOL@notation@PISymb} % \end{macrocode} % \end{macro} % @@ -598,9 +612,12 @@ % \end{macro} % % \begin{macro}{\EulerGamma} -% Euler's Gamma constant, $\EulerGamma$ +% Euler's Gamma constant, $\EulerGamma$. +% +%|\Style{EulerGammaSymb=\gamma_E}| \Style{EulerGammaSymb=\gamma_E}, |\EulerGamma| gives $\EulerGamma$ \Style{EulerGammaSymb=\gamma} % \begin{macrocode} -\newcommand{\EulerGamma}{\gamma} + \newcommand{\COOL@notation@EulerGammaSymb}{\gamma} +\newcommand{\EulerGamma}{\COOL@notation@EulerGammaSymb} % \end{macrocode} % \end{macro} % @@ -1085,13 +1102,13 @@ \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer}=1}% {% - W\!\COOL@decide@paren{ProductLog}{#1}% + W\COOL@decide@paren{ProductLog}{#1}% }% % else {% \ifthenelse{\value{COOL@listpointer}=2}% {% - W_{\listval{#1}{1}}\!\COOL@decide@paren{ProductLog}{\listval{#1}{2}}% + W_{\listval{#1}{1}}\COOL@decide@paren{ProductLog}{\listval{#1}{2}}% }% % else {% @@ -1137,7 +1154,7 @@ \newcommand{\COOL@notation@BesselJSymb}{J} \newcommand{\COOL@notation@BesselJParen}{p} \newcommand{\BesselJ}[2]% -{\COOL@notation@BesselJSymb_{#1}\!\COOL@decide@paren{BesselJ}{#2}} +{\COOL@notation@BesselJSymb_{#1}\COOL@decide@paren{BesselJ}{#2}} % \end{macrocode} % \end{macro} % @@ -1147,7 +1164,7 @@ \newcommand{\COOL@notation@BesselYSymb}{Y} \newcommand{\COOL@notation@BesselYParen}{p} \newcommand{\BesselY}[2]% -{\COOL@notation@BesselYSymb_{#1}\!\COOL@decide@paren{BesselY}{#2}} +{\COOL@notation@BesselYSymb_{#1}\COOL@decide@paren{BesselY}{#2}} % \end{macrocode} % \end{macro} % @@ -1157,7 +1174,7 @@ \newcommand{\COOL@notation@BesselISymb}{I} \newcommand{\COOL@notation@BesselIParen}{p} \newcommand{\BesselI}[2]% -{\COOL@notation@BesselISymb_{#1}\!\COOL@decide@paren{BesselI}{#2}} +{\COOL@notation@BesselISymb_{#1}\COOL@decide@paren{BesselI}{#2}} % \end{macrocode} % \end{macro} % @@ -1167,7 +1184,7 @@ \newcommand{\COOL@notation@BesselKSymb}{K} \newcommand{\COOL@notation@BesselKParen}{p} \newcommand{\BesselK}[2]% -{\COOL@notation@BesselKSymb_{#1}\!\COOL@decide@paren{BesselK}{#2}} +{\COOL@notation@BesselKSymb_{#1}\COOL@decide@paren{BesselK}{#2}} % \end{macrocode} % \end{macro} % @@ -1182,7 +1199,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@AiryAiParen}{p} \DeclareMathOperator{\AiryAiSymb}{Ai} -\newcommand{\AiryAi}[1]{\AiryAiSymb\!\COOL@decide@paren{AiryAi}{#1}} +\newcommand{\AiryAi}[1]{\AiryAiSymb\COOL@decide@paren{AiryAi}{#1}} % \end{macrocode} % \end{macro} % @@ -1191,7 +1208,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@AiryBiParen}{p} \DeclareMathOperator{\AiryBiSymb}{Bi} -\newcommand{\AiryBi}[1]{\AiryBiSymb\!\COOL@decide@paren{AiryBi}{#1}} +\newcommand{\AiryBi}[1]{\AiryBiSymb\COOL@decide@paren{AiryBi}{#1}} % \end{macrocode} % \end{macro} % @@ -1205,7 +1222,7 @@ % Struve H function, |\StruveH{\nu}{z}|, $\StruveH{\nu}{z}$ % \begin{macrocode} \newcommand{\COOL@notation@StruveHParen}{p} -\newcommand{\StruveH}[2]{ {\bf H}_{#1}\!\COOL@decide@paren{StruveH}{#2}} +\newcommand{\StruveH}[2]{ {\bf H}_{#1}\COOL@decide@paren{StruveH}{#2}} % \end{macrocode} % \end{macro} % @@ -1213,7 +1230,7 @@ % Struve L function, |\StruveL{\nu}{z}|, $\StruveL{\nu}{z}$ % \begin{macrocode} \newcommand{\COOL@notation@StruveLParen}{p} -\newcommand{\StruveL}[2]{ {\bf L}_{#1}\!\COOL@decide@paren{StruveL}{#2}} +\newcommand{\StruveL}[2]{ {\bf L}_{#1}\COOL@decide@paren{StruveL}{#2}} % \end{macrocode} % \end{macro} % @@ -1359,7 +1376,7 @@ % ElseIf { \ifthenelse{\value{COOL@listpointer} = 2}% {% - F_{\COOL@Fibonacci@arg@i}\!% + F_{\COOL@Fibonacci@arg@i}% \COOL@decide@paren{Fibonacci}{\COOL@Fibonacci@arg@ii}% }% % Else @@ -1386,7 +1403,7 @@ % ElseIf { \ifthenelse{\value{COOL@listpointer} = 2}% {% - E_{\COOL@Euler@arg@i}\!% + E_{\COOL@Euler@arg@i}% \COOL@decide@paren{Euler}{\COOL@Euler@arg@ii}% }% % Else @@ -1415,7 +1432,7 @@ % ElseIf { \ifthenelse{\value{COOL@listpointer} = 2}% {% - B_{\COOL@Bernoulli@arg@i}\!% + B_{\COOL@Bernoulli@arg@i}% \COOL@decide@paren{Bernoulli}{\COOL@Bernoulli@arg@ii}% }% % Else @@ -1446,7 +1463,7 @@ % Number of unrestricted partitions of an integer, |\PartitionsP{x}|, $\PartitionsP{x}$ % \begin{macrocode} \newcommand{\COOL@notation@PartitionsPParen}{p} -\newcommand{\PartitionsP}[1]{p\!\COOL@decide@paren{PartitionsP}{#1}} +\newcommand{\PartitionsP}[1]{p\COOL@decide@paren{PartitionsP}{#1}} % \end{macrocode} % \end{macro} % @@ -1454,7 +1471,7 @@ % number of partitions of an integer into distinct parts, |\PartitionsQ{x}|, $\PartitionsQ{x}$ % \begin{macrocode} \newcommand{\COOL@notation@PartitionsQParen}{p} -\newcommand{\PartitionsQ}[1]{q\!\COOL@decide@paren{PartitionsQ}{#1}} +\newcommand{\PartitionsQ}[1]{q\COOL@decide@paren{PartitionsQ}{#1}} % \end{macrocode} % \end{macro} % @@ -1520,9 +1537,16 @@ {% \ifthenelse{\equal{\COOL@notation@LeviCivitaUseComma}{true}}% {% - \ifthenelse{\NOT \value{COOL@ct} = 1}{,}{}% - \edef\COOL@arg@temp% - {\COOL@arg@temp \csname COOL@arg@\roman{COOL@ct}\endcsname}% + \ifthenelse{\NOT \value{COOL@ct} = 1}% + {% + \edef\COOL@arg@temp% + {\COOL@arg@temp, \csname COOL@arg@\roman{COOL@ct}\endcsname}% + }% + % Else + {% + \edef\COOL@arg@temp% + {\COOL@arg@temp \csname COOL@arg@\roman{COOL@ct}\endcsname}% + }% }% % Else {% @@ -1549,7 +1573,7 @@ \newcommand{\COOL@notation@HermiteHParen}{p} \newcommand{\COOL@notation@HermiteHSymb}{H} \newcommand{\HermiteH}[2]% -{\COOL@notation@HermiteHSymb_{#1}\!\COOL@decide@paren{HermiteH}{#2}} +{\COOL@notation@HermiteHSymb_{#1}\COOL@decide@paren{HermiteH}{#2}} % \end{macrocode} % \end{macro} % @@ -1566,13 +1590,13 @@ \ifthenelse{\value{COOL@listpointer}=2}% {% \COOL@notation@LaugerreLSymb_{\COOL@list@temp@i}% - \!\COOL@decide@paren{LaugerreL}{\COOL@list@temp@ii}% + \COOL@decide@paren{LaugerreL}{\COOL@list@temp@ii}% }% % Else If { \ifthenelse{\value{COOL@listpointer}=3}% {% \COOL@notation@LaugerreLSymb_{\COOL@list@temp@i}^{\COOL@list@temp@ii}% - \!\COOL@decide@paren{LaugerreL}{\COOL@list@temp@iii}% + \COOL@decide@paren{LaugerreL}{\COOL@list@temp@iii}% }% % Else {% @@ -1604,14 +1628,14 @@ \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 2}% {% - \COOL@notation@LegendrePSymb_{\COOL@LegendreP@arg@i}\!% + \COOL@notation@LegendrePSymb_{\COOL@LegendreP@arg@i}% \COOL@decide@paren{LegendreP}{\COOL@LegendreP@arg@ii}% }% % ElseIf { \ifthenelse{\value{COOL@listpointer} = 3}% {% \COOL@notation@LegendrePSymb_{\COOL@LegendreP@arg@i}% - ^{\COOL@LegendreP@arg@ii}\!% + ^{\COOL@LegendreP@arg@ii}% \COOL@decide@paren{LegendreP}{\COOL@LegendreP@arg@iii}% }% % ElseIf @@ -1628,11 +1652,11 @@ {`LegendreP' third argument must be $>$ 1}% \or% \COOL@notation@LegendrePSymb_{\COOL@LegendreP@arg@i}% - ^{\COOL@LegendreP@arg@ii}\!% + ^{\COOL@LegendreP@arg@ii}% \COOL@decide@paren{LegendreP}{\COOL@LegendreP@arg@iv}% \or% {\cal P}_{\COOL@LegendreP@arg@i}% - ^{\COOL@LegendreP@arg@ii}\!% + ^{\COOL@LegendreP@arg@ii}% \COOL@decide@paren{LegendreP}{\COOL@LegendreP@arg@iv}% \else% \PackageError{cool}{Invalid Argument}{unsupported}% @@ -1674,14 +1698,14 @@ \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 2}% {% - \COOL@notation@LegendreQSymb_{\COOL@LegendreQ@arg@i}\!% + \COOL@notation@LegendreQSymb_{\COOL@LegendreQ@arg@i}% \COOL@decide@paren{LegendreQ}{\COOL@LegendreQ@arg@ii}% }% % ElseIf { \ifthenelse{\value{COOL@listpointer} = 3}% {% \COOL@notation@LegendreQSymb_{\COOL@LegendreQ@arg@i}% - ^{\COOL@LegendreQ@arg@ii}\!% + ^{\COOL@LegendreQ@arg@ii}% \COOL@decide@paren{LegendreQ}{\COOL@LegendreQ@arg@iii}% }% % ElseIf @@ -1698,11 +1722,11 @@ {`LegendreQ' third argument must be $>$ 1}% \or% \COOL@notation@LegendreQSymb_{\COOL@LegendreQ@arg@i}% - ^{\COOL@LegendreQ@arg@ii}\!% + ^{\COOL@LegendreQ@arg@ii}% \COOL@decide@paren{LegendreQ}{\COOL@LegendreQ@arg@iv}% \or% {\cal Q}_{\COOL@LegendreQ@arg@i}% - ^{\COOL@LegendreQ@arg@ii}\!% + ^{\COOL@LegendreQ@arg@ii}% \COOL@decide@paren{LegendreQ}{\COOL@LegendreQ@arg@iv}% \else% \PackageError{cool}{Invalid Argument}{unsupported}% @@ -1729,7 +1753,7 @@ \newcommand{\COOL@notation@ChebyshevTParen}{p} \newcommand{\COOL@notation@ChebyshevTSymb}{T} \newcommand{\ChebyshevT}[2]% -{\COOL@notation@ChebyshevTSymb_{#1}\!\COOL@decide@paren{ChebyshevT}{#2}} +{\COOL@notation@ChebyshevTSymb_{#1}\COOL@decide@paren{ChebyshevT}{#2}} % \end{macrocode} % \end{macro} % @@ -1739,7 +1763,7 @@ \newcommand{\COOL@notation@ChebyshevUParen}{p} \newcommand{\COOL@notation@ChebyshevUSymb}{U} \newcommand{\ChebyshevU}[2]% -{\COOL@notation@ChebyshevUSymb_{#1}\!\COOL@decide@paren{ChebyshevU}{#2}} +{\COOL@notation@ChebyshevUSymb_{#1}\COOL@decide@paren{ChebyshevU}{#2}} % \end{macrocode} % \end{macro} % @@ -1750,7 +1774,7 @@ \newcommand{\COOL@notation@JacobiPSymb}{P} \newcommand{\JacobiP}[4]{% \COOL@notation@JacobiPSymb_{#1}^{\inp{#2, #3}}% -\!\COOL@decide@paren{JacobiP}{#4}% +\COOL@decide@paren{JacobiP}{#4}% } % \end{macrocode} % \end{macro} @@ -1786,7 +1810,7 @@ \newcommand{\COOL@notation@GegenbauerCSymb}{C} \newcommand{\GegenbauerC}[3]{% \COOL@notation@GegenbauerCSymb_{#1}^{#2}% -\!\COOL@decide@paren{GegenbauerC}{#3}% +\COOL@decide@paren{GegenbauerC}{#3}% } % \end{macrocode} % \end{macro} @@ -1804,7 +1828,7 @@ \newcommand{\COOL@notation@SphericalHarmonicYSymb}{Y} \newcommand{\SphericalHarmonicY}[4]{% \COOL@notation@SphericalHarmonicYSymb_{#1}^{#2}% -\!\COOL@decide@paren{SphericalHarmonicY}{#3,#4}% +\COOL@decide@paren{SphericalHarmonicY}{#3,#4}% } \newcommand{\SphericalHarmY}[4]{\SphericalHarmonicY{#1}{#2}{#3}{#4}} \newcommand{\SpHarmY}[4]{\SphericalHarmonicY{#1}{#2}{#3}{#4}} @@ -1824,7 +1848,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@CyclotomicCParen}{p} \newcommand{\CyclotomicC}[2]% -{C_{#1}\!\COOL@decide@paren{CyclotomicC}{#2}} +{C_{#1}\COOL@decide@paren{CyclotomicC}{#2}} % \end{macrocode} % \end{macro} % @@ -1939,17 +1963,17 @@ \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 1}% {% - \Gamma\!\COOL@decide@paren{GammaFunc}{#1}% + \Gamma\COOL@decide@paren{GammaFunc}{#1}% }% % ElseIf { \ifthenelse{\value{COOL@listpointer} = 2}% {% - \Gamma\!\COOL@decide@paren{GammaFunc}{#1}% + \Gamma\COOL@decide@paren{GammaFunc}{#1}% }% % ElseIf { \ifthenelse{\value{COOL@listpointer} = 3}% {% - \Gamma\!\COOL@decide@paren{GammaFunc}{#1}% + \Gamma\COOL@decide@paren{GammaFunc}{#1}% }% % Else {% @@ -1991,12 +2015,12 @@ \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 2}% {% - Q\!\COOL@decide@paren{GammaRegularized}{#1}% + Q\COOL@decide@paren{GammaRegularized}{#1}% }% % ElseIf { \ifthenelse{\value{COOL@listpointer} = 3}% {% - Q\!\COOL@decide@paren{GammaRegularized}{#1}% + Q\COOL@decide@paren{GammaRegularized}{#1}% }% % Else {% @@ -2029,12 +2053,12 @@ \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 2}% {% - Q^{-1}\!\COOL@decide@paren{InverseGammaRegularized}{#1}% + Q^{-1}\COOL@decide@paren{InverseGammaRegularized}{#1}% }% % ElseIf { \ifthenelse{\value{COOL@listpointer} = 3}% {% - Q^{-1}\!\COOL@decide@paren{InverseGammaRegularized}{#1}% + Q^{-1}\COOL@decide@paren{InverseGammaRegularized}{#1}% }% % Else {% @@ -2096,7 +2120,7 @@ % Digamma function, |\DiGamma{x}|, $\DiGamma{x}$ % \begin{macrocode} \newcommand{\COOL@notation@DiGammaParen}{p} -\newcommand{\DiGamma}[1]{\digamma\!\COOL@decide@paren{DiGamma}{#1}} +\newcommand{\DiGamma}[1]{\digamma\COOL@decide@paren{DiGamma}{#1}} % \end{macrocode} % \end{macro} % PolyGamma function, |\PolyGamma{\nu}{x}|, $\PolyGamma{\nu}{x}$ @@ -2105,7 +2129,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@PolyGammaParen}{p} \newcommand{\PolyGamma}[2]% -{\psi^{\inp{#1}}\!\COOL@decide@paren{PolyGamma}{#2}} +{\psi^{\inp{#1}}\COOL@decide@paren{PolyGamma}{#2}} % \end{macrocode} % \end{macro} % @@ -2157,18 +2181,18 @@ \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 2}% {% - B\!\COOL@decide@paren{Beta}{\COOL@Beta@arg@i, \COOL@Beta@arg@ii}% + B\COOL@decide@paren{Beta}{\COOL@Beta@arg@i, \COOL@Beta@arg@ii}% }% % ElseIf { \ifthenelse{\value{COOL@listpointer} = 3}% {% - B_{\COOL@Beta@arg@i}\!% + B_{\COOL@Beta@arg@i}% \COOL@decide@paren{Beta}{\COOL@Beta@arg@ii, \COOL@Beta@arg@iii}% }% % ElseIf { \ifthenelse{\value{COOL@listpointer} = 4}% {% - B_{\inp{\COOL@Beta@arg@i,\COOL@Beta@arg@ii}}\!% + B_{\inp{\COOL@Beta@arg@i,\COOL@Beta@arg@ii}}% \COOL@decide@paren{Beta}{\COOL@Beta@arg@iii, \COOL@Beta@arg@iv}% }% % Else @@ -2222,14 +2246,14 @@ \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 3}% {% - I_{\COOL@BetaRegularized@arg@i}\!% + I_{\COOL@BetaRegularized@arg@i}% \COOL@decide@paren{BetaRegularized}% {\COOL@BetaRegularized@arg@ii, \COOL@BetaRegularized@arg@iii}% }% % ElseIf { \ifthenelse{\value{COOL@listpointer} = 4}% {% - I_{\inp{\COOL@BetaRegularized@arg@i, \COOL@BetaRegularized@arg@ii}}\!% + I_{\inp{\COOL@BetaRegularized@arg@i, \COOL@BetaRegularized@arg@ii}}% \COOL@decide@paren{BetaRegularized}% {\COOL@BetaRegularized@arg@iii, \COOL@BetaRegularized@arg@iv}% }% @@ -2265,7 +2289,7 @@ \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 3}% {% - I^{-1}_{\COOL@InverseBetaRegularized@arg@i}\!% + I^{-1}_{\COOL@InverseBetaRegularized@arg@i}% \COOL@decide@paren{InverseBetaRegularized}% {\COOL@InverseBetaRegularized@arg@ii,% \COOL@InverseBetaRegularized@arg@iii}% @@ -2276,7 +2300,7 @@ I^{-1}_{\inp{ \COOL@InverseBetaRegularized@arg@i,% \COOL@InverseBetaRegularized@arg@ii% }% - }\!% + }% \COOL@decide@paren{InverseBetaRegularized}% {\COOL@InverseBetaRegularized@arg@iii,% \COOL@InverseBetaRegularized@arg@iv}% @@ -2339,12 +2363,12 @@ \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 1}% {% - \ErfSymb\!\COOL@decide@paren{Erf}{#1} + \ErfSymb\COOL@decide@paren{Erf}{#1} }% % ElseIf { \ifthenelse{\value{COOL@listpointer} = 2}% {% - \ErfSymb\!\COOL@decide@paren{Erf}{#1} + \ErfSymb\COOL@decide@paren{Erf}{#1} }% % Else {% @@ -2370,12 +2394,12 @@ \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 1}% {% - \ErfSymb^{-1}\!\COOL@decide@paren{ErfInv}{#1} + \ErfSymb^{-1}\COOL@decide@paren{ErfInv}{#1} }% % ElseIf { \ifthenelse{\value{COOL@listpointer} = 2}% {% - \ErfSymb^{-1}\!\COOL@decide@paren{ErfInv}{#1} + \ErfSymb^{-1}\COOL@decide@paren{ErfInv}{#1} }% % Else {% @@ -2413,10 +2437,10 @@ % \begin{macrocode} \newcommand{\COOL@notation@ErfcParen}{p} \DeclareMathOperator{\ErfcSymb}{erfc} -\newcommand{\Erfc}[1]{\ErfcSymb\!\COOL@decide@paren{Erfc}{#1}} +\newcommand{\Erfc}[1]{\ErfcSymb\COOL@decide@paren{Erfc}{#1}} \newcommand{\COOL@notation@ErfcInvParen}{p} \newcommand{\ErfcInv}[1]% -{\ErfcSymb^{-1}\!\COOL@decide@paren{ErfcInv}{#1}} +{\ErfcSymb^{-1}\COOL@decide@paren{ErfcInv}{#1}} % \end{macrocode} % \end{macro} % @@ -2425,7 +2449,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@ErfiParen}{p} \DeclareMathOperator{\ErfiSymb}{erfi} -\newcommand{\Erfi}[1]{\ErfiSymb\!\COOL@decide@paren{Erfi}{#1}} +\newcommand{\Erfi}[1]{\ErfiSymb\COOL@decide@paren{Erfi}{#1}} % \end{macrocode} % \end{macro} % @@ -2439,7 +2463,7 @@ % Fresnel Integral, |\FresnelS{z}|, $\FresnelS{z}$ % \begin{macrocode} \newcommand{\COOL@notation@FresnelSParen}{p} -\newcommand{\FresnelS}[1]{S\!\COOL@decide@paren{FresnelS}{#1}} +\newcommand{\FresnelS}[1]{S\COOL@decide@paren{FresnelS}{#1}} % \end{macrocode} % \end{macro} % @@ -2447,7 +2471,7 @@ % Fresnel Integral, |\FresnelC{z}|, $\FresnelC{z}$ % \begin{macrocode} \newcommand{\COOL@notation@FresnelCParen}{p} -\newcommand{\FresnelC}[1]{C\!\COOL@decide@paren{FresnelC}{#1}} +\newcommand{\FresnelC}[1]{C\COOL@decide@paren{FresnelC}{#1}} % \end{macrocode} % \end{macro} % @@ -2461,7 +2485,7 @@ % Exponential Integral, |\ExpIntE{\nu}{x}|, $\ExpIntE{\nu}{x}$ % \begin{macrocode} \newcommand{\COOL@notation@ExpIntEParen}{p} -\newcommand{\ExpIntE}[2]{E_{#1}\!\COOL@decide@paren{ExpIntE}{#2}} +\newcommand{\ExpIntE}[2]{E_{#1}\COOL@decide@paren{ExpIntE}{#2}} % \end{macrocode} % \end{macro} % @@ -2471,7 +2495,7 @@ \newcommand{\COOL@notation@ExpIntEiParen}{p} \DeclareMathOperator{\ExpIntEiSymb}{Ei} \newcommand{\ExpIntEi}[1]% -{\ExpIntEiSymb\!\COOL@decide@paren{ExpIntEi}{#1}} +{\ExpIntEiSymb\COOL@decide@paren{ExpIntEi}{#1}} % \end{macrocode} % \end{macro} % @@ -2480,7 +2504,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@LogIntParen}{p} \DeclareMathOperator{\LogIntSymb}{li} -\newcommand{\LogInt}[1]{\LogIntSymb\!\COOL@decide@paren{LogInt}{#1}} +\newcommand{\LogInt}[1]{\LogIntSymb\COOL@decide@paren{LogInt}{#1}} % \end{macrocode} % \end{macro} % @@ -2489,7 +2513,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@SinIntParen}{p} \DeclareMathOperator{\SinIntSymb}{Si} -\newcommand{\SinInt}[1]{\SinIntSymb\!\COOL@decide@paren{SinInt}{#1}} +\newcommand{\SinInt}[1]{\SinIntSymb\COOL@decide@paren{SinInt}{#1}} % \end{macrocode} % \end{macro} % @@ -2498,7 +2522,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@CosIntParen}{p} \DeclareMathOperator{\CosIntSymb}{Ci} -\newcommand{\CosInt}[1]{\CosIntSymb\!\COOL@decide@paren{CosInt}{#1}} +\newcommand{\CosInt}[1]{\CosIntSymb\COOL@decide@paren{CosInt}{#1}} % \end{macrocode} % \end{macro} % @@ -2507,7 +2531,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@SinhIntParen}{p} \DeclareMathOperator{\SinhIntSymb}{Shi} -\newcommand{\SinhInt}[1]{\SinhIntSymb\!\COOL@decide@paren{SinhInt}{#1}} +\newcommand{\SinhInt}[1]{\SinhIntSymb\COOL@decide@paren{SinhInt}{#1}} % \end{macrocode} % \end{macro} % @@ -2516,7 +2540,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@CoshIntParen}{p} \DeclareMathOperator{\CoshIntSymb}{Chi} -\newcommand{\CoshInt}[1]{\CoshIntSymb\!\COOL@decide@paren{CoshInt}{#1}} +\newcommand{\CoshInt}[1]{\CoshIntSymb\COOL@decide@paren{CoshInt}{#1}} % \end{macrocode} % \end{macro} % @@ -2698,7 +2722,7 @@ % \end{macrocode} % First print the ${}_p F_q$ % \begin{macrocode} -{}_{#2}{\COOL@notation@HypergeometricSymb}_{#3}\!% +{}_{#2}{\COOL@notation@HypergeometricSymb}_{#3}% \COOL@decide@paren{Hypergeometric}% {% \COOL@Hypergeometric@pq@ab@value{p}{#2}{a}{#4};% @@ -2785,7 +2809,7 @@ % \end{macrocode} % First print the ${}_p F_q$ % \begin{macrocode} -{}_{#2}{\COOL@notation@RegHypergeometricSymb}_{#3}\!% +{}_{#2}{\COOL@notation@RegHypergeometricSymb}_{#3}% \COOL@decide@paren{RegHypergeometric}% {% \COOL@Hypergeometric@pq@ab@value{p}{#2}{a}{#4};% @@ -2806,7 +2830,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@AppellFOneParen}{p} \newcommand{\AppellFOne}[4]% - {F_{1}\!\COOL@decide@paren{AppellFOne}{#1; #2; #3; #4}} + {F_{1}\COOL@decide@paren{AppellFOne}{#1; #2; #3; #4}} % \end{macrocode} % \end{macro} % @@ -2820,7 +2844,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@HypergeometricUSymb}{U} \newcommand{\HypergeometricU}[3]% -{\COOL@notation@HypergeometricUSymb\!\inp{#1, #2, #3}} +{\COOL@notation@HypergeometricUSymb\inp{#1, #2, #3}} % \end{macrocode} % \end{macro} % @@ -2939,7 +2963,7 @@ \listval{#5}{0}% q - m \addtocounter{COOL@ct@}{\value{COOL@listpointer}}% _{\arabic{COOL@ct},\arabic{COOL@ct@}}% - \!\left(% + \mathopen{}\left(% #6% \left|% { {#2,#3} \@@atop {#4,#5} }% @@ -2973,7 +2997,7 @@ \listval{#3}{0}% p \addtocounter{COOL@ct}{\value{COOL@listpointer}}% _{\arabic{COOL@ct},#5}% - \!\left(% + \mathopen{}\left(% #6% \left|% {% @@ -2984,7 +3008,7 @@ % else {% ^{#4,#2}_{#3,#5}% - \!\left(% + \mathopen{}\left(% #6% \left|% {% @@ -3006,7 +3030,7 @@ \listval{#5}{0}% q \addtocounter{COOL@ct}{\value{COOL@listpointer}}% _{#3, \arabic{COOL@ct}}% - \!\left(% + \mathopen{}\left(% #6% \left|% {% @@ -3222,7 +3246,7 @@ \newcommand{\COOL@notation@EllipticKParen}{p} \newcommand{\COOL@notation@EllipticKSymb}{K} \newcommand{\EllipticK}[1]% - {\COOL@notation@EllipticKSymb\!\COOL@decide@paren{EllipticK}{#1}}% + {\COOL@notation@EllipticKSymb\COOL@decide@paren{EllipticK}{#1}}% % \end{macrocode} % \end{macro} % @@ -3241,12 +3265,12 @@ \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 1}% {% - \COOL@notation@EllipticESymb\!\COOL@decide@paren{EllipticE}{#1}% + \COOL@notation@EllipticESymb\COOL@decide@paren{EllipticE}{#1}% }% % ElseIf { \ifthenelse{\value{COOL@listpointer} = 2}% {% - \COOL@notation@EllipticESymb\!% + \COOL@notation@EllipticESymb% \COOL@decide@paren{EllipticE}% {\COOL@EllipticE@arg@i \left| \, \COOL@EllipticE@arg@ii \!\!\right.}% }% @@ -3276,14 +3300,14 @@ \ifthenelse{\value{COOL@listpointer} = 2}% {% \COOL@notation@EllipticPiSymb% - \!\COOL@decide@paren{EllipticPi}% + \COOL@decide@paren{EllipticPi}% {\COOL@EllipticPi@arg@i \left| \, \COOL@EllipticPi@arg@ii \!\!\right.}% }% % ElseIf { \ifthenelse{\value{COOL@listpointer} = 3}% {% \COOL@notation@EllipticPiSymb% - \!\COOL@decide@paren{EllipticPi}% + \COOL@decide@paren{EllipticPi}% { \COOL@EllipticPi@arg@i; \,% \COOL@EllipticPi@arg@ii \left| \,% \COOL@EllipticPi@arg@iii \!\!\right.% @@ -3323,7 +3347,7 @@ \ifthenelse{ \value{COOL@listpointer} = 2 }% {% \COOL@notation@EllipticFSymb% - \!\COOL@decide@paren{EllipticF}% + \COOL@decide@paren{EllipticF}% {\COOL@EllipticF@arg@i \left| \, \COOL@EllipticF@arg@ii \!\!\right.}% }% % Else @@ -3377,7 +3401,7 @@ \newcommand{\COOL@notation@JacobiZetaSymb}{Z} \newcommand{\JacobiZeta}[2]{% \COOL@notation@JacobiZetaSymb -\!\COOL@decide@paren{JacobiZeta}{#1 \left| \, #2 \right.\!\!}% +\COOL@decide@paren{JacobiZeta}{#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} % \end{macro} @@ -3401,7 +3425,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@EllipticThetaParen}{p} \newcommand{\EllipticTheta}[3]% - {\vartheta_{#1}\!\COOL@decide@paren{EllipticTheta}{#2, #3}} + {\vartheta_{#1}\COOL@decide@paren{EllipticTheta}{#2, #3}} \newcommand{\JacobiTheta}[3]{\EllipticTheta{#1}{#2}{#3}} % \end{macrocode} % \end{macro} @@ -3419,7 +3443,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@NevilleThetaCParen}{p} \newcommand{\NevilleThetaC}[2]{% - \vartheta_{c}\!\COOL@decide@paren{NevilleThetaC}% + \vartheta_{c}\COOL@decide@paren{NevilleThetaC}% {#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -3430,7 +3454,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@NevilleThetaDParen}{p} \newcommand{\NevilleThetaD}[2]{% - \vartheta_{d}\!\COOL@decide@paren{NevilleThetaD}% + \vartheta_{d}\COOL@decide@paren{NevilleThetaD}% {#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -3441,7 +3465,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@NevilleThetaNParen}{p} \newcommand{\NevilleThetaN}[2]{% - \vartheta_{n}\!\COOL@decide@paren{NevilleThetaN}% + \vartheta_{n}\COOL@decide@paren{NevilleThetaN}% {#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -3452,7 +3476,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@NevilleThetaSParen}{p} \newcommand{\NevilleThetaS}[2]{% - \vartheta_{s}\!\COOL@decide@paren{NevilleThetaS}% + \vartheta_{s}\COOL@decide@paren{NevilleThetaS}% {#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -3485,7 +3509,7 @@ } % Else {% - \wp\!\COOL@decide@paren{WeierstrassP}{#1; #2} + \wp\COOL@decide@paren{WeierstrassP}{#1; #2} }% } \newcommand{\WeiP}[2]{\WeierstrassP{#1}{#2}} @@ -3520,12 +3544,12 @@ \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 1}% {% - \wp^{-1}\!\COOL@decide@paren{WeierstrassPInv}{#1; #2}% + \wp^{-1}\COOL@decide@paren{WeierstrassPInv}{#1; #2}% }% % ElseIf { \ifthenelse{\value{COOL@listpointer} = 2}% {% - \wp^{-1}\!\COOL@decide@paren{WeierstrassPInv}{#1; #2}% + \wp^{-1}\COOL@decide@paren{WeierstrassPInv}{#1; #2}% }% % Else {% @@ -3575,12 +3599,12 @@ \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 1}% {% - \sigma\!\inp{#1; #2}% + \sigma\inp{#1; #2}% }% % ElseIf { \ifthenelse{\value{COOL@listpointer} = 2}% {% - \sigma_{\COOL@WeiSigma@arg@z@i}\!\inp{\COOL@WeiSigma@arg@z@ii; #2}% + \sigma_{\COOL@WeiSigma@arg@z@i}\inp{\COOL@WeiSigma@arg@z@ii; #2}% }% % Else {% @@ -3627,7 +3651,7 @@ }% % Else {% - \zeta\!\COOL@decide@paren{WeierstrassZeta}{#1; #2}% + \zeta\COOL@decide@paren{WeierstrassZeta}{#1; #2}% }% } \newcommand{\WeiZeta}[2]{\WeierstrassZeta{#1}{#2}} @@ -3654,7 +3678,7 @@ }% % Else {% - \{ \omega_1\!\inp{#1}, \omega_3\!\inp{#1} \}% + \{ \omega_1\inp{#1}, \omega_3\inp{#1} \}% }% } \newcommand{\WeiHalfPeriods}[1]{\WeierstrassHalfPeriods{#1}} @@ -3681,7 +3705,7 @@ }% % Else {% - \{ g_2\!\inp{#1}, g_3\!\inp{#1} \}% + \{ g_2\inp{#1}, g_3\inp{#1} \}% }% } \newcommand{\WeiInvars}[1]{\WeierstrassInvariants{#1}} @@ -3735,9 +3759,9 @@ }% % Else {% - \{ e_1\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}},% - e_2\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}},% - e_3\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}}% + \{ e_1\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\inp{#1}},% + e_2\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\inp{#1}},% + e_3\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\inp{#1}}% \}% }% } @@ -3777,11 +3801,11 @@ {% \{% \eta_1\COOL@hideOnSF% - {WeierstrassZetaHalfPeriodValuesDisplay}{\!\inp{#1}},% + {WeierstrassZetaHalfPeriodValuesDisplay}{\inp{#1}},% \eta_2\COOL@hideOnSF% - {WeierstrassZetaHalfPeriodValuesDisplay}{\!\inp{#1}},% + {WeierstrassZetaHalfPeriodValuesDisplay}{\inp{#1}},% \eta_3\COOL@hideOnSF% - {WeierstrassZetaHalfPeriodValuesDisplay}{\!\inp{#1}}% + {WeierstrassZetaHalfPeriodValuesDisplay}{\inp{#1}}% \}% }% } @@ -3803,7 +3827,7 @@ \newcommand{\COOL@notation@JacobiAmplitudeParen}{p} \DeclareMathOperator{\JacobiAmplitudeSymb}{am} \newcommand{\JacobiAmplitude}[2]{% -\JacobiAmplitudeSymb\!\COOL@decide@paren% +\JacobiAmplitudeSymb\COOL@decide@paren% {JacobiAmplitude}{#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -3822,11 +3846,11 @@ \newcommand{\COOL@notation@JacobiCDInvParen}{p} \DeclareMathOperator{\JacobiCDSymb}{cd} \newcommand{\JacobiCD}[2]{% -\JacobiCDSymb\!\COOL@decide@paren% +\JacobiCDSymb\COOL@decide@paren% {JacobiCD}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiCDInv}[2]{% -\JacobiCDSymb^{-1}\!\COOL@decide@paren% +\JacobiCDSymb^{-1}\COOL@decide@paren% {JacobiCDInv}{#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -3846,11 +3870,11 @@ \newcommand{\COOL@notation@JacobiCNInvParen}{p} \DeclareMathOperator{\JacobiCNSymb}{cn} \newcommand{\JacobiCN}[2]{% -\JacobiCNSymb\!\COOL@decide@paren% +\JacobiCNSymb\COOL@decide@paren% {JacobiCN}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiCNInv}[2]{% -\JacobiCNSymb^{-1}\!\COOL@decide@paren% +\JacobiCNSymb^{-1}\COOL@decide@paren% {JacobiCNInv}{#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -3870,11 +3894,11 @@ \newcommand{\COOL@notation@JacobiCSInvParen}{p} \DeclareMathOperator{\JacobiCSSymb}{cs} \newcommand{\JacobiCS}[2]{% -\JacobiCSSymb\!\COOL@decide@paren% +\JacobiCSSymb\COOL@decide@paren% {JacobiCS}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiCSInv}[2]{% -\JacobiCSSymb^{-1}\!\COOL@decide@paren% +\JacobiCSSymb^{-1}\COOL@decide@paren% {JacobiCSInv}{#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -3894,11 +3918,11 @@ \newcommand{\COOL@notation@JacobiDCInvParen}{p} \DeclareMathOperator{\JacobiDCSymb}{dc} \newcommand{\JacobiDC}[2]{% -\JacobiDCSymb\!\COOL@decide@paren% +\JacobiDCSymb\COOL@decide@paren% {JacobiDC}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiDCInv}[2]{% -\JacobiDCSymb^{-1}\!\COOL@decide@paren% +\JacobiDCSymb^{-1}\COOL@decide@paren% {JacobiDCInv}{#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -3918,11 +3942,11 @@ \newcommand{\COOL@notation@JacobiDNInvParen}{p} \DeclareMathOperator{\JacobiDNSymb}{dn} \newcommand{\JacobiDN}[2]{% -\JacobiDNSymb\!\COOL@decide@paren% +\JacobiDNSymb\COOL@decide@paren% {JacobiDN}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiDNInv}[2]{% -\JacobiDNSymb^{-1}\!\COOL@decide@paren% +\JacobiDNSymb^{-1}\COOL@decide@paren% {JacobiDNInv}{#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -3942,11 +3966,11 @@ \newcommand{\COOL@notation@JacobiDSInvParen}{p} \DeclareMathOperator{\JacobiDSSymb}{ds} \newcommand{\JacobiDS}[2]{% -\JacobiDSSymb\!\COOL@decide@paren% +\JacobiDSSymb\COOL@decide@paren% {JacobiDS}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiDSInv}[2]{% -\JacobiDSSymb^{-1}\!\COOL@decide@paren% +\JacobiDSSymb^{-1}\COOL@decide@paren% {JacobiDSInv}{#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -3966,11 +3990,11 @@ \newcommand{\COOL@notation@JacobiNCInvParen}{p} \DeclareMathOperator{\JacobiNCSymb}{nc} \newcommand{\JacobiNC}[2]{% -\JacobiNCSymb\!\COOL@decide@paren% +\JacobiNCSymb\COOL@decide@paren% {JacobiNC}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiNCInv}[2]{% -\JacobiNCSymb^{-1}\!\COOL@decide@paren% +\JacobiNCSymb^{-1}\COOL@decide@paren% {JacobiNCInv}{#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -3990,11 +4014,11 @@ \newcommand{\COOL@notation@JacobiNDInvParen}{p} \DeclareMathOperator{\JacobiNDSymb}{nd} \newcommand{\JacobiND}[2]{% -\JacobiNDSymb\!\COOL@decide@paren% +\JacobiNDSymb\COOL@decide@paren% {JacobiND}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiNDInv}[2]{% -\JacobiNDSymb^{-1}\!\COOL@decide@paren% +\JacobiNDSymb^{-1}\COOL@decide@paren% {JacobiNDInv}{#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -4014,11 +4038,11 @@ \newcommand{\COOL@notation@JacobiNSInvParen}{p} \DeclareMathOperator{\JacobiNSSymb}{ns} \newcommand{\JacobiNS}[2]{% -\JacobiNSSymb\!\COOL@decide@paren% +\JacobiNSSymb\COOL@decide@paren% {JacobiNS}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiNSInv}[2]{% -\JacobiNSSymb^{-1}\!\COOL@decide@paren% +\JacobiNSSymb^{-1}\COOL@decide@paren% {JacobiNSInv}{#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -4038,11 +4062,11 @@ \newcommand{\COOL@notation@JacobiSCInvParen}{p} \DeclareMathOperator{\JacobiSCSymb}{sc} \newcommand{\JacobiSC}[2]{% -\JacobiSCSymb\!\COOL@decide@paren% +\JacobiSCSymb\COOL@decide@paren% {JacobiSC}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiSCInv}[2]{% -\JacobiSCSymb^{-1}\!\COOL@decide@paren% +\JacobiSCSymb^{-1}\COOL@decide@paren% {JacobiSCInv}{#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -4062,11 +4086,11 @@ \newcommand{\COOL@notation@JacobiSDInvParen}{p} \DeclareMathOperator{\JacobiSDSymb}{sd} \newcommand{\JacobiSD}[2]{% -\JacobiSDSymb\!\COOL@decide@paren% +\JacobiSDSymb\COOL@decide@paren% {JacobiSD}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiSDInv}[2]{% -\JacobiSDSymb^{-1}\!\COOL@decide@paren% +\JacobiSDSymb^{-1}\COOL@decide@paren% {JacobiSDInv}{#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -4086,11 +4110,11 @@ \newcommand{\COOL@notation@JacobiSNInvParen}{p} \DeclareMathOperator{\JacobiSNSymb}{sn} \newcommand{\JacobiSN}[2]{% -\JacobiSNSymb\!\COOL@decide@paren% +\JacobiSNSymb\COOL@decide@paren% {JacobiSN}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiSNInv}[2]{% -\JacobiSNSymb^{-1}\!\COOL@decide@paren% +\JacobiSNSymb^{-1}\COOL@decide@paren% {JacobiSNInv}{#1 \left| \, #2 \right.\!\!}% } % \end{macrocode} @@ -4107,7 +4131,7 @@ % Dedekind eta modular function, |\DedekindEta{z}|, $\DedekindEta{z}$ % \begin{macrocode} \newcommand{\COOL@notation@DedekindEtaParen}{p} -\newcommand{\DedekindEta}[1]{\eta\!\COOL@decide@paren{DedekindEta}{#1}} +\newcommand{\DedekindEta}[1]{\eta\COOL@decide@paren{DedekindEta}{#1}} % \end{macrocode} % \end{macro} % @@ -4116,7 +4140,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@KleinInvariantJParen}{p} \newcommand{\KleinInvariantJ}[1]% - {J\!\COOL@decide@paren{KleinInvariantJ}{#1}} + {J\COOL@decide@paren{KleinInvariantJ}{#1}} % \end{macrocode} % \end{macro} % @@ -4125,7 +4149,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@ModularLambdaParen}{p} \newcommand{\ModularLambda}[1]% - {\lambda\!\COOL@decide@paren{ModularLambda}{#1}} + {\lambda\COOL@decide@paren{ModularLambda}{#1}} % \end{macrocode} % \end{macro} % @@ -4141,9 +4165,9 @@ \newcommand{\COOL@notation@EllipticNomeQParen}{p} \newcommand{\COOL@notation@EllipticNomeQInvParen}{p} \newcommand{\EllipticNomeQ}[1]% - {q\!\COOL@decide@paren{EllipticNomeQ}{#1}} + {q\COOL@decide@paren{EllipticNomeQ}{#1}} \newcommand{\EllipticNomeQInv}[1]% - {q^{-1}\!\COOL@decide@paren{EllipticNomeQ}{#1}} + {q^{-1}\COOL@decide@paren{EllipticNomeQ}{#1}} % \end{macrocode} % \end{macro} % \end{macro} @@ -4166,7 +4190,7 @@ \newcommand{\COOL@notation@ArithGeoMeanParen}{p} \DeclareMathOperator{\ArithGeoMeanSymb}{agm} \newcommand{\ArithGeoMean}[2]% - {\ArithGeoMeanSymb\!\COOL@decide@paren{ArithGeoMean}{#1, #2}} + {\ArithGeoMeanSymb\COOL@decide@paren{ArithGeoMean}{#1, #2}} \newcommand{\AGM}[2]{\ArithGeoMean{#1}{#2}} % \end{macrocode} % \end{macro} @@ -4200,7 +4224,7 @@ }% % Else {% - \EllipticExpSymb\!\COOL@decide@paren{EllipticExp}{#1; #2}% + \EllipticExpSymb\COOL@decide@paren{EllipticExp}{#1; #2}% }% } \newcommand{\EExp}[2]{\EllipticExp{#1}{#2}} @@ -4240,7 +4264,7 @@ }% % Else {% - \EllipticLogSymb\!\COOL@decide@paren{EllipticLog}{#1; #2}% + \EllipticLogSymb\COOL@decide@paren{EllipticLog}{#1; #2}% }% }% } @@ -4293,13 +4317,13 @@ \listval{#1}{0}% get the list length \ifthenelse{\value{COOL@listpointer} = 2}% {% - \zeta\!\COOL@decide@paren{Zeta}{\COOL@Zeta@arg@i,\COOL@Zeta@arg@ii}% + \zeta\COOL@decide@paren{Zeta}{\COOL@Zeta@arg@i,\COOL@Zeta@arg@ii}% }% % else {% \ifthenelse{\value{COOL@listpointer} = 1}% {% - \zeta\!\COOL@decide@paren{Zeta}{#1}% + \zeta\COOL@decide@paren{Zeta}{#1}% }% % else {% @@ -4317,7 +4341,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@RiemannSiegelThetaParen}{p} \newcommand{\RiemannSiegelTheta}[1]% - {\vartheta\!\COOL@decide@paren{RiemannSiegelTheta}{#1}} + {\vartheta\COOL@decide@paren{RiemannSiegelTheta}{#1}} % \end{macrocode} % \end{macro} % @@ -4326,7 +4350,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@RiemannSiegelZParen}{p} \newcommand{\RiemannSiegelZ}[1]% - {Z\!\COOL@decide@paren{RiemannSiegelZ}{#1}} + {Z\COOL@decide@paren{RiemannSiegelZ}{#1}} % \end{macrocode} % \end{macro} % @@ -4341,7 +4365,7 @@ % Lerch transcendent, |\LerchPhi{z}{s}{a}|, $\LerchPhi{z}{s}{a}$ % \begin{macrocode} \newcommand{\COOL@notation@LerchPhiParen}{p} -\newcommand{\LerchPhi}[3]{\Phi\!\COOL@decide@paren{LerchPhi}{#1,#2,#3}} +\newcommand{\LerchPhi}[3]{\Phi\COOL@decide@paren{LerchPhi}{#1,#2,#3}} % \end{macrocode} % \end{macro} % @@ -4356,7 +4380,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@NielsenPolyLogParen}{p} \newcommand{% -\NielsenPolyLog}[3]{S_{#1}^{#2}\!% +\NielsenPolyLog}[3]{S_{#1}^{#2}% \COOL@decide@paren{NielsenPolyLog}{#3}% } % \end{macrocode} @@ -4384,7 +4408,7 @@ {% \ifthenelse{ \value{COOL@listpointer} = 2 }% {% - \PolyLogSymb_{\COOL@PolyLog@arg@i}\!% + \PolyLogSymb_{\COOL@PolyLog@arg@i}% \COOL@decide@paren{PolyLog}{\COOL@PolyLog@arg@ii}% }% % else @@ -4418,7 +4442,7 @@ \newcommand{\COOL@notation@MathieuCParen}{p} \DeclareMathOperator{\MathieuCSymb}{Ce} \newcommand{\MathieuC}[3]% - {\MathieuCSymb\!\COOL@decide@paren{MathieuC}{#1,#2,#3}} + {\MathieuCSymb\COOL@decide@paren{MathieuC}{#1,#2,#3}} % \end{macrocode} % \end{macro} % @@ -4428,7 +4452,7 @@ \newcommand{\COOL@notation@MathieuSParen}{p} \DeclareMathOperator{\MathieuSSymb}{Se} \newcommand{\MathieuS}[3]% - {\mathord{\MathieuSSymb}\!\COOL@decide@paren{MathieuS}{#1,#2,#3}} + {\mathord{\MathieuSSymb}\COOL@decide@paren{MathieuS}{#1,#2,#3}} % \end{macrocode} % \end{macro} % @@ -4449,7 +4473,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@MathieuCharacteristicAParen}{p} \newcommand{\MathieuCharacteristicA}[2]% - {a_{#1}\!\COOL@decide@paren{MathieuCharacteristicA}{#2}} + {a_{#1}\COOL@decide@paren{MathieuCharacteristicA}{#2}} \newcommand{\MathieuCharisticA}[2]{\MathieuCharacteristicA{#1}{#2}} % \end{macrocode} % \end{macro} @@ -4466,7 +4490,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@MathieuCharacteristicBParen}{p} \newcommand{\MathieuCharacteristicB}[2]% - {b_{#1}\!\COOL@decide@paren{MathieuCharacteristicB}{#2}} + {b_{#1}\COOL@decide@paren{MathieuCharacteristicB}{#2}} \newcommand{\MathieuCharisticB}[2]{\MathieuCharacteristicB{#1}{#2}} % \end{macrocode} % \end{macro} @@ -4483,7 +4507,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@MathieuCharacteristicExponentParen}{p} \newcommand{\MathieuCharacteristicExponent}[2]% - {r\!\COOL@decide@paren{MathieuCharacteristicExponent}{#1,#2}} + {r\COOL@decide@paren{MathieuCharacteristicExponent}{#1,#2}} \newcommand{\MathieuCharisticExp}[2]% {\MathieuCharacteristicExponent{#1}{#2}} % \end{macrocode} @@ -4506,7 +4530,7 @@ % \begin{macro}{\Arg} % Argument, |\Arg{z}|, $\Arg{z}$ % \begin{macrocode} -\newcommand{\Arg}[1]{ \arg\!\inp{#1} } +\newcommand{\Arg}[1]{ \arg\inp{#1} } % \end{macrocode} % \end{macro} % @@ -4563,7 +4587,7 @@ }% % Else {% - \RealSymb\!\COOL@decide@paren{Imag}{#1}% + \RealSymb\COOL@decide@paren{Imag}{#1}% }% } % \end{macrocode} @@ -4584,7 +4608,7 @@ }% % Else {% - \ImagSymb\!\COOL@decide@paren{Imag}{#1}% + \ImagSymb\COOL@decide@paren{Imag}{#1}% }% } % \end{macrocode} @@ -4594,7 +4618,7 @@ % Sign function, |\Sign{x}|, $\Sign{x}$ % \begin{macrocode} \newcommand{\COOL@notation@SignParen}{p} -\newcommand{\Sign}[1]{\operatorname{sgn}\!\COOL@decide@paren{Sign}{#1}} +\newcommand{\Sign}[1]{\operatorname{sgn}\COOL@decide@paren{Sign}{#1}} % \end{macrocode} % \end{macro} % @@ -4611,7 +4635,7 @@ \newcommand{\COOL@notation@FactorIntegerParen}{p} \DeclareMathOperator{\FactorIntegerSymb}{factors} \newcommand{\FactorInteger}[1]% - {\FactorIntegerSymb\!\COOL@decide@paren{FactorInteger}{#1}} + {\FactorIntegerSymb\COOL@decide@paren{FactorInteger}{#1}} \newcommand{\Factors}[1]{\FactorInteger{#1}} % \end{macrocode} % \end{macro} @@ -4623,7 +4647,7 @@ \newcommand{\COOL@notation@DivisorsParen}{p} \DeclareMathOperator{\DivisorsSymb}{divisors} \newcommand{\Divisors}[1]% - {\mathord{\DivisorsSymb}\!\COOL@decide@paren{Divisors}{#1}} + {\mathord{\DivisorsSymb}\COOL@decide@paren{Divisors}{#1}} % \end{macrocode} % \end{macro} % @@ -4633,7 +4657,7 @@ \newcommand{\COOL@notation@PrimeParen}{p} \DeclareMathOperator{\PrimeSymb}{prime} \newcommand{\Prime}[1]% - {\mathord{\PrimeSymb}\!\COOL@decide@paren{Prime}{#1}} + {\mathord{\PrimeSymb}\COOL@decide@paren{Prime}{#1}} % \end{macrocode} % \end{macro} % @@ -4641,7 +4665,7 @@ % Prime counting function, |\PrimePi{x}|, $\PrimePi{x}$ % \begin{macrocode} \newcommand{\COOL@notation@PrimePiParen}{p} -\newcommand{\PrimePi}[1]{\pi\!\COOL@decide@paren{PrimePi}{#1}} +\newcommand{\PrimePi}[1]{\pi\COOL@decide@paren{PrimePi}{#1}} % \end{macrocode} % \end{macro} % @@ -4650,7 +4674,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@DivisorSigmaParen}{p} \newcommand{\DivisorSigma}[2]% - {\sigma_{#1}\!\COOL@decide@paren{DivisorSigma}{#2}} + {\sigma_{#1}\COOL@decide@paren{DivisorSigma}{#2}} % \end{macrocode} % \end{macro} % @@ -4658,7 +4682,7 @@ % Euler Totient Function, |\EulerPhi{x}|, $\EulerPhi{x}$ % \begin{macrocode} \newcommand{\COOL@notation@EulerPhiParen}{p} -\newcommand{\EulerPhi}[1]{\varphi\!\COOL@decide@paren{EulerPhi}{#1}} +\newcommand{\EulerPhi}[1]{\varphi\COOL@decide@paren{EulerPhi}{#1}} % \end{macrocode} % \end{macro} % @@ -4666,7 +4690,7 @@ % Moebius Function, |\MoebiusMu{x}|, $\MoebiusMu{x}$ % \begin{macrocode} \newcommand{\COOL@notation@MoebiusMuParen}{p} -\newcommand{\MoebiusMu}[1]{\mu\!\COOL@decide@paren{MoebiusMu}{#1}} +\newcommand{\MoebiusMu}[1]{\mu\COOL@decide@paren{MoebiusMu}{#1}} % \end{macrocode} % \end{macro} % @@ -4682,7 +4706,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@CarmichaelLambdaParen}{p} \newcommand{\CarmichaelLambda}[1]% - {\lambda\!\COOL@decide@paren{CarmichaelLambda}{#1}} + {\lambda\COOL@decide@paren{CarmichaelLambda}{#1}} % \end{macrocode} % \end{macro} % @@ -4703,19 +4727,19 @@ \addtocounter{COOL@ct@}{-1}% \forLoop{1}{\arabic{COOL@ct@}}{COOL@ct}% {% - s^{\arabic{COOL@ct}}_{#2}\!\inp{#1}, + s^{\arabic{COOL@ct}}_{#2}\inp{#1}, }% - s^{\inp{0}}_{#2}\!\inp{#1}% + s^{\inp{0}}_{#2}\inp{#1}% \}% }% % else {% \{% - s^{\inp{1}}_{#2}\!\inp{#1},% - s^{\inp{2}}_{#2}\!\inp{#1},% + s^{\inp{1}}_{#2}\inp{#1},% + s^{\inp{2}}_{#2}\inp{#1},% \ldots,% - s^{\inp{#2} - 1}_{#2}\!\inp{#1},% - s^{\inp{0}}_{#2}\!\inp{#1}% + s^{\inp{#2} - 1}_{#2}\inp{#1},% + s^{\inp{0}}_{#2}\inp{#1}% \}% }% } @@ -4732,7 +4756,7 @@ % Dirac Delta Function, |\DiracDelta{x}|, $\DiracDelta{x}$ % \begin{macrocode} \newcommand{\COOL@notation@DiracDeltaParen}{p} -\newcommand{\DiracDelta}[1]{\delta\!\COOL@decide@paren{DiracDelta}{#1}} +\newcommand{\DiracDelta}[1]{\delta\COOL@decide@paren{DiracDelta}{#1}} % \end{macrocode} % \end{macro} % @@ -4747,7 +4771,7 @@ % \begin{macrocode} \newcommand{\COOL@notation@HeavisideStepParen}{p} \newcommand{\HeavisideStep}[1]% - {\theta\!\COOL@decide@paren{HeavisideStep}{#1}} + {\theta\COOL@decide@paren{HeavisideStep}{#1}} \newcommand{\UnitStep}[1]{\HeavisideStep{#1}} % \end{macrocode} % \end{macro} @@ -4792,7 +4816,7 @@ % % \meta{wrt} is a comma separated list of length $\ge$ 1. % -% \meta{symbol} is passed by |\D| or |\pderiv| and is `d' or `$\partial$' respectively +% \meta{symbol} is passed by |\D| or |\pderiv| and is |\COOL@notation@DSymb| or `$\partial$' respectively % % \begin{tabular}{ll} % |\COOL@derivative{2,3}{f}{x,y,z}{d}| & \makeatletter @@ -4817,7 +4841,7 @@ % \\ % |\Style{DDisplayFunc=outset}| \Style{DDisplayFunc=outset} % \\ -% |\COOL@derivative{2,n}{f}{x,y,z}{d}| & \makeatletter +% |\COOL@derivative{2,n}{f}{x,y,z}{d}| & \makeatletter % $\COOL@derivative{2,n}{f}{x,y,z}{d}$ % \makeatother % \\ @@ -4841,6 +4865,7 @@ % \makeatother % \end{tabular} % \begin{macrocode} + \newcommand{\COOL@notation@DSymb}{d} \newcommand{\COOL@derivative}[4]{% % \end{macrocode} % Get the length of \meta{wrt} argument. @@ -4897,12 +4922,12 @@ \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@bot% - {\COOL@temp@D@bot #4 \COOL@wrt@temp}% + {\COOL@temp@D@bot {#4} \COOL@wrt@temp}% }% % Else {% \edef\COOL@temp@D@bot% - {\COOL@temp@D@bot #4 \COOL@wrt@temp^\COOL@power@temp}% + {\COOL@temp@D@bot {#4} \COOL@wrt@temp^\COOL@power@temp}% }% }% % \end{macrocode} @@ -4924,12 +4949,12 @@ \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@bot% - {\COOL@temp@D@bot #4 \COOL@wrt@temp}% + {\COOL@temp@D@bot {#4} \COOL@wrt@temp}% }% % Else {% \edef\COOL@temp@D@bot% - {\COOL@temp@D@bot #4 \COOL@wrt@temp^\COOL@power@temp}% + {\COOL@temp@D@bot {#4} \COOL@wrt@temp^\COOL@power@temp}% }% }% }% @@ -4937,11 +4962,11 @@ {}% \ifthenelse{\value{COOL@ct@}=1}% {% - \frac{#4 #2}{\COOL@temp@D@bot}% + \frac{{#4} #2}{\COOL@temp@D@bot}% }% % Else {% - \frac{#4^{\arabic{COOL@ct@}} #2}{\COOL@temp@D@bot}% + \frac{{#4}^{\arabic{COOL@ct@}} #2}{\COOL@temp@D@bot}% }% }% % Else @@ -4970,12 +4995,12 @@ \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@bot% - {\COOL@temp@D@bot #4 \COOL@wrt@temp}% + {\COOL@temp@D@bot {#4} \COOL@wrt@temp}% }% % Else {% \edef\COOL@temp@D@bot% - {\COOL@temp@D@bot #4 \COOL@wrt@temp^\COOL@power@temp}% + {\COOL@temp@D@bot {#4} \COOL@wrt@temp^\COOL@power@temp}% }% }% % \end{macrocode} @@ -5004,18 +5029,18 @@ \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@bot% - {\COOL@temp@D@bot #4 \COOL@wrt@temp}% + {\COOL@temp@D@bot {#4} \COOL@wrt@temp}% }% % Else {% \edef\COOL@temp@D@bot% - {\COOL@temp@D@bot #4 \COOL@wrt@temp^\COOL@power@temp}% + {\COOL@temp@D@bot {#4} \COOL@wrt@temp^\COOL@power@temp}% }% }% }% % Else {}% - \frac{#4^{\COOL@temp@D@top@power} #2}{\COOL@temp@D@bot}% + \frac{{#4}^{\COOL@temp@D@top@power} #2}{\COOL@temp@D@bot}% }% }% % \end{macrocode} @@ -5047,12 +5072,12 @@ \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@bot% - {\COOL@temp@D@bot #4 \COOL@wrt@temp}% + {\COOL@temp@D@bot {#4} \COOL@wrt@temp}% }% % Else {% \edef\COOL@temp@D@bot% - {\COOL@temp@D@bot #4 \COOL@wrt@temp^\COOL@power@temp}% + {\COOL@temp@D@bot {#4} \COOL@wrt@temp^\COOL@power@temp}% }% }% % \end{macrocode} @@ -5074,12 +5099,12 @@ \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@bot% - {\COOL@temp@D@bot #4 \COOL@wrt@temp}% + {\COOL@temp@D@bot {#4} \COOL@wrt@temp}% }% % Else {% \edef\COOL@temp@D@bot% - {\COOL@temp@D@bot #4 \COOL@wrt@temp^\COOL@power@temp}% + {\COOL@temp@D@bot {#4} \COOL@wrt@temp^\COOL@power@temp}% }% }% }% @@ -5091,7 +5116,7 @@ }% % Else {% - \frac{#4^{\arabic{COOL@ct@}}}{\COOL@temp@D@bot} #2% + \frac{{#4}^{\arabic{COOL@ct@}}}{\COOL@temp@D@bot} #2% }% }% % Else @@ -5120,12 +5145,12 @@ \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@bot% - {\COOL@temp@D@bot #4 \COOL@wrt@temp}% + {\COOL@temp@D@bot {#4} \COOL@wrt@temp}% }% % Else {% \edef\COOL@temp@D@bot% - {\COOL@temp@D@bot #4 \COOL@wrt@temp^\COOL@power@temp}% + {\COOL@temp@D@bot {#4} \COOL@wrt@temp^\COOL@power@temp}% }% }% % \end{macrocode} @@ -5154,18 +5179,18 @@ \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@bot% - {\COOL@temp@D@bot #4 \COOL@wrt@temp}% + {\COOL@temp@D@bot {#4} \COOL@wrt@temp}% }% % Else {% \edef\COOL@temp@D@bot% - {\COOL@temp@D@bot #4 \COOL@wrt@temp^\COOL@power@temp}% + {\COOL@temp@D@bot {#4} \COOL@wrt@temp^\COOL@power@temp}% }% }% }% % Else {}% - \frac{#4^{\COOL@temp@D@top@power} }{\COOL@temp@D@bot} #2% + \frac{{#4}^{\COOL@temp@D@top@power} }{\COOL@temp@D@bot} #2% }% }% % \end{macrocode} @@ -5195,12 +5220,12 @@ \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@top{#4}% - \edef\COOL@temp@D@bot{#4 \COOL@wrt@temp}% + \edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp}% }% % Else {% - \edef\COOL@temp@D@top{#4^\COOL@power@temp}% - \edef\COOL@temp@D@bot{#4 \COOL@wrt@temp^\COOL@power@temp}% + \edef\COOL@temp@D@top{{#4}^\COOL@power@temp}% + \edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp^\COOL@power@temp}% }% \edef\COOL@temp@D@result% {\COOL@temp@D@result \frac{\COOL@temp@D@top}{\COOL@temp@D@bot}}% @@ -5221,12 +5246,12 @@ \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@top{#4}% - \edef\COOL@temp@D@bot{#4 \COOL@wrt@temp}% + \edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp}% }% % Else {% - \edef\COOL@temp@D@top{#4^\COOL@power@temp}% - \edef\COOL@temp@D@bot{#4 \COOL@wrt@temp^\COOL@power@temp}% + \edef\COOL@temp@D@top{{#4}^\COOL@power@temp}% + \edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp^\COOL@power@temp}% }% \edef\COOL@temp@D@result% {\COOL@temp@D@result \frac{\COOL@temp@D@top}{\COOL@temp@D@bot}}% @@ -5241,12 +5266,12 @@ \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@top{#4}% - \edef\COOL@temp@D@bot{#4 \COOL@wrt@temp}% + \edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp}% }% % Else {% - \edef\COOL@temp@D@top{#4^\COOL@power@temp}% - \edef\COOL@temp@D@bot{#4 \COOL@wrt@temp^\COOL@power@temp}% + \edef\COOL@temp@D@top{{#4}^\COOL@power@temp}% + \edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp^\COOL@power@temp}% }% \edef\COOL@temp@D@result% {\COOL@temp@D@result \frac{\COOL@temp@D@top}{\COOL@temp@D@bot}}% @@ -5259,12 +5284,12 @@ \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@top{#4}% - \edef\COOL@temp@D@bot{#4 \COOL@wrt@temp}% + \edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp}% }% % Else {% - \edef\COOL@temp@D@top{#4^\COOL@power@temp}% - \edef\COOL@temp@D@bot{#4 \COOL@wrt@temp^\COOL@power@temp}% + \edef\COOL@temp@D@top{{#4}^\COOL@power@temp}% + \edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp^\COOL@power@temp}% }% \edef\COOL@temp@D@result% {\COOL@temp@D@result \frac{\COOL@temp@D@top #2}{\COOL@temp@D@bot}}% @@ -5281,12 +5306,12 @@ \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@top{#4}% - \edef\COOL@temp@D@bot{#4 \COOL@wrt@temp}% + \edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp}% }% % Else {% - \edef\COOL@temp@D@top{#4^\COOL@power@temp}% - \edef\COOL@temp@D@bot{#4 \COOL@wrt@temp^\COOL@power@temp}% + \edef\COOL@temp@D@top{{#4}^\COOL@power@temp}% + \edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp^\COOL@power@temp}% }% \edef\COOL@temp@D@result% {\COOL@temp@D@result \frac{\COOL@temp@D@top #2}{\COOL@temp@D@bot}}% @@ -5318,12 +5343,12 @@ \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@top{#4}% - \edef\COOL@temp@D@bot{#4 \COOL@wrt@temp}% + \edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp}% }% % Else {% - \edef\COOL@temp@D@top{#4^\COOL@power@temp}% - \edef\COOL@temp@D@bot{#4 \COOL@wrt@temp^\COOL@power@temp}% + \edef\COOL@temp@D@top{{#4}^\COOL@power@temp}% + \edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp^\COOL@power@temp}% }% \edef\COOL@temp@D@result% {\COOL@temp@D@result \frac{\COOL@temp@D@top}{\COOL@temp@D@bot}}% @@ -5344,12 +5369,12 @@ \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@top{#4}% - \edef\COOL@temp@D@bot{#4 \COOL@wrt@temp}% + \edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp}% }% % Else {% - \edef\COOL@temp@D@top{#4^\COOL@power@temp}% - \edef\COOL@temp@D@bot{#4 \COOL@wrt@temp^\COOL@power@temp}% + \edef\COOL@temp@D@top{{#4}^\COOL@power@temp}% + \edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp^\COOL@power@temp}% }% \edef\COOL@temp@D@result% {\COOL@temp@D@result \frac{\COOL@temp@D@top}{\COOL@temp@D@bot}}% @@ -5381,6 +5406,7 @@ % Derivatives % % \begin{tabular}{ll} +% |\Style{DSymb={\mathrm d}}| \Style{DSymb={\mathrm d}} \\ % |\D{f}{x}| & \vspace{0.15cm}$\D{f}{x}$ \\ % |\D[n]{f}{x}| & \vspace{0.15cm}$\D[n]{f}{x}$ \\ % |\D{f}{x,y,z}| & \vspace{0.15cm}$\D{f}{x,y,z}$ \\ @@ -5391,7 +5417,7 @@ % |\pderiv[1,2,1]{f}{x,y,z}| & \vspace{0.15cm}$\pderiv[1,2,1]{f}{x,y,z}$ \\ % \end{tabular} % \begin{macrocode} -\newcommand{\D}[3][1]{\COOL@derivative{#1}{#2}{#3}{d}} +\newcommand{\D}[3][1]{\COOL@derivative{#1}{#2}{#3}{{\COOL@notation@DSymb}}} \newcommand{\pderiv}[3][1]{\COOL@derivative{#1}{#2}{#3}{\partial}} % \end{macrocode} % \end{macro} @@ -5419,8 +5445,8 @@ % \end{tabular} % \\ % \\ -% |\Style{IntegrateDisplayFunc=outset}|% -% \Style{IntegrateDisplayFunc=outset} +% |\Style{IntegrateDisplayFunc=outset,IntegrateDifferentialDSymb=\text{d}}|% +% \Style{IntegrateDisplayFunc=outset,IntegrateDifferentialDSymb=\text{d}} % \\ % \begin{tabular}{ll} % |\Integrate{f}{x}| & \vspace{0.15cm}$\Integrate{f}{x}$ \\ @@ -5435,6 +5461,7 @@ % \end{tabular} % \begin{macrocode} \newcommand{\COOL@notation@IntegrateDisplayFunc}{inset} + \newcommand{\COOL@notation@IntegrateDifferentialDSymb}{d} \newcommand{\Integrate}[2]{% \listval{#2}{0}% % \end{macrocode} @@ -5445,12 +5472,12 @@ {% \ifthenelse{\equal{\COOL@notation@IntegrateDisplayFunc}{outset}}% {% - \int \! d#2 \, #1% + \int \! \COOL@notation@IntegrateDifferentialDSymb{}#2 \, #1% }% % ElseIf { \ifthenelse{\equal{\COOL@notation@IntegrateDisplayFunc}{inset}}% {% - \int #1 \, d#2% + \int #1 \, \COOL@notation@IntegrateDifferentialDSymb{}#2% }% % Else {% @@ -5463,12 +5490,14 @@ {% \ifthenelse{\equal{\COOL@notation@IntegrateDisplayFunc}{outset}}% {% - \int_{\listval{#2}{2}} \! d{\listval{#2}{1}} \, #1% + \int_{\listval{#2}{2}} \! + \COOL@notation@IntegrateDifferentialDSymb{}{\listval{#2}{1}} \, #1% }% % ElseIf { \ifthenelse{\equal{\COOL@notation@IntegrateDisplayFunc}{inset}}% {% - \int_{\listval{#2}{2}} #1 \, d{\listval{#2}{1}}% + \int_{\listval{#2}{2}} #1 \, + \COOL@notation@IntegrateDifferentialDSymb{}{\listval{#2}{1}}% }% % Else {% @@ -5481,12 +5510,14 @@ {% \ifthenelse{\equal{\COOL@notation@IntegrateDisplayFunc}{outset}}% {% - \int_{\listval{#2}{2}}^{\listval{#2}{3}} \! d{\listval{#2}{1}} \, #1% + \int_{\listval{#2}{2}}^{\listval{#2}{3}} \! + \COOL@notation@IntegrateDifferentialDSymb{}{\listval{#2}{1}} \, #1% }% % ElseIf { \ifthenelse{\equal{\COOL@notation@IntegrateDisplayFunc}{inset}}% {% - \int_{\listval{#2}{2}}^{\listval{#2}{3}} #1 \, d{\listval{#2}{1}}% + \int_{\listval{#2}{2}}^{\listval{#2}{3}} #1 \, + \COOL@notation@IntegrateDifferentialDSymb{}{\listval{#2}{1}}% }% % Else {% @@ -5712,13 +5743,14 @@ \newcommand{\COOL@notation@IdentityMatrixParen}{p} \newcounter{COOL@row}% \newcounter{COOL@col}% + \newcommand{\COOL@notation@IdentityMatrixSymb}{\mathbbm{1}} \newcommand{\IdentityMatrix}[1][0]{% \isint{#1}% \ifthenelse{\boolean{COOL@isint}}% {% \ifthenelse{ #1=0 }% {% - \mathbb{I}% + \COOL@notation@IdentityMatrixSymb% }% % Else {% @@ -5774,7 +5806,7 @@ }% % Else {% - \mathbb{I}% + \COOL@notation@IdentityMatrixSymb% }% }% % \end{macrocode} diff --git a/Master/texmf-dist/source/latex/cool/cool.ins b/Master/texmf-dist/source/latex/cool/cool.ins index 0f41b595606..cf0c9ee534b 100644 --- a/Master/texmf-dist/source/latex/cool/cool.ins +++ b/Master/texmf-dist/source/latex/cool/cool.ins @@ -1,40 +1,40 @@ -%% -%% Copyright (C) 2005 by nsetzer -%% -%% This file may be distributed and/or modified under the -%% conditions of the Lesser General Product License -%% - -\input docstrip.tex - -\keepsilent - -\usedir{texmf/tex/latex/cool} - -\preamble - -This is a generated file - -This file may be distributed and/or modified under the -conditions of the Limited General Product License - -\endpreamble - - -\generate{\file{cool.sty}{\from{cool.dtx}{package}}} - -\obeyspaces -\Msg{****************************************************} -\Msg{* *} -\Msg{* To finish the installation you have to move the *} -\Msg{* following file into a directory searched by TeX: *} -\Msg{* *} -\Msg{* cool.sty *} -\Msg{* *} -\Msg{* To produce the documentation run the file *} -\Msg{* cool.dtx through LaTeX. *} -\Msg{* *} -\Msg{* *} -\Msg{****************************************************} - +%% +%% Copyright (C) 2005 by nsetzer +%% +%% This file may be distributed and/or modified under the +%% conditions of the Lesser General Product License +%% + +\input docstrip.tex + +\keepsilent + +\usedir{texmf/tex/latex/cool} + +\preamble + +This is a generated file + +This file may be distributed and/or modified under the +conditions of the Limited General Product License + +\endpreamble + + +\generate{\file{cool.sty}{\from{cool.dtx}{package}}} + +\obeyspaces +\Msg{****************************************************} +\Msg{* *} +\Msg{* To finish the installation you have to move the *} +\Msg{* following file into a directory searched by TeX: *} +\Msg{* *} +\Msg{* cool.sty *} +\Msg{* *} +\Msg{* To produce the documentation run the file *} +\Msg{* cool.dtx through LaTeX. *} +\Msg{* *} +\Msg{* *} +\Msg{****************************************************} + \endbatchfile \ No newline at end of file diff --git a/Master/texmf-dist/tex/latex/cool/cool.sty b/Master/texmf-dist/tex/latex/cool/cool.sty index 51fa1ffe6fd..dbce86e8283 100644 --- a/Master/texmf-dist/tex/latex/cool/cool.sty +++ b/Master/texmf-dist/tex/latex/cool/cool.sty @@ -13,13 +13,14 @@ %% \NeedsTeXFormat{LaTeX2e}[1999/12/01] \ProvidesPackage{cool} - [2006/09/17 v1.2 COntent Oriented LaTeX] + [2006/10/07 v1.3 COntent Oriented LaTeX] \RequirePackage{ifthen} \RequirePackage{coollist} \RequirePackage{coolstr} \RequirePackage{forloop} \RequirePackage{amsmath} \RequirePackage{amssymb} +\RequirePackage{bbm} %% \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 @@ -37,13 +38,13 @@ %% Right brace \} Tilde \~} \newcounter{COOL@ct} %just a general counter \newcounter{COOL@ct@}%just a general counter -\newcommand{\inp}[2][0cm]{\left(#2\parbox[h][#1]{0cm}{}\right)} +\newcommand{\inp}[2][0cm]{\mathopen{}\left(#2\parbox[h][#1]{0cm}{}\right)} % in parentheses () -\newcommand{\inb}[2][0cm]{\left[#2\parbox[h][#1]{0cm}{}\right]} +\newcommand{\inb}[2][0cm]{\mathopen{}\left[#2\parbox[h][#1]{0cm}{}\right]} % in brackets [] -\newcommand{\inbr}[2][0cm]{\left\{#2\parbox[h][#1]{0cm}{}\right\}} -\newcommand{\inap}[2][0cm]{\left<{#2}\parbox[h][#1]{0cm}{}\right>} -\newcommand{\nop}[1]{\left.{#1}\right.} +\newcommand{\inbr}[2][0cm]{\mathopen{}\left\{#2\parbox[h][#1]{0cm}{}\right\}} +\newcommand{\inap}[2][0cm]{\mathopen{}\left<{#2}\parbox[h][#1]{0cm}{}\right>} +\newcommand{\nop}[1]{\mathopen{}\left.{#1}\right.} \let\COOL@decide@paren@no@type=\relax \newcommand{\COOL@decide@paren}[3][\COOL@decide@paren@no@type]{% \ifthenelse{ \equal{#1}{\COOL@decide@paren@no@type} }% @@ -131,11 +132,15 @@ \fi% } \newcommand{\UseStyleFile}[1]{} -\newcommand{\I}{i} -\newcommand{\E}{e} -\newcommand{\PI}{\pi} +\newcommand{\COOL@notation@ISymb}{i} +\newcommand{\I}{\COOL@notation@ISymb} +\newcommand{\COOL@notation@ESymb}{e} +\newcommand{\E}{\COOL@notation@ESymb} +\newcommand{\COOL@notation@PISymb}{\pi} +\newcommand{\PI}{\COOL@notation@PISymb} \newcommand{\GoldenRatio}{\varphi} -\newcommand{\EulerGamma}{\gamma} +\newcommand{\COOL@notation@EulerGammaSymb}{\gamma} +\newcommand{\EulerGamma}{\COOL@notation@EulerGammaSymb} \newcommand{\Catalan}{C} \newcommand{\Glaisher}{\mathord{\operatorname{Glaisher}}} \newcommand{\Khinchin}{\mathord{\operatorname{Khinchin}}} @@ -301,12 +306,12 @@ \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer}=1}% {% -W\!\COOL@decide@paren{ProductLog}{#1}% +W\COOL@decide@paren{ProductLog}{#1}% }% {% \ifthenelse{\value{COOL@listpointer}=2}% {% -W_{\listval{#1}{1}}\!\COOL@decide@paren{ProductLog}{\listval{#1}{2}}% +W_{\listval{#1}{1}}\COOL@decide@paren{ProductLog}{\listval{#1}{2}}% }% {% \PackageError{cool}{`ProductLog' Invaid Argument}% @@ -321,29 +326,29 @@ W_{\listval{#1}{1}}\!\COOL@decide@paren{ProductLog}{\listval{#1}{2}}% \newcommand{\COOL@notation@BesselJSymb}{J} \newcommand{\COOL@notation@BesselJParen}{p} \newcommand{\BesselJ}[2]% -{\COOL@notation@BesselJSymb_{#1}\!\COOL@decide@paren{BesselJ}{#2}} +{\COOL@notation@BesselJSymb_{#1}\COOL@decide@paren{BesselJ}{#2}} \newcommand{\COOL@notation@BesselYSymb}{Y} \newcommand{\COOL@notation@BesselYParen}{p} \newcommand{\BesselY}[2]% -{\COOL@notation@BesselYSymb_{#1}\!\COOL@decide@paren{BesselY}{#2}} +{\COOL@notation@BesselYSymb_{#1}\COOL@decide@paren{BesselY}{#2}} \newcommand{\COOL@notation@BesselISymb}{I} \newcommand{\COOL@notation@BesselIParen}{p} \newcommand{\BesselI}[2]% -{\COOL@notation@BesselISymb_{#1}\!\COOL@decide@paren{BesselI}{#2}} +{\COOL@notation@BesselISymb_{#1}\COOL@decide@paren{BesselI}{#2}} \newcommand{\COOL@notation@BesselKSymb}{K} \newcommand{\COOL@notation@BesselKParen}{p} \newcommand{\BesselK}[2]% -{\COOL@notation@BesselKSymb_{#1}\!\COOL@decide@paren{BesselK}{#2}} +{\COOL@notation@BesselKSymb_{#1}\COOL@decide@paren{BesselK}{#2}} \newcommand{\COOL@notation@AiryAiParen}{p} \DeclareMathOperator{\AiryAiSymb}{Ai} -\newcommand{\AiryAi}[1]{\AiryAiSymb\!\COOL@decide@paren{AiryAi}{#1}} +\newcommand{\AiryAi}[1]{\AiryAiSymb\COOL@decide@paren{AiryAi}{#1}} \newcommand{\COOL@notation@AiryBiParen}{p} \DeclareMathOperator{\AiryBiSymb}{Bi} -\newcommand{\AiryBi}[1]{\AiryBiSymb\!\COOL@decide@paren{AiryBi}{#1}} +\newcommand{\AiryBi}[1]{\AiryBiSymb\COOL@decide@paren{AiryBi}{#1}} \newcommand{\COOL@notation@StruveHParen}{p} -\newcommand{\StruveH}[2]{ {\bf H}_{#1}\!\COOL@decide@paren{StruveH}{#2}} +\newcommand{\StruveH}[2]{ {\bf H}_{#1}\COOL@decide@paren{StruveH}{#2}} \newcommand{\COOL@notation@StruveLParen}{p} -\newcommand{\StruveL}[2]{ {\bf L}_{#1}\!\COOL@decide@paren{StruveL}{#2}} +\newcommand{\StruveL}[2]{ {\bf L}_{#1}\COOL@decide@paren{StruveL}{#2}} \newcommand{\Floor}[1]{\lfloor #1 \rfloor} \newcommand{\Ceiling}[1]{\lceil #1 \rceil} \newcommand{\Round}[1]{\lfloor #1 \rceil} @@ -402,7 +407,7 @@ F_{#1}% }% { \ifthenelse{\value{COOL@listpointer} = 2}% {% -F_{\COOL@Fibonacci@arg@i}\!% +F_{\COOL@Fibonacci@arg@i}% \COOL@decide@paren{Fibonacci}{\COOL@Fibonacci@arg@ii}% }% {% @@ -421,7 +426,7 @@ E_{#1}% }% { \ifthenelse{\value{COOL@listpointer} = 2}% {% -E_{\COOL@Euler@arg@i}\!% +E_{\COOL@Euler@arg@i}% \COOL@decide@paren{Euler}{\COOL@Euler@arg@ii}% }% {% @@ -440,7 +445,7 @@ B_{#1}% }% { \ifthenelse{\value{COOL@listpointer} = 2}% {% -B_{\COOL@Bernoulli@arg@i}\!% +B_{\COOL@Bernoulli@arg@i}% \COOL@decide@paren{Bernoulli}{\COOL@Bernoulli@arg@ii}% }% {% @@ -452,9 +457,9 @@ comma separate list of length 1 or 2}% \newcommand{\StirlingSOne}[2]{S_{#1}^{\inp{#2}}} \newcommand{\StirlingSTwo}[2]{{\cal S}_{#1}^{\inp{#2}}} \newcommand{\COOL@notation@PartitionsPParen}{p} -\newcommand{\PartitionsP}[1]{p\!\COOL@decide@paren{PartitionsP}{#1}} +\newcommand{\PartitionsP}[1]{p\COOL@decide@paren{PartitionsP}{#1}} \newcommand{\COOL@notation@PartitionsQParen}{p} -\newcommand{\PartitionsQ}[1]{q\!\COOL@decide@paren{PartitionsQ}{#1}} +\newcommand{\PartitionsQ}[1]{q\COOL@decide@paren{PartitionsQ}{#1}} \newcommand{\COOL@notation@DiscreteDeltaParen}{p} \newcommand{\DiscreteDelta}[1]% {\delta\COOL@decide@paren{DiscreteDelta}{#1}} @@ -495,10 +500,16 @@ comma separate list of length 1 or 2}% {% \ifthenelse{\equal{\COOL@notation@LeviCivitaUseComma}{true}}% {% -\ifthenelse{\NOT \value{COOL@ct} = 1}{,}{}% +\ifthenelse{\NOT \value{COOL@ct} = 1}% +{% +\edef\COOL@arg@temp% +{\COOL@arg@temp, \csname COOL@arg@\roman{COOL@ct}\endcsname}% +}% +{% \edef\COOL@arg@temp% {\COOL@arg@temp \csname COOL@arg@\roman{COOL@ct}\endcsname}% }% +}% {% \edef\COOL@arg@temp% {\COOL@arg@temp \csname COOL@arg@\roman{COOL@ct}\endcsname}% @@ -510,7 +521,7 @@ comma separate list of length 1 or 2}% \newcommand{\COOL@notation@HermiteHParen}{p} \newcommand{\COOL@notation@HermiteHSymb}{H} \newcommand{\HermiteH}[2]% -{\COOL@notation@HermiteHSymb_{#1}\!\COOL@decide@paren{HermiteH}{#2}} +{\COOL@notation@HermiteHSymb_{#1}\COOL@decide@paren{HermiteH}{#2}} \newcommand{\COOL@notation@LaugerreLParen}{p} \newcommand{\COOL@notation@LaugerreLSymb}{L} \newcommand{\LaugerreL}[1]{% @@ -519,12 +530,12 @@ comma separate list of length 1 or 2}% \ifthenelse{\value{COOL@listpointer}=2}% {% \COOL@notation@LaugerreLSymb_{\COOL@list@temp@i}% -\!\COOL@decide@paren{LaugerreL}{\COOL@list@temp@ii}% +\COOL@decide@paren{LaugerreL}{\COOL@list@temp@ii}% }% { \ifthenelse{\value{COOL@listpointer}=3}% {% \COOL@notation@LaugerreLSymb_{\COOL@list@temp@i}^{\COOL@list@temp@ii}% -\!\COOL@decide@paren{LaugerreL}{\COOL@list@temp@iii}% +\COOL@decide@paren{LaugerreL}{\COOL@list@temp@iii}% }% {% \PackageError{cool}{Invalid Argument}% @@ -538,13 +549,13 @@ comma separate list of length 1 or 2}% \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 2}% {% -\COOL@notation@LegendrePSymb_{\COOL@LegendreP@arg@i}\!% +\COOL@notation@LegendrePSymb_{\COOL@LegendreP@arg@i}% \COOL@decide@paren{LegendreP}{\COOL@LegendreP@arg@ii}% }% { \ifthenelse{\value{COOL@listpointer} = 3}% {% \COOL@notation@LegendrePSymb_{\COOL@LegendreP@arg@i}% -^{\COOL@LegendreP@arg@ii}\!% +^{\COOL@LegendreP@arg@ii}% \COOL@decide@paren{LegendreP}{\COOL@LegendreP@arg@iii}% }% { \ifthenelse{\value{COOL@listpointer} = 4}% @@ -560,11 +571,11 @@ comma separate list of length 1 or 2}% {`LegendreP' third argument must be $>$ 1}% \or% \COOL@notation@LegendrePSymb_{\COOL@LegendreP@arg@i}% -^{\COOL@LegendreP@arg@ii}\!% +^{\COOL@LegendreP@arg@ii}% \COOL@decide@paren{LegendreP}{\COOL@LegendreP@arg@iv}% \or% {\cal P}_{\COOL@LegendreP@arg@i}% -^{\COOL@LegendreP@arg@ii}\!% +^{\COOL@LegendreP@arg@ii}% \COOL@decide@paren{LegendreP}{\COOL@LegendreP@arg@iv}% \else% \PackageError{cool}{Invalid Argument}{unsupported}% @@ -587,13 +598,13 @@ comma separate list of length 1 or 2}% \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 2}% {% -\COOL@notation@LegendreQSymb_{\COOL@LegendreQ@arg@i}\!% +\COOL@notation@LegendreQSymb_{\COOL@LegendreQ@arg@i}% \COOL@decide@paren{LegendreQ}{\COOL@LegendreQ@arg@ii}% }% { \ifthenelse{\value{COOL@listpointer} = 3}% {% \COOL@notation@LegendreQSymb_{\COOL@LegendreQ@arg@i}% -^{\COOL@LegendreQ@arg@ii}\!% +^{\COOL@LegendreQ@arg@ii}% \COOL@decide@paren{LegendreQ}{\COOL@LegendreQ@arg@iii}% }% { \ifthenelse{\value{COOL@listpointer} = 4}% @@ -609,11 +620,11 @@ comma separate list of length 1 or 2}% {`LegendreQ' third argument must be $>$ 1}% \or% \COOL@notation@LegendreQSymb_{\COOL@LegendreQ@arg@i}% -^{\COOL@LegendreQ@arg@ii}\!% +^{\COOL@LegendreQ@arg@ii}% \COOL@decide@paren{LegendreQ}{\COOL@LegendreQ@arg@iv}% \or% {\cal Q}_{\COOL@LegendreQ@arg@i}% -^{\COOL@LegendreQ@arg@ii}\!% +^{\COOL@LegendreQ@arg@ii}% \COOL@decide@paren{LegendreQ}{\COOL@LegendreQ@arg@iv}% \else% \PackageError{cool}{Invalid Argument}{unsupported}% @@ -632,16 +643,16 @@ comma separate list of length 1 or 2}% \newcommand{\COOL@notation@ChebyshevTParen}{p} \newcommand{\COOL@notation@ChebyshevTSymb}{T} \newcommand{\ChebyshevT}[2]% -{\COOL@notation@ChebyshevTSymb_{#1}\!\COOL@decide@paren{ChebyshevT}{#2}} +{\COOL@notation@ChebyshevTSymb_{#1}\COOL@decide@paren{ChebyshevT}{#2}} \newcommand{\COOL@notation@ChebyshevUParen}{p} \newcommand{\COOL@notation@ChebyshevUSymb}{U} \newcommand{\ChebyshevU}[2]% -{\COOL@notation@ChebyshevUSymb_{#1}\!\COOL@decide@paren{ChebyshevU}{#2}} +{\COOL@notation@ChebyshevUSymb_{#1}\COOL@decide@paren{ChebyshevU}{#2}} \newcommand{\COOL@notation@JacobiPParen}{p} \newcommand{\COOL@notation@JacobiPSymb}{P} \newcommand{\JacobiP}[4]{% \COOL@notation@JacobiPSymb_{#1}^{\inp{#2, #3}}% -\!\COOL@decide@paren{JacobiP}{#4}% +\COOL@decide@paren{JacobiP}{#4}% } \newcommand{\AssocLegendreP}[3]{\LegendreP{#1,#2,#3}} \newcommand{\AssocLegendreQ}[3]{\LegendreQ{#1,#2,#3}} @@ -649,19 +660,19 @@ comma separate list of length 1 or 2}% \newcommand{\COOL@notation@GegenbauerCSymb}{C} \newcommand{\GegenbauerC}[3]{% \COOL@notation@GegenbauerCSymb_{#1}^{#2}% -\!\COOL@decide@paren{GegenbauerC}{#3}% +\COOL@decide@paren{GegenbauerC}{#3}% } \newcommand{\COOL@notation@SphericalHarmonicYParen}{p} \newcommand{\COOL@notation@SphericalHarmonicYSymb}{Y} \newcommand{\SphericalHarmonicY}[4]{% \COOL@notation@SphericalHarmonicYSymb_{#1}^{#2}% -\!\COOL@decide@paren{SphericalHarmonicY}{#3,#4}% +\COOL@decide@paren{SphericalHarmonicY}{#3,#4}% } \newcommand{\SphericalHarmY}[4]{\SphericalHarmonicY{#1}{#2}{#3}{#4}} \newcommand{\SpHarmY}[4]{\SphericalHarmonicY{#1}{#2}{#3}{#4}} \newcommand{\COOL@notation@CyclotomicCParen}{p} \newcommand{\CyclotomicC}[2]% -{C_{#1}\!\COOL@decide@paren{CyclotomicC}{#2}} +{C_{#1}\COOL@decide@paren{CyclotomicC}{#2}} \newcommand{\FibonacciF}[2]{\Fibonacci{#1,#2}} \newcommand{\EulerE}[2]{\Euler{#1,#2}} \newcommand{\BernoulliB}[2]{\Bernoulli{#1,#2}} @@ -708,15 +719,15 @@ comma separate list of length 1 or 2}% \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 1}% {% -\Gamma\!\COOL@decide@paren{GammaFunc}{#1}% +\Gamma\COOL@decide@paren{GammaFunc}{#1}% }% { \ifthenelse{\value{COOL@listpointer} = 2}% {% -\Gamma\!\COOL@decide@paren{GammaFunc}{#1}% +\Gamma\COOL@decide@paren{GammaFunc}{#1}% }% { \ifthenelse{\value{COOL@listpointer} = 3}% {% -\Gamma\!\COOL@decide@paren{GammaFunc}{#1}% +\Gamma\COOL@decide@paren{GammaFunc}{#1}% }% {% \PackageError{cool}{Invalid Argument}% @@ -731,11 +742,11 @@ comma separate list of length 1 or 2}% \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 2}% {% -Q\!\COOL@decide@paren{GammaRegularized}{#1}% +Q\COOL@decide@paren{GammaRegularized}{#1}% }% { \ifthenelse{\value{COOL@listpointer} = 3}% {% -Q\!\COOL@decide@paren{GammaRegularized}{#1}% +Q\COOL@decide@paren{GammaRegularized}{#1}% }% {% \PackageError{cool}{Invalid Argument}% @@ -751,11 +762,11 @@ Q\!\COOL@decide@paren{GammaRegularized}{#1}% \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 2}% {% -Q^{-1}\!\COOL@decide@paren{InverseGammaRegularized}{#1}% +Q^{-1}\COOL@decide@paren{InverseGammaRegularized}{#1}% }% { \ifthenelse{\value{COOL@listpointer} = 3}% {% -Q^{-1}\!\COOL@decide@paren{InverseGammaRegularized}{#1}% +Q^{-1}\COOL@decide@paren{InverseGammaRegularized}{#1}% }% {% \PackageError{cool}{Invalid Argument}% @@ -773,10 +784,10 @@ Q^{-1}\!\COOL@decide@paren{InverseGammaRegularized}{#1}% \DeclareMathOperator{\LogGammaSymb}{log\Gamma} \newcommand{\LogGamma}[1]{\LogGammaSymb\COOL@decide@paren{LogGamma}{#1}} \newcommand{\COOL@notation@DiGammaParen}{p} -\newcommand{\DiGamma}[1]{\digamma\!\COOL@decide@paren{DiGamma}{#1}} +\newcommand{\DiGamma}[1]{\digamma\COOL@decide@paren{DiGamma}{#1}} \newcommand{\COOL@notation@PolyGammaParen}{p} \newcommand{\PolyGamma}[2]% -{\psi^{\inp{#1}}\!\COOL@decide@paren{PolyGamma}{#2}} +{\psi^{\inp{#1}}\COOL@decide@paren{PolyGamma}{#2}} \newcommand{\HarmNum}[1]{% \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer}=1}% @@ -799,16 +810,16 @@ H^{\inp{\COOL@list@temp@ii}}_{\COOL@list@temp@i}% \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 2}% {% -B\!\COOL@decide@paren{Beta}{\COOL@Beta@arg@i, \COOL@Beta@arg@ii}% +B\COOL@decide@paren{Beta}{\COOL@Beta@arg@i, \COOL@Beta@arg@ii}% }% { \ifthenelse{\value{COOL@listpointer} = 3}% {% -B_{\COOL@Beta@arg@i}\!% +B_{\COOL@Beta@arg@i}% \COOL@decide@paren{Beta}{\COOL@Beta@arg@ii, \COOL@Beta@arg@iii}% }% { \ifthenelse{\value{COOL@listpointer} = 4}% {% -B_{\inp{\COOL@Beta@arg@i,\COOL@Beta@arg@ii}}\!% +B_{\inp{\COOL@Beta@arg@i,\COOL@Beta@arg@ii}}% \COOL@decide@paren{Beta}{\COOL@Beta@arg@iii, \COOL@Beta@arg@iv}% }% {% @@ -825,13 +836,13 @@ B_{\inp{\COOL@Beta@arg@i,\COOL@Beta@arg@ii}}\!% \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 3}% {% -I_{\COOL@BetaRegularized@arg@i}\!% +I_{\COOL@BetaRegularized@arg@i}% \COOL@decide@paren{BetaRegularized}% {\COOL@BetaRegularized@arg@ii, \COOL@BetaRegularized@arg@iii}% }% { \ifthenelse{\value{COOL@listpointer} = 4}% {% -I_{\inp{\COOL@BetaRegularized@arg@i, \COOL@BetaRegularized@arg@ii}}\!% +I_{\inp{\COOL@BetaRegularized@arg@i, \COOL@BetaRegularized@arg@ii}}% \COOL@decide@paren{BetaRegularized}% {\COOL@BetaRegularized@arg@iii, \COOL@BetaRegularized@arg@iv}% }% @@ -850,7 +861,7 @@ I_{\inp{\COOL@BetaRegularized@arg@i, \COOL@BetaRegularized@arg@ii}}\!% \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 3}% {% -I^{-1}_{\COOL@InverseBetaRegularized@arg@i}\!% +I^{-1}_{\COOL@InverseBetaRegularized@arg@i}% \COOL@decide@paren{InverseBetaRegularized}% {\COOL@InverseBetaRegularized@arg@ii,% \COOL@InverseBetaRegularized@arg@iii}% @@ -860,7 +871,7 @@ I^{-1}_{\COOL@InverseBetaRegularized@arg@i}\!% I^{-1}_{\inp{ \COOL@InverseBetaRegularized@arg@i,% \COOL@InverseBetaRegularized@arg@ii% }% -}\!% +}% \COOL@decide@paren{InverseBetaRegularized}% {\COOL@InverseBetaRegularized@arg@iii,% \COOL@InverseBetaRegularized@arg@iv}% @@ -883,11 +894,11 @@ I^{-1}_{\inp{ \COOL@InverseBetaRegularized@arg@i,% \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 1}% {% -\ErfSymb\!\COOL@decide@paren{Erf}{#1} +\ErfSymb\COOL@decide@paren{Erf}{#1} }% { \ifthenelse{\value{COOL@listpointer} = 2}% {% -\ErfSymb\!\COOL@decide@paren{Erf}{#1} +\ErfSymb\COOL@decide@paren{Erf}{#1} }% {% \PackageError{cool}{Invalid Argument}% @@ -901,11 +912,11 @@ I^{-1}_{\inp{ \COOL@InverseBetaRegularized@arg@i,% \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 1}% {% -\ErfSymb^{-1}\!\COOL@decide@paren{ErfInv}{#1} +\ErfSymb^{-1}\COOL@decide@paren{ErfInv}{#1} }% { \ifthenelse{\value{COOL@listpointer} = 2}% {% -\ErfSymb^{-1}\!\COOL@decide@paren{ErfInv}{#1} +\ErfSymb^{-1}\COOL@decide@paren{ErfInv}{#1} }% {% \PackageError{cool}{Invalid Argument}% @@ -918,38 +929,38 @@ I^{-1}_{\inp{ \COOL@InverseBetaRegularized@arg@i,% \newcommand{\GenErfInv}[2]{\ErfInv{#1, #2}} \newcommand{\COOL@notation@ErfcParen}{p} \DeclareMathOperator{\ErfcSymb}{erfc} -\newcommand{\Erfc}[1]{\ErfcSymb\!\COOL@decide@paren{Erfc}{#1}} +\newcommand{\Erfc}[1]{\ErfcSymb\COOL@decide@paren{Erfc}{#1}} \newcommand{\COOL@notation@ErfcInvParen}{p} \newcommand{\ErfcInv}[1]% -{\ErfcSymb^{-1}\!\COOL@decide@paren{ErfcInv}{#1}} +{\ErfcSymb^{-1}\COOL@decide@paren{ErfcInv}{#1}} \newcommand{\COOL@notation@ErfiParen}{p} \DeclareMathOperator{\ErfiSymb}{erfi} -\newcommand{\Erfi}[1]{\ErfiSymb\!\COOL@decide@paren{Erfi}{#1}} +\newcommand{\Erfi}[1]{\ErfiSymb\COOL@decide@paren{Erfi}{#1}} \newcommand{\COOL@notation@FresnelSParen}{p} -\newcommand{\FresnelS}[1]{S\!\COOL@decide@paren{FresnelS}{#1}} +\newcommand{\FresnelS}[1]{S\COOL@decide@paren{FresnelS}{#1}} \newcommand{\COOL@notation@FresnelCParen}{p} -\newcommand{\FresnelC}[1]{C\!\COOL@decide@paren{FresnelC}{#1}} +\newcommand{\FresnelC}[1]{C\COOL@decide@paren{FresnelC}{#1}} \newcommand{\COOL@notation@ExpIntEParen}{p} -\newcommand{\ExpIntE}[2]{E_{#1}\!\COOL@decide@paren{ExpIntE}{#2}} +\newcommand{\ExpIntE}[2]{E_{#1}\COOL@decide@paren{ExpIntE}{#2}} \newcommand{\COOL@notation@ExpIntEiParen}{p} \DeclareMathOperator{\ExpIntEiSymb}{Ei} \newcommand{\ExpIntEi}[1]% -{\ExpIntEiSymb\!\COOL@decide@paren{ExpIntEi}{#1}} +{\ExpIntEiSymb\COOL@decide@paren{ExpIntEi}{#1}} \newcommand{\COOL@notation@LogIntParen}{p} \DeclareMathOperator{\LogIntSymb}{li} -\newcommand{\LogInt}[1]{\LogIntSymb\!\COOL@decide@paren{LogInt}{#1}} +\newcommand{\LogInt}[1]{\LogIntSymb\COOL@decide@paren{LogInt}{#1}} \newcommand{\COOL@notation@SinIntParen}{p} \DeclareMathOperator{\SinIntSymb}{Si} -\newcommand{\SinInt}[1]{\SinIntSymb\!\COOL@decide@paren{SinInt}{#1}} +\newcommand{\SinInt}[1]{\SinIntSymb\COOL@decide@paren{SinInt}{#1}} \newcommand{\COOL@notation@CosIntParen}{p} \DeclareMathOperator{\CosIntSymb}{Ci} -\newcommand{\CosInt}[1]{\CosIntSymb\!\COOL@decide@paren{CosInt}{#1}} +\newcommand{\CosInt}[1]{\CosIntSymb\COOL@decide@paren{CosInt}{#1}} \newcommand{\COOL@notation@SinhIntParen}{p} \DeclareMathOperator{\SinhIntSymb}{Shi} -\newcommand{\SinhInt}[1]{\SinhIntSymb\!\COOL@decide@paren{SinhInt}{#1}} +\newcommand{\SinhInt}[1]{\SinhIntSymb\COOL@decide@paren{SinhInt}{#1}} \newcommand{\COOL@notation@CoshIntParen}{p} \DeclareMathOperator{\CoshIntSymb}{Chi} -\newcommand{\CoshInt}[1]{\CoshIntSymb\!\COOL@decide@paren{CoshInt}{#1}} +\newcommand{\CoshInt}[1]{\CoshIntSymb\COOL@decide@paren{CoshInt}{#1}} \newcommand{\COOL@Hypergeometric@pq@ab@value}[4]{% \ifthenelse{\boolean{COOL@#1@isint} \AND \boolean{COOL@#3@islist}}% {% #1 is an INT and #3 is a LIST @@ -1053,7 +1064,7 @@ I^{-1}_{\inp{ \COOL@InverseBetaRegularized@arg@i,% {happens if `b'-arg is a list and `q'-arg isn't an integer}% }% {}% -{}_{#2}{\COOL@notation@HypergeometricSymb}_{#3}\!% +{}_{#2}{\COOL@notation@HypergeometricSymb}_{#3}% \COOL@decide@paren{Hypergeometric}% {% \COOL@Hypergeometric@pq@ab@value{p}{#2}{a}{#4};% @@ -1115,7 +1126,7 @@ I^{-1}_{\inp{ \COOL@InverseBetaRegularized@arg@i,% {happens if `b'-arg is a list and `q'-arg isn't an integer}% }% {}% -{}_{#2}{\COOL@notation@RegHypergeometricSymb}_{#3}\!% +{}_{#2}{\COOL@notation@RegHypergeometricSymb}_{#3}% \COOL@decide@paren{RegHypergeometric}% {% \COOL@Hypergeometric@pq@ab@value{p}{#2}{a}{#4};% @@ -1125,10 +1136,10 @@ I^{-1}_{\inp{ \COOL@InverseBetaRegularized@arg@i,% } \newcommand{\COOL@notation@AppellFOneParen}{p} \newcommand{\AppellFOne}[4]% -{F_{1}\!\COOL@decide@paren{AppellFOne}{#1; #2; #3; #4}} +{F_{1}\COOL@decide@paren{AppellFOne}{#1; #2; #3; #4}} \newcommand{\COOL@notation@HypergeometricUSymb}{U} \newcommand{\HypergeometricU}[3]% -{\COOL@notation@HypergeometricUSymb\!\inp{#1, #2, #3}} +{\COOL@notation@HypergeometricUSymb\inp{#1, #2, #3}} \newcommand{\COOL@MeijerG@anp@value}[3]{% \isint{#3}% \ifthenelse{\boolean{COOL@isint}}% @@ -1187,7 +1198,7 @@ I^{-1}_{\inp{ \COOL@InverseBetaRegularized@arg@i,% \listval{#5}{0}% q - m \addtocounter{COOL@ct@}{\value{COOL@listpointer}}% _{\arabic{COOL@ct},\arabic{COOL@ct@}}% -\!\left(% +\mathopen{}\left(% #6% \left|% { {#2,#3} \@@atop {#4,#5} }% @@ -1216,7 +1227,7 @@ _{\arabic{COOL@ct},\arabic{COOL@ct@}}% \listval{#3}{0}% p \addtocounter{COOL@ct}{\value{COOL@listpointer}}% _{\arabic{COOL@ct},#5}% -\!\left(% +\mathopen{}\left(% #6% \left|% {% @@ -1226,7 +1237,7 @@ _{\arabic{COOL@ct},#5}% }% {% ^{#4,#2}_{#3,#5}% -\!\left(% +\mathopen{}\left(% #6% \left|% {% @@ -1244,7 +1255,7 @@ _{\arabic{COOL@ct},#5}% \listval{#5}{0}% q \addtocounter{COOL@ct}{\value{COOL@listpointer}}% _{#3, \arabic{COOL@ct}}% -\!\left(% +\mathopen{}\left(% #6% \left|% {% @@ -1384,7 +1395,7 @@ _{#3, \arabic{COOL@ct}}% \newcommand{\COOL@notation@EllipticKParen}{p} \newcommand{\COOL@notation@EllipticKSymb}{K} \newcommand{\EllipticK}[1]% -{\COOL@notation@EllipticKSymb\!\COOL@decide@paren{EllipticK}{#1}}% +{\COOL@notation@EllipticKSymb\COOL@decide@paren{EllipticK}{#1}}% \newcommand{\COOL@notation@EllipticEParen}{p} \newcommand{\COOL@notation@EllipticESymb}{E} \newcommand{\EllipticE}[1]{% @@ -1392,11 +1403,11 @@ _{#3, \arabic{COOL@ct}}% \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 1}% {% -\COOL@notation@EllipticESymb\!\COOL@decide@paren{EllipticE}{#1}% +\COOL@notation@EllipticESymb\COOL@decide@paren{EllipticE}{#1}% }% { \ifthenelse{\value{COOL@listpointer} = 2}% {% -\COOL@notation@EllipticESymb\!% +\COOL@notation@EllipticESymb% \COOL@decide@paren{EllipticE}% {\COOL@EllipticE@arg@i \left| \, \COOL@EllipticE@arg@ii \!\!\right.}% }% @@ -1414,13 +1425,13 @@ _{#3, \arabic{COOL@ct}}% \ifthenelse{\value{COOL@listpointer} = 2}% {% \COOL@notation@EllipticPiSymb% -\!\COOL@decide@paren{EllipticPi}% +\COOL@decide@paren{EllipticPi}% {\COOL@EllipticPi@arg@i \left| \, \COOL@EllipticPi@arg@ii \!\!\right.}% }% { \ifthenelse{\value{COOL@listpointer} = 3}% {% \COOL@notation@EllipticPiSymb% -\!\COOL@decide@paren{EllipticPi}% +\COOL@decide@paren{EllipticPi}% { \COOL@EllipticPi@arg@i; \,% \COOL@EllipticPi@arg@ii \left| \,% \COOL@EllipticPi@arg@iii \!\!\right.% @@ -1440,7 +1451,7 @@ _{#3, \arabic{COOL@ct}}% \ifthenelse{ \value{COOL@listpointer} = 2 }% {% \COOL@notation@EllipticFSymb% -\!\COOL@decide@paren{EllipticF}% +\COOL@decide@paren{EllipticF}% {\COOL@EllipticF@arg@i \left| \, \COOL@EllipticF@arg@ii \!\!\right.}% }% {% @@ -1455,30 +1466,30 @@ _{#3, \arabic{COOL@ct}}% \newcommand{\COOL@notation@JacobiZetaSymb}{Z} \newcommand{\JacobiZeta}[2]{% \COOL@notation@JacobiZetaSymb -\!\COOL@decide@paren{JacobiZeta}{#1 \left| \, #2 \right.\!\!}% +\COOL@decide@paren{JacobiZeta}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@EllipticThetaParen}{p} \newcommand{\EllipticTheta}[3]% -{\vartheta_{#1}\!\COOL@decide@paren{EllipticTheta}{#2, #3}} +{\vartheta_{#1}\COOL@decide@paren{EllipticTheta}{#2, #3}} \newcommand{\JacobiTheta}[3]{\EllipticTheta{#1}{#2}{#3}} \newcommand{\COOL@notation@NevilleThetaCParen}{p} \newcommand{\NevilleThetaC}[2]{% -\vartheta_{c}\!\COOL@decide@paren{NevilleThetaC}% +\vartheta_{c}\COOL@decide@paren{NevilleThetaC}% {#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@NevilleThetaDParen}{p} \newcommand{\NevilleThetaD}[2]{% -\vartheta_{d}\!\COOL@decide@paren{NevilleThetaD}% +\vartheta_{d}\COOL@decide@paren{NevilleThetaD}% {#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@NevilleThetaNParen}{p} \newcommand{\NevilleThetaN}[2]{% -\vartheta_{n}\!\COOL@decide@paren{NevilleThetaN}% +\vartheta_{n}\COOL@decide@paren{NevilleThetaN}% {#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@NevilleThetaSParen}{p} \newcommand{\NevilleThetaS}[2]{% -\vartheta_{s}\!\COOL@decide@paren{NevilleThetaS}% +\vartheta_{s}\COOL@decide@paren{NevilleThetaS}% {#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@WeierstrassPParen}{p} @@ -1492,7 +1503,7 @@ _{#3, \arabic{COOL@ct}}% a comma separated list of length 2}% } {% -\wp\!\COOL@decide@paren{WeierstrassP}{#1; #2} +\wp\COOL@decide@paren{WeierstrassP}{#1; #2} }% } \newcommand{\WeiP}[2]{\WeierstrassP{#1}{#2}} @@ -1511,11 +1522,11 @@ _{#3, \arabic{COOL@ct}}% \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 1}% {% -\wp^{-1}\!\COOL@decide@paren{WeierstrassPInv}{#1; #2}% +\wp^{-1}\COOL@decide@paren{WeierstrassPInv}{#1; #2}% }% { \ifthenelse{\value{COOL@listpointer} = 2}% {% -\wp^{-1}\!\COOL@decide@paren{WeierstrassPInv}{#1; #2}% +\wp^{-1}\COOL@decide@paren{WeierstrassPInv}{#1; #2}% }% {% \PackageError{cool}{Invalid Argument}% @@ -1540,11 +1551,11 @@ _{#3, \arabic{COOL@ct}}% \listval{#1}{0}% \ifthenelse{\value{COOL@listpointer} = 1}% {% -\sigma\!\inp{#1; #2}% +\sigma\inp{#1; #2}% }% { \ifthenelse{\value{COOL@listpointer} = 2}% {% -\sigma_{\COOL@WeiSigma@arg@z@i}\!\inp{\COOL@WeiSigma@arg@z@ii; #2}% +\sigma_{\COOL@WeiSigma@arg@z@i}\inp{\COOL@WeiSigma@arg@z@ii; #2}% }% {% \PackageError{cool}{Invalid Argument}% @@ -1565,7 +1576,7 @@ _{#3, \arabic{COOL@ct}}% a comma separated list of length 2}% }% {% -\zeta\!\COOL@decide@paren{WeierstrassZeta}{#1; #2}% +\zeta\COOL@decide@paren{WeierstrassZeta}{#1; #2}% }% } \newcommand{\WeiZeta}[2]{\WeierstrassZeta{#1}{#2}} @@ -1578,7 +1589,7 @@ _{#3, \arabic{COOL@ct}}% a comma separated list of length 2}% }% {% -\{ \omega_1\!\inp{#1}, \omega_3\!\inp{#1} \}% +\{ \omega_1\inp{#1}, \omega_3\inp{#1} \}% }% } \newcommand{\WeiHalfPeriods}[1]{\WeierstrassHalfPeriods{#1}} @@ -1591,7 +1602,7 @@ _{#3, \arabic{COOL@ct}}% a comma separated list of length 2}% }% {% -\{ g_2\!\inp{#1}, g_3\!\inp{#1} \}% +\{ g_2\inp{#1}, g_3\inp{#1} \}% }% } \newcommand{\WeiInvars}[1]{\WeierstrassInvariants{#1}} @@ -1612,9 +1623,9 @@ _{#3, \arabic{COOL@ct}}% a comma separated list of length 2}% }% {% -\{ e_1\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}},% -e_2\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}},% -e_3\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}}% +\{ e_1\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\inp{#1}},% +e_2\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\inp{#1}},% +e_3\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\inp{#1}}% \}% }% } @@ -1632,11 +1643,11 @@ e_3\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}}% {% \{% \eta_1\COOL@hideOnSF% -{WeierstrassZetaHalfPeriodValuesDisplay}{\!\inp{#1}},% +{WeierstrassZetaHalfPeriodValuesDisplay}{\inp{#1}},% \eta_2\COOL@hideOnSF% -{WeierstrassZetaHalfPeriodValuesDisplay}{\!\inp{#1}},% +{WeierstrassZetaHalfPeriodValuesDisplay}{\inp{#1}},% \eta_3\COOL@hideOnSF% -{WeierstrassZetaHalfPeriodValuesDisplay}{\!\inp{#1}}% +{WeierstrassZetaHalfPeriodValuesDisplay}{\inp{#1}}% \}% }% } @@ -1645,159 +1656,159 @@ e_3\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}}% \newcommand{\COOL@notation@JacobiAmplitudeParen}{p} \DeclareMathOperator{\JacobiAmplitudeSymb}{am} \newcommand{\JacobiAmplitude}[2]{% -\JacobiAmplitudeSymb\!\COOL@decide@paren% +\JacobiAmplitudeSymb\COOL@decide@paren% {JacobiAmplitude}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@JacobiCDParen}{p} \newcommand{\COOL@notation@JacobiCDInvParen}{p} \DeclareMathOperator{\JacobiCDSymb}{cd} \newcommand{\JacobiCD}[2]{% -\JacobiCDSymb\!\COOL@decide@paren% +\JacobiCDSymb\COOL@decide@paren% {JacobiCD}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiCDInv}[2]{% -\JacobiCDSymb^{-1}\!\COOL@decide@paren% +\JacobiCDSymb^{-1}\COOL@decide@paren% {JacobiCDInv}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@JacobiCNParen}{p} \newcommand{\COOL@notation@JacobiCNInvParen}{p} \DeclareMathOperator{\JacobiCNSymb}{cn} \newcommand{\JacobiCN}[2]{% -\JacobiCNSymb\!\COOL@decide@paren% +\JacobiCNSymb\COOL@decide@paren% {JacobiCN}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiCNInv}[2]{% -\JacobiCNSymb^{-1}\!\COOL@decide@paren% +\JacobiCNSymb^{-1}\COOL@decide@paren% {JacobiCNInv}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@JacobiCSParen}{p} \newcommand{\COOL@notation@JacobiCSInvParen}{p} \DeclareMathOperator{\JacobiCSSymb}{cs} \newcommand{\JacobiCS}[2]{% -\JacobiCSSymb\!\COOL@decide@paren% +\JacobiCSSymb\COOL@decide@paren% {JacobiCS}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiCSInv}[2]{% -\JacobiCSSymb^{-1}\!\COOL@decide@paren% +\JacobiCSSymb^{-1}\COOL@decide@paren% {JacobiCSInv}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@JacobiDCParen}{p} \newcommand{\COOL@notation@JacobiDCInvParen}{p} \DeclareMathOperator{\JacobiDCSymb}{dc} \newcommand{\JacobiDC}[2]{% -\JacobiDCSymb\!\COOL@decide@paren% +\JacobiDCSymb\COOL@decide@paren% {JacobiDC}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiDCInv}[2]{% -\JacobiDCSymb^{-1}\!\COOL@decide@paren% +\JacobiDCSymb^{-1}\COOL@decide@paren% {JacobiDCInv}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@JacobiDNParen}{p} \newcommand{\COOL@notation@JacobiDNInvParen}{p} \DeclareMathOperator{\JacobiDNSymb}{dn} \newcommand{\JacobiDN}[2]{% -\JacobiDNSymb\!\COOL@decide@paren% +\JacobiDNSymb\COOL@decide@paren% {JacobiDN}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiDNInv}[2]{% -\JacobiDNSymb^{-1}\!\COOL@decide@paren% +\JacobiDNSymb^{-1}\COOL@decide@paren% {JacobiDNInv}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@JacobiDSParen}{p} \newcommand{\COOL@notation@JacobiDSInvParen}{p} \DeclareMathOperator{\JacobiDSSymb}{ds} \newcommand{\JacobiDS}[2]{% -\JacobiDSSymb\!\COOL@decide@paren% +\JacobiDSSymb\COOL@decide@paren% {JacobiDS}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiDSInv}[2]{% -\JacobiDSSymb^{-1}\!\COOL@decide@paren% +\JacobiDSSymb^{-1}\COOL@decide@paren% {JacobiDSInv}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@JacobiNCParen}{p} \newcommand{\COOL@notation@JacobiNCInvParen}{p} \DeclareMathOperator{\JacobiNCSymb}{nc} \newcommand{\JacobiNC}[2]{% -\JacobiNCSymb\!\COOL@decide@paren% +\JacobiNCSymb\COOL@decide@paren% {JacobiNC}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiNCInv}[2]{% -\JacobiNCSymb^{-1}\!\COOL@decide@paren% +\JacobiNCSymb^{-1}\COOL@decide@paren% {JacobiNCInv}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@JacobiNDParen}{p} \newcommand{\COOL@notation@JacobiNDInvParen}{p} \DeclareMathOperator{\JacobiNDSymb}{nd} \newcommand{\JacobiND}[2]{% -\JacobiNDSymb\!\COOL@decide@paren% +\JacobiNDSymb\COOL@decide@paren% {JacobiND}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiNDInv}[2]{% -\JacobiNDSymb^{-1}\!\COOL@decide@paren% +\JacobiNDSymb^{-1}\COOL@decide@paren% {JacobiNDInv}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@JacobiNSParen}{p} \newcommand{\COOL@notation@JacobiNSInvParen}{p} \DeclareMathOperator{\JacobiNSSymb}{ns} \newcommand{\JacobiNS}[2]{% -\JacobiNSSymb\!\COOL@decide@paren% +\JacobiNSSymb\COOL@decide@paren% {JacobiNS}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiNSInv}[2]{% -\JacobiNSSymb^{-1}\!\COOL@decide@paren% +\JacobiNSSymb^{-1}\COOL@decide@paren% {JacobiNSInv}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@JacobiSCParen}{p} \newcommand{\COOL@notation@JacobiSCInvParen}{p} \DeclareMathOperator{\JacobiSCSymb}{sc} \newcommand{\JacobiSC}[2]{% -\JacobiSCSymb\!\COOL@decide@paren% +\JacobiSCSymb\COOL@decide@paren% {JacobiSC}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiSCInv}[2]{% -\JacobiSCSymb^{-1}\!\COOL@decide@paren% +\JacobiSCSymb^{-1}\COOL@decide@paren% {JacobiSCInv}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@JacobiSDParen}{p} \newcommand{\COOL@notation@JacobiSDInvParen}{p} \DeclareMathOperator{\JacobiSDSymb}{sd} \newcommand{\JacobiSD}[2]{% -\JacobiSDSymb\!\COOL@decide@paren% +\JacobiSDSymb\COOL@decide@paren% {JacobiSD}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiSDInv}[2]{% -\JacobiSDSymb^{-1}\!\COOL@decide@paren% +\JacobiSDSymb^{-1}\COOL@decide@paren% {JacobiSDInv}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@JacobiSNParen}{p} \newcommand{\COOL@notation@JacobiSNInvParen}{p} \DeclareMathOperator{\JacobiSNSymb}{sn} \newcommand{\JacobiSN}[2]{% -\JacobiSNSymb\!\COOL@decide@paren% +\JacobiSNSymb\COOL@decide@paren% {JacobiSN}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\JacobiSNInv}[2]{% -\JacobiSNSymb^{-1}\!\COOL@decide@paren% +\JacobiSNSymb^{-1}\COOL@decide@paren% {JacobiSNInv}{#1 \left| \, #2 \right.\!\!}% } \newcommand{\COOL@notation@DedekindEtaParen}{p} -\newcommand{\DedekindEta}[1]{\eta\!\COOL@decide@paren{DedekindEta}{#1}} +\newcommand{\DedekindEta}[1]{\eta\COOL@decide@paren{DedekindEta}{#1}} \newcommand{\COOL@notation@KleinInvariantJParen}{p} \newcommand{\KleinInvariantJ}[1]% -{J\!\COOL@decide@paren{KleinInvariantJ}{#1}} +{J\COOL@decide@paren{KleinInvariantJ}{#1}} \newcommand{\COOL@notation@ModularLambdaParen}{p} \newcommand{\ModularLambda}[1]% -{\lambda\!\COOL@decide@paren{ModularLambda}{#1}} +{\lambda\COOL@decide@paren{ModularLambda}{#1}} \newcommand{\COOL@notation@EllipticNomeQParen}{p} \newcommand{\COOL@notation@EllipticNomeQInvParen}{p} \newcommand{\EllipticNomeQ}[1]% -{q\!\COOL@decide@paren{EllipticNomeQ}{#1}} +{q\COOL@decide@paren{EllipticNomeQ}{#1}} \newcommand{\EllipticNomeQInv}[1]% -{q^{-1}\!\COOL@decide@paren{EllipticNomeQ}{#1}} +{q^{-1}\COOL@decide@paren{EllipticNomeQ}{#1}} \newcommand{\COOL@notation@ArithGeoMeanParen}{p} \DeclareMathOperator{\ArithGeoMeanSymb}{agm} \newcommand{\ArithGeoMean}[2]% -{\ArithGeoMeanSymb\!\COOL@decide@paren{ArithGeoMean}{#1, #2}} +{\ArithGeoMeanSymb\COOL@decide@paren{ArithGeoMean}{#1, #2}} \newcommand{\AGM}[2]{\ArithGeoMean{#1}{#2}} \newcommand{\COOL@notation@EllipticExpParen}{p} \DeclareMathOperator{\EllipticExpSymb}{eexp} @@ -1811,7 +1822,7 @@ e_3\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}}% a comma separated list of length 2}% }% {% -\EllipticExpSymb\!\COOL@decide@paren{EllipticExp}{#1; #2}% +\EllipticExpSymb\COOL@decide@paren{EllipticExp}{#1; #2}% }% } \newcommand{\EExp}[2]{\EllipticExp{#1}{#2}} @@ -1836,7 +1847,7 @@ e_3\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}}% a comma separated list of length 2}% }% {% -\EllipticLogSymb\!\COOL@decide@paren{EllipticLog}{#1; #2}% +\EllipticLogSymb\COOL@decide@paren{EllipticLog}{#1; #2}% }% }% } @@ -1849,12 +1860,12 @@ e_3\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}}% \listval{#1}{0}% get the list length \ifthenelse{\value{COOL@listpointer} = 2}% {% -\zeta\!\COOL@decide@paren{Zeta}{\COOL@Zeta@arg@i,\COOL@Zeta@arg@ii}% +\zeta\COOL@decide@paren{Zeta}{\COOL@Zeta@arg@i,\COOL@Zeta@arg@ii}% }% {% \ifthenelse{\value{COOL@listpointer} = 1}% {% -\zeta\!\COOL@decide@paren{Zeta}{#1}% +\zeta\COOL@decide@paren{Zeta}{#1}% }% {% \PackageError{cool}{`Zeta' Invalid Argument}% @@ -1865,16 +1876,16 @@ e_3\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}}% }% \newcommand{\COOL@notation@RiemannSiegelThetaParen}{p} \newcommand{\RiemannSiegelTheta}[1]% -{\vartheta\!\COOL@decide@paren{RiemannSiegelTheta}{#1}} +{\vartheta\COOL@decide@paren{RiemannSiegelTheta}{#1}} \newcommand{\COOL@notation@RiemannSiegelZParen}{p} \newcommand{\RiemannSiegelZ}[1]% -{Z\!\COOL@decide@paren{RiemannSiegelZ}{#1}} +{Z\COOL@decide@paren{RiemannSiegelZ}{#1}} \newcommand{\StieltjesGamma}[1]{\gamma_{#1}} \newcommand{\COOL@notation@LerchPhiParen}{p} -\newcommand{\LerchPhi}[3]{\Phi\!\COOL@decide@paren{LerchPhi}{#1,#2,#3}} +\newcommand{\LerchPhi}[3]{\Phi\COOL@decide@paren{LerchPhi}{#1,#2,#3}} \newcommand{\COOL@notation@NielsenPolyLogParen}{p} \newcommand{% -\NielsenPolyLog}[3]{S_{#1}^{#2}\!% +\NielsenPolyLog}[3]{S_{#1}^{#2}% \COOL@decide@paren{NielsenPolyLog}{#3}% } \newcommand{\COOL@notation@PolyLogParen}{p} @@ -1890,7 +1901,7 @@ e_3\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}}% {% \ifthenelse{ \value{COOL@listpointer} = 2 }% {% -\PolyLogSymb_{\COOL@PolyLog@arg@i}\!% +\PolyLogSymb_{\COOL@PolyLog@arg@i}% \COOL@decide@paren{PolyLog}{\COOL@PolyLog@arg@ii}% }% {% @@ -1905,26 +1916,26 @@ e_3\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}}% \newcommand{\COOL@notation@MathieuCParen}{p} \DeclareMathOperator{\MathieuCSymb}{Ce} \newcommand{\MathieuC}[3]% -{\MathieuCSymb\!\COOL@decide@paren{MathieuC}{#1,#2,#3}} +{\MathieuCSymb\COOL@decide@paren{MathieuC}{#1,#2,#3}} \newcommand{\COOL@notation@MathieuSParen}{p} \DeclareMathOperator{\MathieuSSymb}{Se} \newcommand{\MathieuS}[3]% -{\mathord{\MathieuSSymb}\!\COOL@decide@paren{MathieuS}{#1,#2,#3}} +{\mathord{\MathieuSSymb}\COOL@decide@paren{MathieuS}{#1,#2,#3}} \newcommand{\COOL@notation@MathieuCharacteristicAParen}{p} \newcommand{\MathieuCharacteristicA}[2]% -{a_{#1}\!\COOL@decide@paren{MathieuCharacteristicA}{#2}} +{a_{#1}\COOL@decide@paren{MathieuCharacteristicA}{#2}} \newcommand{\MathieuCharisticA}[2]{\MathieuCharacteristicA{#1}{#2}} \newcommand{\COOL@notation@MathieuCharacteristicBParen}{p} \newcommand{\MathieuCharacteristicB}[2]% -{b_{#1}\!\COOL@decide@paren{MathieuCharacteristicB}{#2}} +{b_{#1}\COOL@decide@paren{MathieuCharacteristicB}{#2}} \newcommand{\MathieuCharisticB}[2]{\MathieuCharacteristicB{#1}{#2}} \newcommand{\COOL@notation@MathieuCharacteristicExponentParen}{p} \newcommand{\MathieuCharacteristicExponent}[2]% -{r\!\COOL@decide@paren{MathieuCharacteristicExponent}{#1,#2}} +{r\COOL@decide@paren{MathieuCharacteristicExponent}{#1,#2}} \newcommand{\MathieuCharisticExp}[2]% {\MathieuCharacteristicExponent{#1}{#2}} \newcommand{\Abs}[1]{ \left|#1\right| } -\newcommand{\Arg}[1]{ \arg\!\inp{#1} } +\newcommand{\Arg}[1]{ \arg\inp{#1} } \def\COOL@notation@Conjugate{star} \newcommand{\COOL@notation@ConjugateParen}{inv} \newcommand{\Conjugate}[1]{\Conj{#1}} @@ -1955,7 +1966,7 @@ e_3\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}}% \RealSymb{#1}% }% {% -\RealSymb\!\COOL@decide@paren{Imag}{#1}% +\RealSymb\COOL@decide@paren{Imag}{#1}% }% } \newcommand{\COOL@notation@ImagParen}{none} @@ -1966,37 +1977,37 @@ e_3\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}}% \ImagSymb{#1}% }% {% -\ImagSymb\!\COOL@decide@paren{Imag}{#1}% +\ImagSymb\COOL@decide@paren{Imag}{#1}% }% } \newcommand{\COOL@notation@SignParen}{p} -\newcommand{\Sign}[1]{\operatorname{sgn}\!\COOL@decide@paren{Sign}{#1}} +\newcommand{\Sign}[1]{\operatorname{sgn}\COOL@decide@paren{Sign}{#1}} \newcommand{\COOL@notation@FactorIntegerParen}{p} \DeclareMathOperator{\FactorIntegerSymb}{factors} \newcommand{\FactorInteger}[1]% -{\FactorIntegerSymb\!\COOL@decide@paren{FactorInteger}{#1}} +{\FactorIntegerSymb\COOL@decide@paren{FactorInteger}{#1}} \newcommand{\Factors}[1]{\FactorInteger{#1}} \newcommand{\COOL@notation@DivisorsParen}{p} \DeclareMathOperator{\DivisorsSymb}{divisors} \newcommand{\Divisors}[1]% -{\mathord{\DivisorsSymb}\!\COOL@decide@paren{Divisors}{#1}} +{\mathord{\DivisorsSymb}\COOL@decide@paren{Divisors}{#1}} \newcommand{\COOL@notation@PrimeParen}{p} \DeclareMathOperator{\PrimeSymb}{prime} \newcommand{\Prime}[1]% -{\mathord{\PrimeSymb}\!\COOL@decide@paren{Prime}{#1}} +{\mathord{\PrimeSymb}\COOL@decide@paren{Prime}{#1}} \newcommand{\COOL@notation@PrimePiParen}{p} -\newcommand{\PrimePi}[1]{\pi\!\COOL@decide@paren{PrimePi}{#1}} +\newcommand{\PrimePi}[1]{\pi\COOL@decide@paren{PrimePi}{#1}} \newcommand{\COOL@notation@DivisorSigmaParen}{p} \newcommand{\DivisorSigma}[2]% -{\sigma_{#1}\!\COOL@decide@paren{DivisorSigma}{#2}} +{\sigma_{#1}\COOL@decide@paren{DivisorSigma}{#2}} \newcommand{\COOL@notation@EulerPhiParen}{p} -\newcommand{\EulerPhi}[1]{\varphi\!\COOL@decide@paren{EulerPhi}{#1}} +\newcommand{\EulerPhi}[1]{\varphi\COOL@decide@paren{EulerPhi}{#1}} \newcommand{\COOL@notation@MoebiusMuParen}{p} -\newcommand{\MoebiusMu}[1]{\mu\!\COOL@decide@paren{MoebiusMu}{#1}} +\newcommand{\MoebiusMu}[1]{\mu\COOL@decide@paren{MoebiusMu}{#1}} \newcommand{\JacobiSymbol}[2]{\inp{\frac{#1}{#2}}} \newcommand{\COOL@notation@CarmichaelLambdaParen}{p} \newcommand{\CarmichaelLambda}[1]% -{\lambda\!\COOL@decide@paren{CarmichaelLambda}{#1}} +{\lambda\COOL@decide@paren{CarmichaelLambda}{#1}} \newcommand{\DigitCount}[2]{% \isint{#2}% \ifthenelse{\boolean{COOL@isint}}% @@ -2006,30 +2017,31 @@ e_3\COOL@hideOnSF{WeierstrassPHalfPeriodValuesDisplay}{\!\inp{#1}}% \addtocounter{COOL@ct@}{-1}% \forLoop{1}{\arabic{COOL@ct@}}{COOL@ct}% {% -s^{\arabic{COOL@ct}}_{#2}\!\inp{#1}, +s^{\arabic{COOL@ct}}_{#2}\inp{#1}, }% -s^{\inp{0}}_{#2}\!\inp{#1}% +s^{\inp{0}}_{#2}\inp{#1}% \}% }% {% \{% -s^{\inp{1}}_{#2}\!\inp{#1},% -s^{\inp{2}}_{#2}\!\inp{#1},% +s^{\inp{1}}_{#2}\inp{#1},% +s^{\inp{2}}_{#2}\inp{#1},% \ldots,% -s^{\inp{#2} - 1}_{#2}\!\inp{#1},% -s^{\inp{0}}_{#2}\!\inp{#1}% +s^{\inp{#2} - 1}_{#2}\inp{#1},% +s^{\inp{0}}_{#2}\inp{#1}% \}% }% } \newcommand{\COOL@notation@DiracDeltaParen}{p} -\newcommand{\DiracDelta}[1]{\delta\!\COOL@decide@paren{DiracDelta}{#1}} +\newcommand{\DiracDelta}[1]{\delta\COOL@decide@paren{DiracDelta}{#1}} \newcommand{\COOL@notation@HeavisideStepParen}{p} \newcommand{\HeavisideStep}[1]% -{\theta\!\COOL@decide@paren{HeavisideStep}{#1}} +{\theta\COOL@decide@paren{HeavisideStep}{#1}} \newcommand{\UnitStep}[1]{\HeavisideStep{#1}} \newcounter{COOL@multideriv} \newcommand{\COOL@notation@DDisplayFunc}{inset} \newcommand{\COOL@notation@DShorten}{true} +\newcommand{\COOL@notation@DSymb}{d} \newcommand{\COOL@derivative}[4]{% \listval{#3}{0}% \setcounter{COOL@listlen}{\value{COOL@listpointer}}% @@ -2068,11 +2080,11 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@bot% -{\COOL@temp@D@bot #4 \COOL@wrt@temp}% +{\COOL@temp@D@bot {#4} \COOL@wrt@temp}% }% {% \edef\COOL@temp@D@bot% -{\COOL@temp@D@bot #4 \COOL@wrt@temp^\COOL@power@temp}% +{\COOL@temp@D@bot {#4} \COOL@wrt@temp^\COOL@power@temp}% }% }% \ifthenelse{\value{COOL@ct}<\value{COOL@listlen}}% @@ -2090,21 +2102,21 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@bot% -{\COOL@temp@D@bot #4 \COOL@wrt@temp}% +{\COOL@temp@D@bot {#4} \COOL@wrt@temp}% }% {% \edef\COOL@temp@D@bot% -{\COOL@temp@D@bot #4 \COOL@wrt@temp^\COOL@power@temp}% +{\COOL@temp@D@bot {#4} \COOL@wrt@temp^\COOL@power@temp}% }% }% }% {}% \ifthenelse{\value{COOL@ct@}=1}% {% -\frac{#4 #2}{\COOL@temp@D@bot}% +\frac{{#4} #2}{\COOL@temp@D@bot}% }% {% -\frac{#4^{\arabic{COOL@ct@}} #2}{\COOL@temp@D@bot}% +\frac{{#4}^{\arabic{COOL@ct@}} #2}{\COOL@temp@D@bot}% }% }% {% @@ -2128,11 +2140,11 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@bot% -{\COOL@temp@D@bot #4 \COOL@wrt@temp}% +{\COOL@temp@D@bot {#4} \COOL@wrt@temp}% }% {% \edef\COOL@temp@D@bot% -{\COOL@temp@D@bot #4 \COOL@wrt@temp^\COOL@power@temp}% +{\COOL@temp@D@bot {#4} \COOL@wrt@temp^\COOL@power@temp}% }% }% \ifthenelse{\value{COOL@ct}<\value{COOL@listlen}}% @@ -2156,16 +2168,16 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@bot% -{\COOL@temp@D@bot #4 \COOL@wrt@temp}% +{\COOL@temp@D@bot {#4} \COOL@wrt@temp}% }% {% \edef\COOL@temp@D@bot% -{\COOL@temp@D@bot #4 \COOL@wrt@temp^\COOL@power@temp}% +{\COOL@temp@D@bot {#4} \COOL@wrt@temp^\COOL@power@temp}% }% }% }% {}% -\frac{#4^{\COOL@temp@D@top@power} #2}{\COOL@temp@D@bot}% +\frac{{#4}^{\COOL@temp@D@top@power} #2}{\COOL@temp@D@bot}% }% }% { \ifthenelse{ \equal{\COOL@notation@DShorten}{true} \AND @@ -2187,11 +2199,11 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@bot% -{\COOL@temp@D@bot #4 \COOL@wrt@temp}% +{\COOL@temp@D@bot {#4} \COOL@wrt@temp}% }% {% \edef\COOL@temp@D@bot% -{\COOL@temp@D@bot #4 \COOL@wrt@temp^\COOL@power@temp}% +{\COOL@temp@D@bot {#4} \COOL@wrt@temp^\COOL@power@temp}% }% }% \ifthenelse{\value{COOL@ct}<\value{COOL@listlen}}% @@ -2209,11 +2221,11 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@bot% -{\COOL@temp@D@bot #4 \COOL@wrt@temp}% +{\COOL@temp@D@bot {#4} \COOL@wrt@temp}% }% {% \edef\COOL@temp@D@bot% -{\COOL@temp@D@bot #4 \COOL@wrt@temp^\COOL@power@temp}% +{\COOL@temp@D@bot {#4} \COOL@wrt@temp^\COOL@power@temp}% }% }% }% @@ -2223,7 +2235,7 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \frac{#4}{\COOL@temp@D@bot} #2% }% {% -\frac{#4^{\arabic{COOL@ct@}}}{\COOL@temp@D@bot} #2% +\frac{{#4}^{\arabic{COOL@ct@}}}{\COOL@temp@D@bot} #2% }% }% {% @@ -2247,11 +2259,11 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@bot% -{\COOL@temp@D@bot #4 \COOL@wrt@temp}% +{\COOL@temp@D@bot {#4} \COOL@wrt@temp}% }% {% \edef\COOL@temp@D@bot% -{\COOL@temp@D@bot #4 \COOL@wrt@temp^\COOL@power@temp}% +{\COOL@temp@D@bot {#4} \COOL@wrt@temp^\COOL@power@temp}% }% }% \ifthenelse{\value{COOL@ct}<\value{COOL@listlen}}% @@ -2275,16 +2287,16 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@bot% -{\COOL@temp@D@bot #4 \COOL@wrt@temp}% +{\COOL@temp@D@bot {#4} \COOL@wrt@temp}% }% {% \edef\COOL@temp@D@bot% -{\COOL@temp@D@bot #4 \COOL@wrt@temp^\COOL@power@temp}% +{\COOL@temp@D@bot {#4} \COOL@wrt@temp^\COOL@power@temp}% }% }% }% {}% -\frac{#4^{\COOL@temp@D@top@power} }{\COOL@temp@D@bot} #2% +\frac{{#4}^{\COOL@temp@D@top@power} }{\COOL@temp@D@bot} #2% }% }% { \ifthenelse{ \equal{\COOL@notation@DShorten}{false} \AND @@ -2304,11 +2316,11 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@top{#4}% -\edef\COOL@temp@D@bot{#4 \COOL@wrt@temp}% +\edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp}% }% {% -\edef\COOL@temp@D@top{#4^\COOL@power@temp}% -\edef\COOL@temp@D@bot{#4 \COOL@wrt@temp^\COOL@power@temp}% +\edef\COOL@temp@D@top{{#4}^\COOL@power@temp}% +\edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp^\COOL@power@temp}% }% \edef\COOL@temp@D@result% {\COOL@temp@D@result \frac{\COOL@temp@D@top}{\COOL@temp@D@bot}}% @@ -2322,11 +2334,11 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@top{#4}% -\edef\COOL@temp@D@bot{#4 \COOL@wrt@temp}% +\edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp}% }% {% -\edef\COOL@temp@D@top{#4^\COOL@power@temp}% -\edef\COOL@temp@D@bot{#4 \COOL@wrt@temp^\COOL@power@temp}% +\edef\COOL@temp@D@top{{#4}^\COOL@power@temp}% +\edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp^\COOL@power@temp}% }% \edef\COOL@temp@D@result% {\COOL@temp@D@result \frac{\COOL@temp@D@top}{\COOL@temp@D@bot}}% @@ -2338,11 +2350,11 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@top{#4}% -\edef\COOL@temp@D@bot{#4 \COOL@wrt@temp}% +\edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp}% }% {% -\edef\COOL@temp@D@top{#4^\COOL@power@temp}% -\edef\COOL@temp@D@bot{#4 \COOL@wrt@temp^\COOL@power@temp}% +\edef\COOL@temp@D@top{{#4}^\COOL@power@temp}% +\edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp^\COOL@power@temp}% }% \edef\COOL@temp@D@result% {\COOL@temp@D@result \frac{\COOL@temp@D@top}{\COOL@temp@D@bot}}% @@ -2352,11 +2364,11 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@top{#4}% -\edef\COOL@temp@D@bot{#4 \COOL@wrt@temp}% +\edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp}% }% {% -\edef\COOL@temp@D@top{#4^\COOL@power@temp}% -\edef\COOL@temp@D@bot{#4 \COOL@wrt@temp^\COOL@power@temp}% +\edef\COOL@temp@D@top{{#4}^\COOL@power@temp}% +\edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp^\COOL@power@temp}% }% \edef\COOL@temp@D@result% {\COOL@temp@D@result \frac{\COOL@temp@D@top #2}{\COOL@temp@D@bot}}% @@ -2369,11 +2381,11 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@top{#4}% -\edef\COOL@temp@D@bot{#4 \COOL@wrt@temp}% +\edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp}% }% {% -\edef\COOL@temp@D@top{#4^\COOL@power@temp}% -\edef\COOL@temp@D@bot{#4 \COOL@wrt@temp^\COOL@power@temp}% +\edef\COOL@temp@D@top{{#4}^\COOL@power@temp}% +\edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp^\COOL@power@temp}% }% \edef\COOL@temp@D@result% {\COOL@temp@D@result \frac{\COOL@temp@D@top #2}{\COOL@temp@D@bot}}% @@ -2395,11 +2407,11 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@top{#4}% -\edef\COOL@temp@D@bot{#4 \COOL@wrt@temp}% +\edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp}% }% {% -\edef\COOL@temp@D@top{#4^\COOL@power@temp}% -\edef\COOL@temp@D@bot{#4 \COOL@wrt@temp^\COOL@power@temp}% +\edef\COOL@temp@D@top{{#4}^\COOL@power@temp}% +\edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp^\COOL@power@temp}% }% \edef\COOL@temp@D@result% {\COOL@temp@D@result \frac{\COOL@temp@D@top}{\COOL@temp@D@bot}}% @@ -2416,11 +2428,11 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \ifthenelse{ \equal{\COOL@power@temp}{1} }% {% \edef\COOL@temp@D@top{#4}% -\edef\COOL@temp@D@bot{#4 \COOL@wrt@temp}% +\edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp}% }% {% -\edef\COOL@temp@D@top{#4^\COOL@power@temp}% -\edef\COOL@temp@D@bot{#4 \COOL@wrt@temp^\COOL@power@temp}% +\edef\COOL@temp@D@top{{#4}^\COOL@power@temp}% +\edef\COOL@temp@D@bot{{#4} \COOL@wrt@temp^\COOL@power@temp}% }% \edef\COOL@temp@D@result% {\COOL@temp@D@result \frac{\COOL@temp@D@top}{\COOL@temp@D@bot}}% @@ -2437,9 +2449,10 @@ s^{\inp{0}}_{#2}\!\inp{#1}% }% }}}% } -\newcommand{\D}[3][1]{\COOL@derivative{#1}{#2}{#3}{d}} +\newcommand{\D}[3][1]{\COOL@derivative{#1}{#2}{#3}{{\COOL@notation@DSymb}}} \newcommand{\pderiv}[3][1]{\COOL@derivative{#1}{#2}{#3}{\partial}} \newcommand{\COOL@notation@IntegrateDisplayFunc}{inset} +\newcommand{\COOL@notation@IntegrateDifferentialDSymb}{d} \newcommand{\Integrate}[2]{% \listval{#2}{0}% \setcounter{COOL@listlen}{\value{COOL@listpointer}}% @@ -2447,11 +2460,11 @@ s^{\inp{0}}_{#2}\!\inp{#1}% {% \ifthenelse{\equal{\COOL@notation@IntegrateDisplayFunc}{outset}}% {% -\int \! d#2 \, #1% +\int \! \COOL@notation@IntegrateDifferentialDSymb{}#2 \, #1% }% { \ifthenelse{\equal{\COOL@notation@IntegrateDisplayFunc}{inset}}% {% -\int #1 \, d#2% +\int #1 \, \COOL@notation@IntegrateDifferentialDSymb{}#2% }% {% \PackageError{cool}{Invalid Option Sent}% @@ -2462,11 +2475,13 @@ s^{\inp{0}}_{#2}\!\inp{#1}% {% \ifthenelse{\equal{\COOL@notation@IntegrateDisplayFunc}{outset}}% {% -\int_{\listval{#2}{2}} \! d{\listval{#2}{1}} \, #1% +\int_{\listval{#2}{2}} \! +\COOL@notation@IntegrateDifferentialDSymb{}{\listval{#2}{1}} \, #1% }% { \ifthenelse{\equal{\COOL@notation@IntegrateDisplayFunc}{inset}}% {% -\int_{\listval{#2}{2}} #1 \, d{\listval{#2}{1}}% +\int_{\listval{#2}{2}} #1 \, +\COOL@notation@IntegrateDifferentialDSymb{}{\listval{#2}{1}}% }% {% \PackageError{cool}{Invalid Option Sent}% @@ -2477,11 +2492,13 @@ s^{\inp{0}}_{#2}\!\inp{#1}% {% \ifthenelse{\equal{\COOL@notation@IntegrateDisplayFunc}{outset}}% {% -\int_{\listval{#2}{2}}^{\listval{#2}{3}} \! d{\listval{#2}{1}} \, #1% +\int_{\listval{#2}{2}}^{\listval{#2}{3}} \! +\COOL@notation@IntegrateDifferentialDSymb{}{\listval{#2}{1}} \, #1% }% { \ifthenelse{\equal{\COOL@notation@IntegrateDisplayFunc}{inset}}% {% -\int_{\listval{#2}{2}}^{\listval{#2}{3}} #1 \, d{\listval{#2}{1}}% +\int_{\listval{#2}{2}}^{\listval{#2}{3}} #1 \, +\COOL@notation@IntegrateDifferentialDSymb{}{\listval{#2}{1}}% }% {% \PackageError{cool}{Invalid Option Sent}% @@ -2569,13 +2586,14 @@ s^{\inp{0}}_{#2}\!\inp{#1}% \newcommand{\COOL@notation@IdentityMatrixParen}{p} \newcounter{COOL@row}% \newcounter{COOL@col}% +\newcommand{\COOL@notation@IdentityMatrixSymb}{\mathbbm{1}} \newcommand{\IdentityMatrix}[1][0]{% \isint{#1}% \ifthenelse{\boolean{COOL@isint}}% {% \ifthenelse{ #1=0 }% {% -\mathbb{I}% +\COOL@notation@IdentityMatrixSymb% }% {% \setcounter{COOL@ct}{\value{MaxMatrixCols}}% @@ -2623,7 +2641,7 @@ s^{\inp{0}}_{#2}\!\inp{#1}% }% }% {% -\mathbb{I}% +\COOL@notation@IdentityMatrixSymb% }% }% \endinput diff --git a/Master/texmf-dist/tpm/cool.tpm b/Master/texmf-dist/tpm/cool.tpm index f96a4770407..dc3708333e2 100644 --- a/Master/texmf-dist/tpm/cool.tpm +++ b/Master/texmf-dist/tpm/cool.tpm @@ -3,25 +3,25 @@ cool Package - 2006/09/25 13:02:00 + 2006/10/07 21:56:34 karl The cool package. - 824577 + 825674 - + texmf-dist/tex/latex/cool/cool.sty texmf-dist/tpm/cool.tpm - + texmf-dist/doc/latex/cool/Content_LaTeX_Package_Demo.pdf texmf-dist/doc/latex/cool/Content_LaTeX_Package_Demo.tex texmf-dist/doc/latex/cool/README texmf-dist/doc/latex/cool/cool.pdf - + texmf-dist/source/latex/cool/cool.dtx texmf-dist/source/latex/cool/cool.ins -- cgit v1.2.3