Source Browser ?

1
%D \module
2
%D   [       file=math-mis,
3
%D        version=2013.04.06, % 2007.07.19,
4
%D          title=\CONTEXT\ Math Macros,
5
%D       subtitle=Miscellaneous,
6
%D         author=Hans Hagen,
7
%D           date=\currentdate,
8
%D      copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
9
%C
10
%C This module is part of the \CONTEXT\ macro||package and is
11
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
12
%C details.
13
14
\writestatus
{
loading
}{
ConTeXt
 
Math
 
Macros
 
/
 
Miscellaneous
}
15
16
\unprotect
17
18
%D This file contains left-overs moved from other files. It's mostly old stuff
19
%D that we keep around for compatbility reasons.
20
21
%D \macros
22
%D   {qedsymbol}
23
%D
24
%D [HH] The general Quod Erat Demonstrandum symbol is defined in such a way that
25
%D we can configure it. Because this symbol is also used in text mode, we make it
26
%D a normal text symbol with special behavior.
27
28
\unexpanded
\def
\qedsymbol
#
1
%
29  
{
\ifhmode
30     
\unskip
\nobreakspace
\hfill
#
1
\par
31   
\else\ifmmode
32     
#
1
\relax
 
% leading \eqno removed
33   
\else
34     
\dontleavehmode
\emptyhbox
\hfill
#
1
\par
35   
\fi\fi
}
36
37
\definesymbol
 
[
qed
]
 
[
\qedsymbol
{
\mathematics
{
\square
}}
]
38
39
%D \macros
40
%D   {QED}
41
%D
42
%D [HH] For compatbility reasons we also provide the \type {\QED} command. In case
43
%D this command is overloaded, we still have the symbol available. \symbol[qed]
44
45
\unexpanded
\def
\QED
{
\symbol
[
qed
]
}
46
47
%D \macros
48
%D   {boxed}
49
%D
50
%D [HH] Another macro that users might expect (slightly adapted):
51
52
\unexpanded
\def
\boxed
 
% maybe obsolete
53  
{
\ifmmode
\expandafter
\mframed
\else\expandafter
\framed
\fi
}
54
55
%D Something low level for scientific calculator notation:
56
57
\unexpanded
\def
\scinot
#
1
#
2
%
58  
{
#
1
\times
1
0
^
{
#
2
}}
59
60
\protect
 
\endinput
61