diff options
author | Hans Hagen <pragma@wxs.nl> | 2012-11-07 23:16:00 +0100 |
---|---|---|
committer | Hans Hagen <pragma@wxs.nl> | 2012-11-07 23:16:00 +0100 |
commit | 7322c8238e527f50b0cd50b35b231b2734a869ba (patch) | |
tree | 9bfd100e686d7e8e10672ab8e953a9ea67a5394e /tex/context/base/math-int.mkiv | |
parent | 1fcc520803951a61b5a08baf6c1cdac8f7111e75 (diff) | |
download | context-7322c8238e527f50b0cd50b35b231b2734a869ba.tar.gz |
beta 2012.11.07 23:16
Diffstat (limited to 'tex/context/base/math-int.mkiv')
-rw-r--r-- | tex/context/base/math-int.mkiv | 128 |
1 files changed, 63 insertions, 65 deletions
diff --git a/tex/context/base/math-int.mkiv b/tex/context/base/math-int.mkiv index f03df3fdc..6b480961b 100644 --- a/tex/context/base/math-int.mkiv +++ b/tex/context/base/math-int.mkiv @@ -19,12 +19,10 @@ %D $\int _a^b f(x) dx $ and also %D $\iint _a^b f(x,y) dxdy$, %D $\iiint _a^b f(x,y) dxdy$, -%D $\iiiint _a^b f(x) dx $. %D \startformula %D \int _a^b f(x) dx \quad %D \iint _a^b f(x) dx \quad %D \iiint _a^b f(x) dx \quad -%D \iiiint _a^b f(x) dx \quad %D \stopformula %D \stopbuffer %D @@ -76,68 +74,68 @@ %D The following code is used for fallbacks and might become obsolete once %D we have enough \OPENTYPE\ math fonts. -\def\math_repeated_integal_i - {\int} - -\def\math_repeated_integal_ii - {\math_repeated_integal_i - \math_repeated_integral_kern - \math_repeated_integal_i - \math_repeat_integral_finish - \intlimits} - -\def\math_repeated_integal_iii - {\math_repeated_integal_i - \math_repeated_integral_kern - \math_repeated_integal_ii} - -\def\math_repeated_integal_iiii - {\math_repeated_integal_i - \math_repeated_integral_kern - \math_repeated_integal_iii} - -\unexpanded\def\math_repeat_integral#1% - {\let\math_repeat_integral_finish\donothing - \iffontchar\textfont\zerocount#1\relax - \expandafter\math_repeat_integral_real - \else - \expandafter\math_repeat_integral_fake - \fi} - -\def\math_repeat_integral_fake#1#2% - {\let\math_repeat_integral_fake_symbol#2% - \futurelet\next\math_repeat_integral_fake_indeed} - -\def\math_repeat_integral_real#1#2% - {#1} - -\definemathcommand [iint] {\math_repeat_integral{"0222C}\normalint \math_repeated_integal_ii } % double -\definemathcommand [iiint] {\math_repeat_integral{"0222D}\normaliint \math_repeated_integal_iii } % tripple -\definemathcommand [iiiint] {\math_repeat_integral{"FFFFF}\normaliiint\math_repeated_integal_iiii} % quadruple - -\def\math_repeated_integral_kern - {\mkern-6mu\mathchoice{\mkern-3mu}{}{}{}} - -\def\math_repeat_integral_fake_indeed - {\ifx\next\limits - \math_repeated_integral_correction - \else\ifx\next\displaylimits - \math_repeated_integral_correction - \else\ifx\next\nolimits - % nothing - \else\ifcase\mathintlimitmode - % nothing - \else - \math_repeated_integral_correction - \fi\fi\fi\fi - \math_repeat_integral_fake_symbol} - -\def\math_repeated_integral_correction - {\mkern-7mu\mathchoice{\mkern-2mu}{}{}{}% - \mathop\bgroup\mkern7mu\mathchoice{\mkern2mu}{}{}{}\let\math_repeat_integral_finish\egroup} - -%D If the \type{\limits} option is used after \type {\iint}, use \type -%D {\mathop} and fudge the left hand space a bit to make the subscript -%D visually centered. +% \def\math_repeated_integal_i +% {\int} + +% \def\math_repeated_integal_ii +% {\math_repeated_integal_i +% \math_repeated_integral_kern +% \math_repeated_integal_i +% \math_repeat_integral_finish +% \intlimits} + +% \def\math_repeated_integal_iii +% {\math_repeated_integal_i +% \math_repeated_integral_kern +% \math_repeated_integal_ii} +% +% \def\math_repeated_integal_iiii +% {\math_repeated_integal_i +% \math_repeated_integral_kern +% \math_repeated_integal_iii} +% +% \unexpanded\def\math_repeat_integral#1% +% {\let\math_repeat_integral_finish\donothing +% \iffontchar\textfont\zerocount#1\relax +% \expandafter\math_repeat_integral_real +% \else +% \expandafter\math_repeat_integral_fake +% \fi} +% +% \def\math_repeat_integral_fake#1#2% +% {\let\math_repeat_integral_fake_symbol#2% +% \futurelet\next\math_repeat_integral_fake_indeed} +% +% \def\math_repeat_integral_real#1#2% +% {#1} +% +% \definemathcommand [iint] {\math_repeat_integral{"0222C}\normalint \math_repeated_integal_ii } % double +% \definemathcommand [iiint] {\math_repeat_integral{"0222D}\normaliint \math_repeated_integal_iii } % tripple +% \definemathcommand [iiiint] {\math_repeat_integral{"FFFFF}\normaliiint\math_repeated_integal_iiii} % quadruple +% +% \def\math_repeated_integral_kern +% {\mkern-6mu\mathchoice{\mkern-3mu}{}{}{}} +% +% \def\math_repeat_integral_fake_indeed +% {\ifx\next\limits +% \math_repeated_integral_correction +% \else\ifx\next\displaylimits +% \math_repeated_integral_correction +% \else\ifx\next\nolimits +% % nothing +% \else\ifcase\mathintlimitmode +% % nothing +% \else +% \math_repeated_integral_correction +% \fi\fi\fi\fi +% \math_repeat_integral_fake_symbol} +% +% \def\math_repeated_integral_correction +% {\mkern-7mu\mathchoice{\mkern-2mu}{}{}{}% +% \mathop\bgroup\mkern7mu\mathchoice{\mkern2mu}{}{}{}\let\math_repeat_integral_finish\egroup} +% +% %D If the \type{\limits} option is used after \type {\iint}, use \type +% %D {\mathop} and fudge the left hand space a bit to make the subscript +% %D visually centered. \protect \endinput |