summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/context/base/math-mis.tex
blob: 1b1193fd4e312746b9ee740b9a7bf25716c6372c (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\string\geneq b^{a\string\geneq b^{a\string\geneq b}}$
%D \stopbuffer
%D
%D \typebuffer \getbuffer

\protect \endinput