1
2
3
4
5
6
7
8
9
10
11
12
13
14\writestatus{loading}{ConTeXt Math Macros Integrals}
15
16
17
18\unprotect
19
20\installcorenamespace{mathintegral}
21
22\newconstant\mathintlimitmode
23
24\permanent\def\intlimits
25 {\ifcase\mathintlimitmode
26 \nolimits
27 \or
28 \displaylimits
29 \or
30 \limits
31 \or
32 \ifnum\attribute\mathmodeattribute=\plusone
33 \limits
34 \else
35 \nolimits
36 \fi
37 \else
38
39 \fi}
40
41\letcsname\??mathintegral nolimits\endcsname\zerocount
42\letcsname\??mathintegral displaylimits\endcsname\plusone
43\letcsname\??mathintegral limits\endcsname\plustwo
44\letcsname\??mathintegral autolimits\endcsname\plusthree
45\letcsname\??mathintegral none\endcsname\plusfour
46
47\appendtoks
48 \mathintlimitmode
49 \ifcsname\??mathintegral\mathematicsparameter\s!integral\endcsname
50 \lastnamedcs
51 \else
52 \zerocount
53 \fi
54\to \everyswitchmathematics
55
56\setupmathematics
57 [\c!integral=auto]
58
59\protect \endinput
60 |