blob: 534135a831696afd5d1e15e2f4abad93368b726a (
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
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
|
%%
%% This is file `thm-kv.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% thm-kv.dtx (with options: `kv')
%% This is a generated file.
%%
%% This file is part of the `thmtools' package.
%% The `thmtools' package has the LPPL maintenance status: maintained.
%% Current Maintainer is Ulrich M. Schwarz, ulmi@absatzen.de
%%
%% Copyright (C) 2008 by Ulrich M. Schwarz.
%%
%% This file may be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, version 1.3a.
%% This version is obtainable at
%% http://www.latex-project.org/lppl/lppl-1-3a.txt
%%
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{thm-kv}[2008/06/22 v0.1beta6 thm-kv interface (ulmi)]
\let\@xa\expandafter
\let\@nx\noexpand
\usepackage{keyval}
\define@key{thmt}{parent}{\thmt@setparent{#1}}
\define@key{thmt}{numberwithin}{\thmt@setparent{#1}}
\define@key{thmt}{within}{\thmt@setparent{#1}}
\define@key{thmt}{sibling}{\thmt@setsibling{#1}}
\define@key{thmt}{numberlike}{\thmt@setsibling{#1}}
\define@key{thmt}{sharenumber}{\thmt@setsibling{#1}}
\define@key{thmt}{title}{\thmt@setthmname{#1}}
\define@key{thmt}{name}{\thmt@setthmname{#1}}
\define@key{thmt}{heading}{\thmt@setthmname{#1}}
\define@key{thmt}{unnumbered}[]{\thmt@isnumberedfalse}
\define@key{thmt}{starred}[]{\thmt@isnumberedfalse}
\define@key{thmt}{preheadhook}{\addtotheorempreheadhook[\thmt@envname]{#1}}
\define@key{thmt}{postheadhook}{\addtotheorempostheadhook[\thmt@envname]{#1}}
\define@key{thmt}{prefoothook}{\addtotheoremprefoothook[\thmt@envname]{#1}}
\define@key{thmt}{postfoothook}{\addtotheorempostfoothook[\thmt@envname]{#1}}
\define@key{thmt}{style}{\thmt@setstyle{#1}}
\providecommand\theoremstyle[1]{%
\PackageWarning{thm-kv}{%
Your backend doesn't have a `\string\theoremstyle' command.\MessageBreak
Your style request `#1' was ignored
}%
}
\let\thmt@setstyle\theoremstyle
\newif\ifthmt@isnumbered
\newcommand\thmt@setparent[1]{%
\def\thmt@parent{#1}%
}
\newcommand\thmt@setsibling{%
\def\thmt@sibling
}
\newcommand\thmt@setthmname{%
\def\thmt@thmname
}
\newcommand\declaretheorem[2][]{%
\let\thmt@theoremdefiner\thmt@original@newtheorem
\def\thmt@envname{#2}%
\thmt@setthmname{\MakeUppercase #2}%
\thmt@setparent{}%
\thmt@setsibling{}%
\thmt@isnumberedtrue%
\setkeys{thmt}{#1}%
\protected@edef\thmt@tmp{%
\@nx\newtheorem
\ifthmt@isnumbered\else *\fi
{#2}%
\ifx\thmt@sibling\@empty\else [\thmt@sibling]\fi
{\thmt@thmname}%
\ifx\thmt@parent\@empty\else [\thmt@parent]\fi
}%\show\thmt@tmp
\thmt@tmp
% uniquely ugly kludge: some keys make only sense
% afterwards.
\setkeys{thmt}{#1}%
}
\define@key{thmt}{shaded}[{}]{%
\RequirePackage{shadethm}%
\addtotheorempreheadhook[\thmt@envname]{%
\setlength\shadedtextwidth{\linewidth}%
\setkeys{thmt@shade}{#1}\begin{shadebox}}%
\addtotheorempostfoothook[\thmt@envname]{\end{shadebox}}%
}
\define@key{thmt@shade}{textwidth}{\setlength\shadedtextwidth{#1}}
\define@key{thmt@shade}{bgcolor}{\definecolor{shadethmcolor}#1}
\define@key{thmt@shade}{rulecolor}{\definecolor{shaderulecolor}#1}
\define@key{thmt@shade}{rulewidth}{\setlength\shadeboxrule{#1}}
\define@key{thmt@shade}{margin}{\setlength\shadeboxsep{#1}}
\define@key{thmt}{thmbox}[L]{%
\let\oldproof=\proof
\let\oldendproof=\endproof
\let\oldexample=\example
\let\oldendexample=\endexample
\RequirePackage[nothm]{thmbox}
\let\proof=\oldproof
\let\endproof=\oldendproof
\let\example=\oldexample
\let\endexample=\oldendexample
\def\thmt@theoremdefiner{\newboxtheorem[#1]}%
}%
\endinput
%%
%% End of file `thm-kv.sty'.
|
