blob: f9c1394cbff791e7b9430c2d9c745522b5f46130 (
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
116
117
118
119
120
|
%%
%% This is file `taupe.sto',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% tdsfrmath.dtx (with options: `taupe')
%% This is a generated file.
%%
%% Copyright (C) 2008 by Yvon Henel
%% dit «le TeXnicien de surface» <le.texnicien.de.surface@wanadoo.fr>
%%
%% 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]
\def\fileversion{v1.3}
\def\filedate{2009/06/22}
\ProvidesFile{taupe.sto}%
[\filedate\space\fileversion\space Pour tdsfrmath -- option taupe]
\newcommandx\K[2][1=1,2=X]%
{\EnsembleDeNombre{K}{#1}{#2}{\TdSMReculParenthese}}
\WithSuffix\newcommand\K*{\K[*]}
\newcommandx{\prodscal}[4][1=1,2=1,4=1]{%
\EncloreExtensible[#1]{\langle}{\rangle}{\TdSM@dedans{#2}{#3}{#4}}}
\newcommand{\TdSM@ReDeclareMathOperator}{%
\@ifstar{\@redeclmathop m}{\@redeclmathop o}}
\long\def\@redeclmathop#1#2#3{%
\let#2=\relax%
\DeclareRobustCommand{#2}{\qopname\newmcodes@#1{#3}}}
\TdSM@ReDeclareMathOperator{\cosh}{ch}
\TdSM@ReDeclareMathOperator{\sinh}{sh}
\TdSM@ReDeclareMathOperator{\tanh}{th}
\TdSM@ReDeclareMathOperator{\cot}{cotan}
\ifTdSM@ArgArcMaj
\TdSM@ReDeclareMathOperator{\arccos}{Arccos}
\TdSM@ReDeclareMathOperator{\arcsin}{Arcsin}
\TdSM@ReDeclareMathOperator{\arctan}{Arctan}
\fi
\ifTdSM@ArgArcMaj
\DeclareMathOperator{\argch}{Argch}
\DeclareMathOperator{\argsh}{Argsh}
\DeclareMathOperator{\argth}{Argth}
\else
\DeclareMathOperator{\argch}{argch}
\DeclareMathOperator{\argsh}{argsh}
\DeclareMathOperator{\argth}{argth}
\fi
\DeclareMathOperator{\Ker}{Ker}
\DeclareMathOperator{\Img}{Im}
\newcommand*{\tendversen}[1]{\xrightarrow[#1]\relax}
\newcommand*{\devlim}[2][0]{\ensuremath{\text{DL}_{#2}{\parent{#1}}}}
\newcommand*{\parties}[2][-2]{%
\ensuremath{\manus{p}\mspace{#1mu}\parent{{#2}}}}
\newcommand{\drv}[3][***]{\ensuremath{%
\frac{\D\ifthenelse{\equal{#1}{***}}{}{^{#1}}#2}%
{\D#3\ifthenelse{\equal{#1}{***}}{}{^{#1}}}}}
\newcommand{\ddrv}[3][***]{\ensuremath{\displaystyle\drv[#1]{#2}{#3}}}
\newcommandx{\interent}[4][1=1,2=2,4=2]{%
\EncloreExtensible[#1]{\llbracket}{\rrbracket}%
{\TdSM@dedans{#2}{#3}{#4}}}
\newcommandx{\interzn}[3][1=1,2=2,3=2]{\interent{0 n}\xspace}
\newcommand\TdSMDerPartSepar{\,}
\newcommand\derpart[2]{{%
\count@=1
\def\TdSM@sentinelle{@@}%
\def\TdSM@precedent{@@}%
\def\TdSM@DenomAux{}%
\def\TdSM@Denom{}%
\def\TdSM@Puissance{%
\ifnum\count0>1 ^{\the\count0}\fi}%
\def\TdSM@FaireDenom##1{%
\edef\TdSM@Denom{\TdSM@Denom \partial ##1}}
\def\TdSM@derpartaux##1##2{%
\ifx\@nil##2%
\def\TdSM@actuel{##1}%
\ifx\TdSM@actuel\TdSM@precedent
\advance\count0 by 1
\TdSM@FaireDenom{\TdSM@precedent\TdSM@Puissance}%
\else
\ifx\TdSM@precedent\TdSM@sentinelle
\TdSM@FaireDenom{\TdSM@actuel}%
\else
\TdSM@FaireDenom{%
\TdSM@precedent\TdSM@Puissance
\TdSMDerPartSepar\partial\TdSM@actuel}%
\fi
\fi
\else
\def\TdSM@actuel{##1}%
\ifx\TdSM@precedent\TdSM@sentinelle
\count0=1
\else
\ifx\TdSM@actuel\TdSM@precedent
\advance\count0 by 1
\else
\TdSM@FaireDenom{%
\TdSM@precedent\TdSM@Puissance\TdSMDerPartSepar}%
\count0=1
\fi
\fi
\advance\count@ by 1
\let\TdSM@precedent\TdSM@actuel%
\TdSM@derpart@continue##2%
\fi}%
\def\TdSM@derpart@continue##1\fi{\fi\TdSM@derpartaux##1}%
\TdSM@derpartaux#2\@nil%
\ensuremath{\frac%
{\partial\ifnum\count@>1^{\the\count@}\fi #1}%
{\TdSM@Denom}}%
}}
\endinput
%%
%% End of file `taupe.sto'.
|
