summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/corridx/corridx.sty
diff options
context:
space:
mode:
Diffstat (limited to 'macros/latex/contrib/corridx/corridx.sty')
-rw-r--r--macros/latex/contrib/corridx/corridx.sty171
1 files changed, 171 insertions, 0 deletions
diff --git a/macros/latex/contrib/corridx/corridx.sty b/macros/latex/contrib/corridx/corridx.sty
new file mode 100644
index 0000000000..e267017737
--- /dev/null
+++ b/macros/latex/contrib/corridx/corridx.sty
@@ -0,0 +1,171 @@
+%%
+%% This is file `corridx.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% corridx.dtx (with options: `package')
+%%
+%% This is a generated file.
+%% Copyright (C) Johannes Fink
+%%
+%% This file may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License, either version
+%% 1.2 of this license or (at your option) any later version. The
+%% latest version of this license is in:
+%% http://www.latex-project.org/lppl.txt and version 1.2 or later is
+%% part of all distributions of LaTeX version 1999/12/01 or later.
+%%
+\NeedsTeXFormat{LaTeX2e}[1999/12/01]
+\ProvidesPackage{corridx}
+ [2005/05/05 v1.0 Chemical Index]
+\newcommand{\ic}[1]{\begin{crrdxchem}#1\end{crrdxchem}\noic{#1}}%
+\newcommand{\noic}[1]{%
+\bgroup%
+\def\crrdx@key@prefix{chem }%
+\def\crrdx@key@ostfix{}%
+\def\crrdx@sep@@{@}%
+\def\crrdx@entry@prefix{\string\begin{crrdxchem}}%
+\def\crrdx@entry@postfix{\string\end{crrdxchem}}%
+\def\crrdx@fmt@page{\crrdx@fmtpage@chem}%
+\def\crrdx@sfc@prerun{\crrdx@sfc@prerun@default}%
+\def\crrdx@key@prerun{\crrdx@key@prerun@default}%
+\crrdx@fmt@index@entry{#1}{#1}%
+\egroup%
+}%
+\newcommand{\ia}[2]{#1 \mbox{(#2)}\noia{#1}{#2}}%
+\newcommand{\noia}[2]{%
+\bgroup%
+\def\crrdx@key@prefix{acr }%
+\def\crrdx@key@ostfix{}%
+\def\crrdx@sep@@{@}%
+\def\crrdx@entry@prefix{#2\string\nopagebreak!\string\begin{crrdxacr}}%
+\def\crrdx@entry@postfix{\string\end{crrdxacr}}%
+\def\crrdx@fmt@page{\crrdx@fmtpage@acr}%
+\def\crrdx@sfc@prerun{\crrdx@sfc@prerun@default}%
+\def\crrdx@key@prerun{\crrdx@key@prerun@default}%
+\crrdx@fmt@index@entry{#2}{#1}%
+\egroup%
+}%
+\newcommand{\noib}[2]{\noic{#1}\noia{#1}{#2}}%
+\newcommand{\ib}[2]{\ic{#1}\noia{#1}{#2}}%
+\newcommand{\ig}[2][]{%
+#2%
+\noig[#1]{#2}%
+}%
+\newcommand{\noig}[2][]{%
+\bgroup%
+\def\crrdx@key@prefix{gen }%
+\def\crrdx@key@ostfix{}%
+\def\crrdx@sep@@{@}%
+\def\crrdx@entry@prefix{}%
+\def\crrdx@entry@postfix{#1}%
+\def\crrdx@fmt@page{\crrdx@fmtpage@gen}%
+\def\crrdx@sfc@prerun{\crrdx@sfc@prerun@default}%
+\def\crrdx@key@prerun{\crrdx@key@prerun@default}%
+\crrdx@fmt@index@entry{#2}{#2}%
+\egroup%
+}%
+\newcommand{\crrdxformatpage}[2]{\@namedef{crrdx@fmtpage@#1}{#2}}%
+\crrdxformatpage{chem}{\@empty}%
+\crrdxformatpage{acr}{\@empty}%
+\crrdxformatpage{gen}{\@empty}%
+\newenvironment{crrdxchem}{}{}%
+\newenvironment{crrdxacr}{}{}%
+\newcommand{\crrdx@key}[1]{%
+\crrdx@key@prerun%
+\edef\crrdx@key@temp{#1}%
+\edef\crrdx@key@var{\@empty}%
+\let\end\@empty%
+\expandafter\crrdx@key@loop\crrdx@key@temp\end%
+}%
+\newcommand{\crrdx@key@loop}[1]{%
+\let\next=\crrdx@key@loop%
+\ifx#1\end\let\next=\relax\fi%
+\ifcat\noexpand#1a\lowercase{\edef\crrdx@key@var{\crrdx@key@var#1}}\fi%
+\next}%
+\newcommand{\crrdx@key@prerun@default}%
+{%
+\renewcommand{\textrm}[1]{{\noexpand\textrm{##1}}}%
+\renewcommand{\textbf}[1]{{\noexpand\textbf{##1}}}%
+\renewcommand{\textsf}[1]{{\noexpand\textsf{##1}}}%
+\renewcommand{\texttt}[1]{{\noexpand\texttt{##1}}}%
+\renewcommand{\textmd}[1]{{\noexpand\textmd{##1}}}%
+\renewcommand{\textit}[1]{{\noexpand\textit{##1}}}%
+\renewcommand{\textsc}[1]{{\noexpand\textsc{##1}}}%
+\renewcommand{\textsl}[1]{{\noexpand\textsl{##1}}}%
+\renewcommand{\textup}[1]{{\noexpand\textup{##1}}}%
+\def~{\string~}%
+}%
+\newcommand{\crrdx@sfc@prerun@default}%
+{%
+\renewcommand{\textrm}{\string\textrm}%
+\renewcommand{\textbf}{\string\textbf}%
+\renewcommand{\textsf}{\string\textsf}%
+\renewcommand{\texttt}{\string\texttt}%
+\renewcommand{\textmd}{\string\textmd}%
+\renewcommand{\textit}{\string\textit}%
+\renewcommand{\textsc}{\string\textsc}%
+\renewcommand{\textsl}{\string\textsl}%
+\renewcommand{\textup}{\string\textup}%
+\def~{\string~}%
+}%
+\newcommand{\crrdx@fmt@index@entry}[2]{%
+\crrdx@key{#1}%
+\crrdx@sfc{#2}%
+\edef\crrdx@fmt@index@entry@var{%
+\crrdx@key@prefix%
+\crrdx@key@var%
+\crrdx@key@ostfix%
+\crrdx@sep@@%
+\crrdx@entry@prefix%
+\crrdx@sfc@var%
+\crrdx@entry@postfix%
+\crrdx@fmt@page}%
+\index{\crrdx@fmt@index@entry@var}%
+}%
+\newcommand{\crrdx@sfc@loop}[1]{%
+\crrdx@sfc@prerun%
+\let\next=\crrdx@sfc@loop%
+\ifx#1\end\let\next=\relax\fi%
+\ifcat\noexpand#1a%
+\uppercase{\edef\crrdx@sfc@var{\crrdx@sfc@var#1}}%
+\let\next=\crrdx@sfc@loop@leftover%
+\else%
+\edef\crrdx@sfc@var{\crrdx@sfc@var#1}%
+\fi%
+\next}%
+\newcommand{\crrdx@sfc@loop@leftover}[1]{%
+\let\next=\crrdx@sfc@loop@leftover%
+\ifx#1\end\let\next=\relax\fi%
+\edef\crrdx@sfc@var{\crrdx@sfc@var#1}%
+\next%
+}%
+\newcommand{\crrdx@sfc}[1]{%
+\edef\crrdx@sfc@var{\@empty}%
+\let\end\@empty%
+\crrdx@split{#1}%
+\expandafter\crrdx@sfc@loop\crrdx@beforespace\end%
+\ifx\crrdx@afterspace\@empty\else%
+\edef\crrdx@sfc@var{\crrdx@sfc@var\space\crrdx@afterspace}%
+\fi%
+}%
+\def\crrdx@ss#1 #2\stop{\edef\crrdx@beforespace{#1}\edef\crrdx@afterspace{#2}}%
+\newcommand{\crrdx@split}[1]{%
+\edef\test{\@empty}%
+\crrdx@ss#1 \test\stop%
+\ifx\crrdx@afterspace\test%
+\edef\crrdx@beforespace{#1}\edef\crrdx@afterspace{\@empty}%
+\else%
+\crrdx@ss#1\stop%
+\fi%
+}%
+\providecommand\swallow[1]{\relax}%
+\providecommand{\sectioncrrdx}[1]%
+{\section*{#1}\addcontentsline{toc}{section}{#1}}%
+\AtBeginDocument{ \@ifpackageloaded{index}%
+{\PackageError{corridx}%
+{This package is not compatible with package index}{}}}%
+\endinput
+%%
+%% End of file `corridx.sty'.