From de252d25752922eade4f5921dc772887abba81dc Mon Sep 17 00:00:00 2001
From: Karl Berry <karl@freefriends.org>
Date: Mon, 22 Jun 2009 23:30:24 +0000
Subject: tdsfrmath 1.3 (22jun09)

git-svn-id: svn://tug.org/texlive/trunk@13896 c570f23f-e606-0410-a88d-b1316a301751
---
 .../texmf-dist/tex/latex/tdsfrmath/tdsfrmath.sty   | 74 ++++++++++++----------
 1 file changed, 42 insertions(+), 32 deletions(-)

(limited to 'Master/texmf-dist/tex/latex/tdsfrmath/tdsfrmath.sty')

diff --git a/Master/texmf-dist/tex/latex/tdsfrmath/tdsfrmath.sty b/Master/texmf-dist/tex/latex/tdsfrmath/tdsfrmath.sty
index 0f09a0111df..f79b130d079 100644
--- a/Master/texmf-dist/tex/latex/tdsfrmath/tdsfrmath.sty
+++ b/Master/texmf-dist/tex/latex/tdsfrmath/tdsfrmath.sty
@@ -21,19 +21,21 @@
 %% 1999/12/01 or later.
 \NeedsTeXFormat{LaTeX2e}[1999/12/01]
 \def\PackageName{tdsfrmath}
-\def\fileversion{v1.2}
-\def\filedate{2008/09/17}
+\def\fileversion{v1.3}
+\def\filedate{2009/06/22}
 \def\fileinfo{macros pour les maths
               par Le TeXnicien de surface}
 \ProvidesPackage{tdsfrmath}
    [\filedate\space\fileversion\space\fileinfo]
 \RequirePackage{ifthen}
 \RequirePackage{xkeyval}
+\RequirePackage{xstring}
+\newcommand{\TdSM@separateur}{\string,\,}
 \define@choicekey*+[TdSM]{tdsfrmath.sty}{nupletsep}[\val\nr]%
   {virgule,pointvirgule}{%
     \ifcase\nr\relax
-    \newcommand{\TdSM@separateur}{\string,\,}\or
-    \newcommand{\TdSM@separateur}{\,\string;\,}\fi
+    \renewcommand{\TdSM@separateur}{\string,\,}\or
+    \renewcommand{\TdSM@separateur}{\,\string;\,}\fi
   }{%
     \PackageWarningNoLine{tdsfrmath}{la clef <<nupletsep>> ne connait pas
       <<\val>>\MessageBreak <<nupletsep=virgule>> en vigueur}
@@ -53,22 +55,22 @@
     \PackageWarningNoLine{tdsfrmath}{la clef <<placesigne>> ne connait pas
       <<\TdSM@PlaSiChoix>>\MessageBreak <<placesigne=haut>> en vigueur}%
     \def\TdSM@PlaSiChoix{haut}}
-\define@boolkey+[TdSM]{tdsfrmath.sty}[TdSM@]{CharPoCal}[]{}%
+\define@boolkey+[TdSM]{tdsfrmath.sty}[TdSM@]{CharPoCal}[true]{}%
   {\PackageWarningNoLine{tdsfrmath}{CharPoCal attend la valeur
       << true >> ou << false >>}}
 \define@cmdkey[TdSM]{tdsfrmath.sty}[TdSM@]{calpack}[]{}
 \define@cmdkey[TdSM]{tdsfrmath.sty}[TdSM@]{calcomd}[]{}
 \define@cmdkey[TdSM]{tdsfrmath.sty}[TdSM@]{caloptn}[]{}
-\define@boolkey[TdSM]{tdsfrmath.sty}[TdSM@]{CharPoGdT}[]{}
+\define@boolkey[TdSM]{tdsfrmath.sty}[TdSM@]{CharPoGdT}[true]{}
 \define@cmdkey[TdSM]{tdsfrmath.sty}[TdSM@]{gdtpack}[]{}
 \define@cmdkey[TdSM]{tdsfrmath.sty}[TdSM@]{gdtcomd}[]{}
 \define@cmdkey[TdSM]{tdsfrmath.sty}[TdSM@]{gdtoptn}[]{}
