alphanum.sty

   1 %%
   2 %% This is file `alphanum.sty',
   3 %% generated with the docstrip utility.
   4 %%
   5 %% The original source files were:
   6 %%
   7 %% jura.dtx  (with options: `package')
   8 %%
   9 %% IMPORTANT NOTICE:
  10 %%
  11 %% For the copyright see the source file.
  12 %%
  13 %% Any modified versions of this file must be renamed
  14 %% with new filenames distinct from alphanum.sty.
  15 %%
  16 %% For distribution of the original source see the terms
  17 %% for copying and modification in the file jura.dtx.
  18 %%
  19 %% This generated file may be distributed as long as the
  20 %% original source files, as listed above, are part of the
  21 %% same distribution. (The sources need not necessarily be
  22 %% in the same archive or directory.)
  23 %% Written by Felix Braun
  24 %%
  25 \NeedsTeXFormat{LaTeX2e}[1995/12/01]
  26 \ProvidesPackage{alphanum}[1998/07/13 v4.3 alphanumeric section numbers]
  27 %\newcommand*{\@greek}[1]{\ifcase#1\relax\or$\alpha$\or$\beta$\or
  28 %$\gamma$\or$\delta$\or$\varepsilon$\or$\zeta$\or$\eta$\or$\vartheta$\or
  29 %$\iota$\or$\kappa$\or$\lambda$\or$\mu$\or$\nu$\or$\xi$\or$o$\or$\pi$\or
  30 %$\rho$\or$\sigma$\or$\tau$\or$\upsilon$\or$\varphi$\or$\chi$\or$\psi$\or
  31 %$\omega$\else\@ctrerr\fi}
  32 \newcounter{lvla}
  33 \newcounter{lvlb}
  34 \newcounter{lvlc}
  35 \newcounter{lvld}
  36 \newcounter{lvle}
  37 \newcounter{lvlf}
  38 \newcounter{lvlg}
  39 \newcounter{lvlh}
  40 \newcounter{lvli}
  41 \newcounter{lvlj}
  42 \newcounter{lvlk}
  43 \newcounter{lvll}
  44 \renewcommand*{\thelvla}{\J@Number}
  45 \renewcommand*{\thelvlb}{\J@Number}
  46 \renewcommand*{\thelvlc}{\J@Number}
  47 \renewcommand*{\thelvld}{\J@Number}
  48 \renewcommand*{\thelvle}{\J@Number}
  49 \renewcommand*{\thelvlf}{\J@Number}
  50 \renewcommand*{\thelvlg}{\J@Number}
  51 \renewcommand*{\thelvlh}{\J@Number}
  52 \renewcommand*{\thelvli}{\J@Number}
  53 \renewcommand*{\thelvlj}{\J@Number}
  54 \renewcommand*{\thelvlk}{\J@Number}
  55 \renewcommand*{\thelvll}{\J@Number}
  56 \if@twoside
  57 \newcommand*{\lvlamark}[1]{\J@SetCurrent%
  58 \@mkboth{\J@NumberRoot1\J@NumberEnd1\ #1}%
  59 {\J@NumberRoot1\J@NumberEnd1\ #1}}
  60 \newcommand*{\lvlbmark}[1]{\J@SetCurrent%
  61 \@mkboth{\J@NumberRoot1\,\J@NumberRoot2\J@NumberEnd2\ #1}%
  62 {\J@NumberRoot1\,\J@NumberRoot2\J@NumberEnd2\ #1}}
  63 \newcommand*{\lvlcmark}[1]{\J@SetCurrent\markright{\J@Number\ #1}}
  64 \else
  65 \newcommand*{\lvlamark}[1]{\J@SetCurrent%
  66 \markright{\J@NumberRoot1\J@NumberEnd1\ #1}}
  67 \newcommand*{\lvlbmark}[1]{\J@SetCurrent%
  68 \markright{\J@NumberRoot1\,\J@NumberRoot2\J@NumberEnd2\ #1}}
  69 \newcommand*{\lvlcmark}[1]{\J@SetCurrent%
  70 \markright{\J@NumberRoot1\,\J@NumberRoot2\,\J@Number\ #1}}
  71 \fi
  72 \newcommand*{\lvldmark}{\J@SetCurrent\@gobble}
  73 \newcommand*{\lvlemark}{\lvldmark}
  74 \newcommand*{\lvlfmark}{\lvldmark}
  75 \newcommand*{\lvlgmark}{\lvldmark}
  76 \newcommand*{\lvlhmark}{\lvldmark}
  77 \newcommand*{\lvlimark}{\lvldmark}
  78 \newcommand*{\lvljmark}{\lvldmark}
  79 \newcommand*{\lvlkmark}{\lvldmark}
  80 \newcommand*{\lvllmark}{\lvldmark}
  81 \newcounter{tiefe}\setcounter{tiefe}{1}
  82 \setcounter{tocdepth}{12}\setcounter{secnumdepth}{12}
  83 \newcommand*{\J@Number}{\J@NumberRoot{\value{tiefe}}%
  84 \J@NumberEnd{\value{tiefe}}}
  85 \newcommand*{\J@NumberRoot}[1]{\J@INumberRoot{#1}%
  86 {\csname c@lvl\@alph{#1}\endcsname}}
  87 \newcommand*{\J@INumberRoot}[2]{%
  88 \ifcase#1\or
  89 \@Alph{#2}\or
  90 \@Roman{#2}\or
  91 \@arabic{#2}\or
  92 \@alph{#2}\or
  93 \@alph{#2}\@alph{#2}\or
  94 \@greek{#2}\or
  95 \@greek{#2}\@greek{#2}\or
  96 (\@arabic{#2})\or
  97 (\@alph{#2})\or
  98 (\@alph{#2}\@alph{#2})\or
  99 (\@greek{#2})\or
 100 (\@greek{#2}\@greek{#2})\fi}
 101 \newcommand*{\J@NumberEnd}[1]{\ifnum#1<8\ifnum#1<4.\else)\fi\fi}
 102 \newcommand*\l@lvla{\@dottedtocline{1}{0em}{2,5em}}
 103 \newcommand*\l@lvlb{\@dottedtocline{2}{1em}{2,5em}}
 104 \newcommand*\l@lvlc{\@dottedtocline{3}{2em}{2,5em}}
 105 \newcommand*\l@lvld{\@dottedtocline{4}{3em}{2,5em}}
 106 \newcommand*\l@lvle{\@dottedtocline{5}{4em}{2,5em}}
 107 \newcommand*\l@lvlf{\@dottedtocline{6}{5em}{2,5em}}
 108 \newcommand*\l@lvlg{\@dottedtocline{7}{6em}{2,5em}}
 109 \newcommand*\l@lvlh{\@dottedtocline{8}{7em}{2,5em}}
 110 \newcommand*\l@lvli{\@dottedtocline{9}{8em}{2,5em}}
 111 \newcommand*\l@lvlj{\@dottedtocline{10}{9em}{2,5em}}
 112 \newcommand*\l@lvlk{\@dottedtocline{11}{10em}{2,5em}}
 113 \newcommand*\l@lvll{\@dottedtocline{12}{11em}{2,5em}}
 114 \newcommand*{\J@SetCurrent}{\xdef\@currentlabel{{\arabic{lvla}}%
 115 {\arabic{lvlb}}{\arabic{lvlc}}{\arabic{lvld}}{\arabic{lvle}}%
 116 {\arabic{lvlf}}{\arabic{lvlg}}{\arabic{lvlh}}{\arabic{lvli}}%
 117 {\arabic{lvlj}}{\arabic{lvlk}}{\arabic{lvll}}}}
 118 \newcommand*{\toc}{\secdef\J@LongToc\J@ShortToc}
 119 \newcommand*{\J@ShortToc}[1]{\stepcounter{lvl\alph{tiefe}}\J@Number\ %
 120 \addcontentsline{toc}{lvl\alph{tiefe}}%
 121 {\protect\numberline{\J@Number}#1}%
 122 \csname lvl\alph{tiefe}mark\endcsname{#1}\@gobblecr}
 123 \newcommand*{\J@LongToc}[2][]{%
 124 \@startsection{lvl\alph{tiefe}}{\value{tiefe}}{0pt}
 125 {\ifnum\value{tiefe}=1 -4ex plus-1,5ex minus-0,ex\else
 126 -2,7ex plus-0,8ex minus-0,2ex\fi}
 127 {\ifnum\value{tiefe}>7 -1em plus-0,5em\relax\else
 128 0,6ex plus0,3ex minus0,1ex\fi}
 129 {\sectfont\csname lvl\alph{tiefe}style\endcsname}[#1]{#2}}
 130 \providecommand*{\sectfont}{\normalfont}
 131 \newcommand*{\lvlastyle}{\large\bfseries}
 132 \newcommand*{\lvlbstyle}{\bfseries}
 133 \let\lvlcstyle=\lvlbstyle
 134 \let\lvldstyle=\lvlbstyle
 135 \let\lvlestyle=\lvlbstyle
 136 \let\lvlfstyle=\lvlbstyle
 137 \let\lvlgstyle=\lvlbstyle
 138 \newcommand*{\lvlhstyle}{\itshape}
 139 \let\lvlistyle=\lvlhstyle
 140 \let\lvljstyle=\lvlhstyle
 141 \let\lvlkstyle=\lvlhstyle
 142 \let\lvllstyle=\lvlhstyle
 143 \renewcommand*{\@seccntformat}[1]{\csname the#1\endcsname\ }
 144 \renewcommand*{\numberline}[1]{#1\ }
 145 \newcommand*{\leveldown}{%
 146 \ifnum\value{lvla}=0%
 147 \PackageWarning{alphanum}{\protect\sub\space without
 148 \protect\toc\space}\fi
 149 \ifnum\value{tiefe}=12%
 150 \PackageWarning{alphanum}{too many sublevels!! Ignored \protect\sub.
 151 \MessageBreak There will probably be an \protect\levelup\space
 152 without \protect\sub\space warning later on}
 153 \setcounter{tiefe}{11}\fi
 154 \stepcounter{tiefe}}
 155 \newcommand*{\sub}{\leveldown\toc}
 156 \newcommand*{\levelup}{%
 157 \ifnum\value{tiefe}=1%
 158 \PackageWarning{alphanum}{\protect\levelup\space without\protect\sub}
 159 \stepcounter{tiefe}\fi
 160 \ifnum\value{lvl\alph{tiefe}}=1%
 161 \PackageWarning{alphanum}{only one subitem in level "\J@Number" ending}%
 162 \fi
 163 \setcounter{lvl\alph{tiefe}}{0}
 164 \addtocounter{tiefe}{-1}\par\addvspace{2,7ex plus0,8ex minus1ex}}
 165 \renewcommand*{\@cite}[2][]{#1#2}
 166 \def\@citex[#1]#2{%
 167   \let\@citea\@empty
 168   \@cite{\@for\@citeb:=#2\do
 169     {\@citea\def\@citea{,\penalty\@m\ }%
 170      \edef\@citeb{\expandafter\@firstofone\@citeb\@empty}%
 171      \if@filesw\immediate\write\@auxout{\string\citation{\@citeb}}\fi
 172      \@ifundefined{b@\@citeb}{\mbox{\reset@font\bfseries ?}%
 173        \G@refundefinedtrue
 174        \@latex@warning
 175          {Citation `\@citeb' on page \thepage \space undefined}}%
 176          {\csname b@\@citeb\endcsname}}}{#1}}
 177 \renewcommand*{\ref}{%
 178 \@ifstar{\@tempswatrue\J@ref}{\@tempswafalse\J@ref}}
 179 \newcommand*{\J@ref}[1]{%
 180 \expandafter\ifx\csname r@#1\endcsname\relax
 181  \protect\G@refundefinedtrue
 182  \nfss@text{\reset@font\bfseries ??}
 183  \@latex@warning{Reference '#1' on page \thepage \space undefined}%
 184 \else
 185  \expandafter\J@refX\csname r@#1\endcsname
 186 \fi}
 187 \newcommand*{\J@refX}[1]{\expandafter\J@refXX#1}
 188 \newcommand*{\J@refXX}[2]{%
 189 \ifcat_\ifnum9<1#1_\else X\fi
 190   #1%
 191 \else
 192   \expandafter\J@refA#1%
 193 \fi}
 194 \newcommand*{\J@refA}[6]{\@tempcnta\@ne%
 195 \J@refP1{#1}0\J@refP2{#2}{#1}\J@refP3{#3}{#2}\J@refP4{#4}{#3}%
 196 \J@refP5{#5}{#4}\J@refP6{#6}{#5}\J@refB#6}
 197 \newcommand*{\J@refB}[7]{\J@refP7{#2}{#1}\J@refP8{#3}{#2}%
 198 \J@refP9{#4}{#3}\J@refP{10}{#5}{#4}\J@refP{11}{#6}{#5}%
 199 \J@refP{12}{#7}{#6}\J@NumberEnd\@tempcnta}
 200 \newcommand*{\J@refP}[3]{%
 201 \if@tempswa%
 202  \ifnum#2>0\@tempcnta#1\,\J@INumberRoot{#1}{#2}\fi
 203 \else%
 204  \ifnum#2=\value{lvl\@alph{#1}}%
 205   \ifnum#1=12\PackageError{alphanum}{Self-reference detected!}{You used
 206     a \protect\ref\space in the same section as the referenced
 207     \protect\label\MessageBreak That makes no sense!}\fi
 208  \else
 209   \ifnum#2>0\@tempcnta#1\@tempswatrue\J@INumberRoot{#1}{#2}\else
 210    \ifnum#3>0%
 211    \@tempcnta#1\advance\@tempcnta-1\relax\J@INumberRoot{\@tempcnta}{#3}%
 212    \fi
 213   \fi
 214  \fi
 215 \fi}
 216 \newenvironment*{jurabibliography}
 217 {\chapter*{\bibname
 218  \@mkboth{\bibname}{\bibname}}%
 219  \begin{description}\sloppy}{\end{description}}
 220 \def\jbibitem#1#2#3{\item[#1]\if@filesw
 221  {\let\protect\noexpand\immediate
 222  \write\@auxout{\string\bibcite{#3}{#2}}}\fi\ignorespaces}
 223 \newenvironment{sachverhalt}{\chapter*{Sachverhalt}%
 224 \@mkboth{Sachverhalt}{Sachverhalt}}{\clearpage}
 225 \endinput
 226 %%
 227 %% End of file `alphanum.sty'.