blob: b5a605cea539136c424c12b8b780c8315272cdd0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
|
%D \module
%D [ file=math-mis,
%D version=2001.04.12,
%D title=\CONTEXT\ Math Macros,
%D subtitle=Miscelaneous Symbols,
%D author=Hans Hagen,
%D date=\currentdate,
%D copyright=\PRAGMA]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.
\unprotect
%D \starttyping
%D \usemathcollection[mis]
%D \stoptyping
\def\styledmathcommand#1%
{\mathchoice
{\let\currentmathstyle\displaystyle#1}%
{\let\currentmathstyle\textstyle#1}%
{\let\currentmathstyle\scriptstyle#1}%
{\let\currentmathstyle\scriptscriptstyle#1}}
%D For Hong Feng:
\def\geneq
{\styledmathcommand\dogeneq}
\def\dogeneq
{\begingroup
\setbox\scratchbox\hbox{$\currentmathstyle=$}%
\hbox to \wd\scratchbox
{\copy\scratchbox
\hskip-\wd\scratchbox
\hss\incolortrue\localcolortrue
\color[white]{\vrule\!!height.6\ht\scratchbox\!!depth\zeropoint\!!width.2\wd\scratchbox}%
\hss}%
\endgroup}
%D \startbuffer
%D $a\geneq b^{a\geneq b^{a\geneq b}}$
%D \stopbuffer
%D
%D \typebuffer \getbuffer
\protect \endinput
|