%%
%% 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'.
