blob: e3c4c72643fb9e6f1aa17708a2639f0cf9d7440d (
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
|
%%
%% This is file `icomma.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% icomma.dtx (with options: `package')
%%
%% IMPORTANT NOTICE:
%%
%% For the copyright see the source file.
%%
%% Any modified versions of this file must be renamed
%% with new filenames distinct from icomma.sty.
%%
%% For distribution of the original source see the terms
%% for copying and modification in the file icomma.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{icomma}
[2002/03/10 v2.0 (WaS)]
\AtBeginDocument{%
\mathchardef\mathcomma\mathcode`\,%
\mathcode`\,="8000 %
}
{\catcode`,=\active
\gdef,{\futurelet\@let@token\sm@rtcomma}
}
\def\sm@rtcomma{%
\ifx\@let@token\@sptoken \else
\ifx\@let@token\space \else
\mathord\fi\fi \mathcomma}
\endinput
%%
%% End of file `icomma.sty'.
|