-\define@boolkey[TdSM]{tdsfrmath.sty}[TdSM@]{taupe}[]{}
-\define@boolkey[TdSM]{tdsfrmath.sty}[TdSM@]{ArgArcMaj}[]{}
-\define@boolkey[TdSM]{tdsfrmath.sty}[TdSM@]{suite}[]{}
-\define@boolkey[TdSM]{tdsfrmath.sty}[TdSM@]{suitedeco}[]{}
-\define@boolkey[TdSM]{tdsfrmath.sty}[TdSM@]{SepDefEnsExt}[]{}
-\define@boolkey[TdSM]{tdsfrmath.sty}[TdSM@]{avecmathdesign}[]{}
+\define@boolkey[TdSM]{tdsfrmath.sty}[TdSM@]{taupe}[true]{}
+\define@boolkey[TdSM]{tdsfrmath.sty}[TdSM@]{ArgArcMaj}[true]{}
+\define@boolkey[TdSM]{tdsfrmath.sty}[TdSM@]{suite}[true]{}
+\define@boolkey[TdSM]{tdsfrmath.sty}[TdSM@]{suitedeco}[true]{}
+\define@boolkey[TdSM]{tdsfrmath.sty}[TdSM@]{SepDefEnsExt}[true]{}
+\define@boolkey[TdSM]{tdsfrmath.sty}[TdSM@]{avecmathdesign}[true]{}
 \ExecuteOptionsX[TdSM]{%
   avecmathdesign=false,%
   taupe=false,%
@@ -197,19 +199,20 @@
 \let\TdSM@PlaSiChoix=\relax
 \newcommandx\EnsembleDeNombre[4]{%
   \ensuremath{%
-    \grastab{#1}%
-    \ifthenelse{\equal{#2}{*}}{^{\ast}}{%
-    \ifthenelse{\equal{#2}{+}}{\TdSM@PlaceSigne{+}}{%
-    \ifthenelse{\equal{#2}{-}}{\TdSM@PlaceSigne{-}}{%
-    \ifthenelse{\equal{#2}{+*}\or\equal{#2}{*+}}{%
+    \grastab{#1}{%
+    \edef\TdSM@arg{\@firstofone#2}%
+    \ifthenelse{\equal{\TdSM@arg}{1}}{}{%
+    \ifthenelse{\equal{\TdSM@arg}{0}}{\mspace{#4mu}\left[#3\right]}{%
+    \ifthenelse{\equal{\TdSM@arg}{*}}{^{\ast}}{%
+    \ifthenelse{\equal{\TdSM@arg}{+}}{\TdSM@PlaceSigne{+}}{%
+    \ifthenelse{\equal{\TdSM@arg}{-}}{\TdSM@PlaceSigne{-}}{%
+    \ifthenelse{\equal{\TdSM@arg}{+*}\or\equal{\TdSM@arg}{*+}}{%
       \TdSM@Decoration{\ast}{+}}{%
-    \ifthenelse{\equal{#2}{-*}\or\equal{#2}{*-}}{%
+    \ifthenelse{\equal{\TdSM@arg}{-*}\or\equal{\TdSM@arg}{*-}}{%
       \TdSM@Decoration{\ast}{-}}{%
-    \ifthenelse{#2=1}{}{%
-    \ifthenelse{#2>1}{^{\number #2}}{%
-    \ifthenelse{#2<0}{_{\number -#2}\mspace{#4mu}\left[#3\right]}{%
-    [\string?\string?\string?]%
-    }}}}}}}}}\xspace}
+    \IfBeginWith{\TdSM@arg}{-}{%
+      _{\StrBehind{\TdSM@arg}{-}}\mspace{#4mu}\left[#3\right]}{%
+      ^{\TdSM@arg}}}}}}}}}}}\xspace}
 \newcommandx\N[2][1=1,2=X]%
      {\EnsembleDeNombre{N}{#1}{#2}{\TdSMReculParenthese}}
 \newcommandx\Z[2][1=1,2=X]%
@@ -231,6 +234,9 @@
 \WithSuffix\newcommand\R-{\R[-]}
 \WithSuffix\newcommand\R>{\R[+*]}
 \WithSuffix\newcommand\R<{\R[-*]}
+\DeclareRobustCommand{\TdSM@Rcomplet}{\ensuremath{\overline{\R}}}
+\WithSuffix\newcommand\TdSM@Rcomplet+{\ensuremath{\overline{\R+}}}
+\WithSuffix\newcommand\R/{\TdSM@Rcomplet}
 \newcommand\TdSMnuplet[1]{\TdSM@nuplet #1 \@nil}
 \def\TdSM@nuplet #1#2 #3{%
   \ifx\@nil #3%
@@ -243,18 +249,22 @@
 \newboolean{TdSM@horstexterequis}
 \setboolean{TdSM@horstexterequis}{false}
 \newcommandx{\EncloreExtensible}[4][1=1]{%
-  \ifthenelse{#1=0}
-  {\setboolean{TdSM@horstexterequis}{true}}
-  {\setboolean{TdSM@horstexterequis}{false}}
+  \ifthenelse{#1=0}%
+  {\setboolean{TdSM@horstexterequis}{true}}%
+  {\setboolean{TdSM@horstexterequis}{false}}%
   \ifmmode\ifinner\else
-    \setboolean{TdSM@horstexterequis}{true}
+    \setboolean{TdSM@horstexterequis}{true}%
   \fi\else\fi
   {\ensuremath{%
-      \ifthenelse{\boolean{TdSM@horstexterequis}}
-      {\displaystyle\def\@v@nt{\left #2}\def\@pr@s{\right #3}}
-      {\ifthenelse{\equal{#2}{.}}{\def\@v@nt{\relax}}{\def\@v@nt{#2}}%
-       \ifthenelse{\equal{#3}{.}}{\def\@pr@s{\relax}}{\def\@pr@s{#3}}}
-      \@v@nt #4 \@pr@s}}}
+      \ifthenelse{\boolean{TdSM@horstexterequis}}%
+      {\displaystyle\def\TdS@v@nt{\left #2}\def\TdS@pr@s{\right #3}}%
+      {\ifthenelse{\equal{#2}{.}}%
+        {\def\TdS@v@nt{\relax}}%
+        {\def\TdS@v@nt{\mathopen#2}}%
+       \ifthenelse{\equal{#3}{.}}%
+         {\def\TdS@pr@s{\relax}}
+         {\def\TdS@pr@s{\mathclose#3}}}%
+      \TdS@v@nt #4 \TdS@pr@s}}}
 \newcommandx{\parent}[2][1=1]{\EncloreExtensible[#1]{(}{)}{#2}}
 \newcommandx{\accol}[2][1=1]{\EncloreExtensible[#1]{\{}{\}}{#2}}
 \newcommandx{\crochet}[2][1=1]{\EncloreExtensible[#1]{[}{]}{#2}}
-- 
cgit v1.2.3

