You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
89 lines
2.5 KiB
89 lines
2.5 KiB
6 years ago
|
%%
|
||
|
|
%% This is file `aliascnt.sty',
|
||
|
|
%% generated with the docstrip utility.
|
||
|
|
%%
|
||
|
|
%% The original source files were:
|
||
|
|
%%
|
||
|
|
%% aliascnt.dtx (with options: `package')
|
||
|
|
%%
|
||
|
|
%% This is a generated file.
|
||
|
|
%%
|
||
|
|
%% Project: aliascnt
|
||
|
|
%% Version: 2009/09/08 v1.3
|
||
|
|
%%
|
||
|
|
%% Copyright (C) 2006, 2009 by
|
||
|
|
%% Heiko Oberdiek <heiko.oberdiek at googlemail.com>
|
||
|
|
%%
|
||
|
|
%% This work may be distributed and/or modified under the
|
||
|
|
%% conditions of the LaTeX Project Public License, either
|
||
|
|
%% version 1.3c of this license or (at your option) any later
|
||
|
|
%% version. This version of this license is in
|
||
|
|
%% http://www.latex-project.org/lppl/lppl-1-3c.txt
|
||
|
|
%% and the latest version of this license is in
|
||
|
|
%% http://www.latex-project.org/lppl.txt
|
||
|
|
%% and version 1.3 or later is part of all distributions of
|
||
|
|
%% LaTeX version 2005/12/01 or later.
|
||
|
|
%%
|
||
|
|
%% This work has the LPPL maintenance status "maintained".
|
||
|
|
%%
|
||
|
|
%% This Current Maintainer of this work is Heiko Oberdiek.
|
||
|
|
%%
|
||
|
|
%% This work consists of the main source file aliascnt.dtx
|
||
|
|
%% and the derived files
|
||
|
|
%% aliascnt.sty, aliascnt.pdf, aliascnt.ins, aliascnt.drv.
|
||
|
|
%%
|
||
|
|
\NeedsTeXFormat{LaTeX2e}
|
||
|
|
\ProvidesPackage{aliascnt}%
|
||
|
|
[2009/09/08 v1.3 Alias counter (HO)]%
|
||
|
|
\newcommand*{\newaliascnt}[2]{%
|
||
|
|
\begingroup
|
||
|
|
\def\AC@glet##1{%
|
||
|
|
\global\expandafter\let\csname##1#1\expandafter\endcsname
|
||
|
|
\csname##1#2\endcsname
|
||
|
|
}%
|
||
|
|
\@ifundefined{c@#2}{%
|
||
|
|
\@nocounterr{#2}%
|
||
|
|
}{%
|
||
|
|
\expandafter\@ifdefinable\csname c@#1\endcsname{%
|
||
|
|
\AC@glet{c@}%
|
||
|
|
\AC@glet{the}%
|
||
|
|
\AC@glet{theH}%
|
||
|
|
\AC@glet{p@}%
|
||
|
|
\expandafter\gdef\csname AC@cnt@#1\endcsname{#2}%
|
||
|
|
\expandafter\gdef\csname cl@#1\expandafter\endcsname
|
||
|
|
\expandafter{\csname cl@#2\endcsname}%
|
||
|
|
}%
|
||
|
|
}%
|
||
|
|
\endgroup
|
||
|
|
}
|
||
|
|
\newcommand*{\aliascntresetthe}[1]{%
|
||
|
|
\@ifundefined{AC@cnt@#1}{%
|
||
|
|
\PackageError{aliascnt}{%
|
||
|
|
`#1' is not an alias counter%
|
||
|
|
}\@ehc
|
||
|
|
}{%
|
||
|
|
\expandafter\let\csname the#1\expandafter\endcsname
|
||
|
|
\csname the\csname AC@cnt@#1\endcsname\endcsname
|
||
|
|
}%
|
||
|
|
}
|
||
|
|
\newcommand*{\AC@findrootcnt}[1]{%
|
||
|
|
\@ifundefined{AC@cnt@#1}{%
|
||
|
|
#1%
|
||
|
|
}{%
|
||
|
|
\expandafter\AC@findrootcnt\csname AC@cnt@#1\endcsname
|
||
|
|
}%
|
||
|
|
}
|
||
|
|
\def\AC@patch#1{%
|
||
|
|
\expandafter\let\csname AC@org@#1reset\expandafter\endcsname
|
||
|
|
\csname @#1reset\endcsname
|
||
|
|
\expandafter\def\csname @#1reset\endcsname##1##2{%
|
||
|
|
\csname AC@org@#1reset\endcsname{##1}{\AC@findrootcnt{##2}}%
|
||
|
|
}%
|
||
|
|
}
|
||
|
|
\RequirePackage{remreset}
|
||
|
|
\AC@patch{addto}
|
||
|
|
\AC@patch{removefrom}
|
||
|
|
\endinput
|
||
|
|
%%
|
||
|
|
%% End of file `aliascnt.sty'.
|