summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/t2/mathtext.sty
blob: a0aa308c312c668c165dfacc05a1fde86e660e3d (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
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
%%
%% This is file `mathtext.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% mathtext.dtx  (with options: `mathtext,warn')
%% 
%% IMPORTANT NOTICE:
%% 
%% For the copyright see the source file.
%% 
%% Any modified versions of this file must be renamed
%% with new filenames distinct from mathtext.sty.
%% 
%% For distribution of the original source see the terms
%% for copying and modification in the file mathtext.dtx.
%% 
%% This generated file may be distributed as long as the
%% original source files, as listed above, are part of the
%% same distribution. (The sources need not necessarily be
%% in the same archive or directory.)
\ProvidesPackage{mathtext}
  [1999/01/28 v1.0 transparent text-and-math defs]
\def\@@enc@update{%
  \expandafter\let\csname\cf@encoding-cmd\endcsname\@changed@cmd
  \expandafter\let\csname\cf@encoding-tmcmd\endcsname\@changed@tmcmd
  \expandafter\let\csname\f@encoding-cmd\endcsname\@current@cmd
  \expandafter\let\csname\f@encoding-tmcmd\endcsname\@current@tmcmd
  \default@T
  \csname T@\f@encoding\endcsname
  \csname D@\f@encoding\endcsname
  \let\enc@update\relax
  \let\cf@encoding\f@encoding
}
\def\@current@tmcmd#1#2#3{%
  \ifx\protect\@typeset@protect
    \@tmchar#2#3%
  \else
    \noexpand#1%
  \fi}
\def\@tmchar#1#2{\if@mmode\math@warn#2\else#1\fi}
\def\@changed@tmcmd#1#2#3{%
  \ifx\protect\@typeset@protect
    \@tmchar@#1%
  \else
    \noexpand#1%
  \fi}
\def\@tmchar@#1{%
    \if@mmode
      \expandafter\ifx\csname\cf@encoding math\string#1\endcsname\relax
         \expandafter\ifx\csname ?math\string#1\endcsname\relax
            \expandafter\def\csname ?math\string#1\endcsname{%
               \TextSymbolUnavailable#1%
            }%
         \fi
         \global\expandafter\let
               \csname\cf@encoding math\string#1\expandafter\endcsname
               \csname ?math\string#1\endcsname
      \fi
      \expandafter\math@warn\csname\cf@encoding math\string#1%
         \expandafter\endcsname
    \else
      \expandafter\ifx\csname\cf@encoding\string#1\endcsname\relax
         \expandafter\ifx\csname ?\string#1\endcsname\relax
            \expandafter\def\csname ?\string#1\endcsname{%
               \TextSymbolUnavailable#1%
            }%
         \fi
         \global\expandafter\let
               \csname\cf@encoding \string#1\expandafter\endcsname
               \csname ?\string#1\endcsname
      \fi
      \csname\cf@encoding\string#1%
         \expandafter\endcsname
    \fi}
\expandafter\let\csname?-tmcmd\endcsname\@changed@tmcmd
\def\DeclareFontEncoding@#1#2#3{%
  \expandafter
  \ifx\csname T@#1\endcsname\relax
     \def\cdp@elt{\noexpand\cdp@elt}%
     \xdef\cdp@list{\cdp@list\cdp@elt{#1}%
                    {\default@family}{\default@series}%
                    {\default@shape}}%
     \expandafter\let\csname#1-cmd\endcsname\@changed@cmd
     \expandafter\let\csname#1-tmcmd\endcsname\@changed@tmcmd
  \else
     \@font@info{Redeclaring font encoding #1}%
  \fi
  \global\@namedef{T@#1}{#2}%
  \global\@namedef{M@#1}{\default@M#3}%
  \xdef\LastDeclaredEncoding{#1}%
  \DeclareSymbolFont{#1letters}{#1}\rmdefault\mddefault\updefault
  }
\def\DeclareTextMathSymbol#1#2#3#4#5{%
   \expandafter\def\expandafter#1%
      \expandafter{%
         \csname#2-tmcmd\expandafter\endcsname
         \expandafter#1%
         \csname#2\string#1\expandafter\endcsname
         \csname#2math\string#1\endcsname
      }%
   \expandafter\chardef\csname#2\string#1\endcsname#5\relax
   \expandafter\DeclareMathSymbol\csname#2math\string#1\endcsname
     {#3}{#4}{#5}}
\@onlypreamble\DeclareTextMathSymbol
\let\if@mmode\ifmmode
\DeclareRobustCommand\reset@if@mmode{\let\if@mmode\ifmmode}
\def\if@mmode@{\reset@if@mmode\ifmmode}
\let\org@halign\halign
\DeclareRobustCommand\halign{\let\if@mmode\if@mmode@\org@halign}
\everymath\expandafter{\the\everymath\let\if@mmode\ifmmode}
\def\DeclareTextSymbol#1#2#3{%
  \DeclareTextMathSymbol#1{#2}\mathalpha{#2letters}{#3}}
\DeclareOption{warn}{%
\edef\reserved@a{\@backslashchar##1\expandafter\@gobble
  \string\math\@backslashchar}%
\expandafter\def\expandafter\gobble@math\reserved@a{}%
\def\math@warn#1{#1\PackageWarning{mathtext}{letter
  `\expandafter\gobble@math\string#1' used in math mode}}}
\let\math@warn\@empty
\ProcessOptions*
\endinput
%%
%% End of file `mathtext.sty'.