blob: a2b646f9186522e2f912307c531587e1a5ec80c4 (
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
|
% +--------------------------------------------------+
% | Documentation in clear text follows |
% +--------------------------------------------------+
%
% (c) 1999 Javier Bezos. All Rights Reserved.
%
% This file can be redistributed and/or modified under the terms
% of the LaTeX Project Public License Distributed from CTAN
% archives in directory macros/latex/base/lppl.txt; either
% version 1 of the License, or any later version.
%
%
% Usage
% ~~~~~
% This package defines two commands: \dotlessi and \dotlessj, which give
% you access to dotless i's and j's in math mode. They are intended for
% symbols in non English languages.
%
% If the default math font is used, they are equivalent to \imath and
% \jmath; if a different font is used (like \mathrm, \mathbf, \mathsf)
% these commands look in the corresponding font tables to find their
% codes. In text mode, they expand to \i and \j. For example:
%
% $f_{\mathrm{m\acute{\dotlessj}n}}$
%
% Code
% ~~~~
\def\fileversion{1.0}
\def\filedate{1999/10/12}
\ProvidesPackage{dotlessi}[1999/10/12 v1.0 Dotless i/j for Math]
\expandafter\def\expandafter\@uclclist\expandafter
{\@uclclist\dotlessi\i\dotlessj\j}
\def\dotl@make#1#2{%
\ifmmode
{\ifnum\mathgroup=\m@ne
#2%
\else
\count@\escapechar \escapechar=\m@ne
\expandafter\expandafter\expandafter
\split@name\expandafter\string\the\textfont\mathgroup\@nil
\escapechar=\count@
\@ifundefined{\f@encoding\string#1}%
{\edef\f@encoding{\string?}}{}%
\expandafter\count@\the\csname\f@encoding\string#1\endcsname
\advance\count@"7000
\mathchar\count@
\fi}%
\else
#1%
\fi}
\DeclareRobustCommand\dotlessi{\dotl@make\i\imath}
\DeclareRobustCommand\dotlessj{\dotl@make\j\jmath}
\endinput
|
