% +--------------------------------------------------+
% | 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.
% 
% Please, send your comments and suggestions to <jbezos@arrakis.es>.
% 
% 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
