tablor update (29feb08)

git-svn-id: svn://tug.org/texlive/trunk@6792 c570f23f-e606-0410-a88d-b1316a301751

2 files changed, 80 insertions, 80 deletions

diff --git a/Master/texmf-dist/tex/latex/tablor/tablor.cfg b/Master/texmf-dist/tex/latex/tablor/tablor.cfg
new file mode 100644
index 00000000000..a6e964edfb8
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/tablor/tablor.cfg
@@ -0,0 +1,26 @@
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%  Fichier de configuration de tablor.sty  %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+% La mise à jour de ce fichier permet d'adapter certains paramètres du package tablor.sty 
+% au poste de travail et aux habitudes des utilisateurs. 
+
+
+% Déclaration du système d'exploitation :
+% =====================================
+
+% Si vous utilisez windows, dé-commentez la ligne suivante :
+
+% \setboolean{windows}{true}
+
+
+
+% Déclaration de l'éditeur utilisé
+% ================================
+% 
+% Remplacez "texmaker" par la commande qui lance votre éditeur favori. 
+% Laissez une espace avant de fermer l'accolade.
+
+\newcommand{\editeur}{texmaker }
+
+
diff --git a/Master/texmf-dist/tex/latex/tablor/tablor.sty b/Master/texmf-dist/tex/latex/tablor/tablor.sty
index d83cf27ab00..065f6f236a4 100644
--- a/Master/texmf-dist/tex/latex/tablor/tablor.sty
+++ b/Master/texmf-dist/tex/latex/tablor/tablor.sty
@@ -1,6 +1,6 @@
 
 \NeedsTeXFormat{LaTeX2e}[1995/12/01]
-\ProvidesPackage{tablor}[19/02/2008 v1.7 la machine à créer des tableaux de signes et variations]
+\ProvidesPackage{tablor}[28/02/2008 v1.8 la machine à créer des tableaux de signes et variations]
 
 % \copyleft Connan le Barbare \copyright
 % avec l'efficace participation de Jean-Michel Boucart
@@ -52,45 +52,21 @@
 \RequirePackage{fancyvrb}
 \RequirePackage{ifpdf}
 
-%% liste des options : os et éditeur rapide
+
+% option xcas présent 
 
 
 \newboolean{xcas}\setboolean{xcas}{false}
-\newboolean{linux}\setboolean{linux}{false}
+\DeclareOption{xcas}{\setboolean{xcas}{true}}
+
+%% Initialisation du choix d'OS
 \newboolean{windows}\setboolean{windows}{false}
-\newboolean{macosx}\setboolean{macosx}{false}
-\newboolean{emacs}\setboolean{emacs}{false}
-\newboolean{xemacs}\setboolean{xemacs}{false} 
-\newboolean{texmaker}\setboolean{texmaker}{false}
-\newboolean{vi}\setboolean{vi}{false}
-\newboolean{winshell}\setboolean{winshell}{false}
-\newboolean{notepad}\setboolean{notepad}{false}
-\newboolean{vim}\setboolean{vim}{false}
-\newboolean{kate}\setboolean{kate}{false}
-\newboolean{gedit}\setboolean{gedit}{false}
-\newboolean{textmate}\setboolean{textmate}{false}
-\newboolean{texshop}\setboolean{texshop}{false}
 
-\DeclareOption{xcas}{\setboolean{xcas}{true}}
-\DeclareOption{linux}{\setboolean{linux}{true}}
-\DeclareOption{windows}{\setboolean{windows}{true}}
-\DeclareOption{mac}{\setboolean{macosx}{true}}
-\DeclareOption{emacs}{\setboolean{emacs}{true}}
-\DeclareOption{xemacs}{\setboolean{xemacs}{true}}
-\DeclareOption{texmaker}{\setboolean{texmaker}{true}}
-\DeclareOption{vi}{\setboolean{vi}{true}}
-\DeclareOption{winshell}{\setboolean{winshell}{true}}
-\DeclareOption{notepad}{\setboolean{notepad}{true}}
-\DeclareOption{vim}{\setboolean{vim}{true}}
-\DeclareOption{kate}{\setboolean{kate}{true}}
-\DeclareOption{gedit}{\setboolean{gedit}{true}}
-\DeclareOption{textmate}{\setboolean{textmate}{true}}
-\DeclareOption{texshop}{\setboolean{texshop}{true}}
-
-
-%% on peut configurer tablor dans un fichier extérieur
-
-\IfFileExists{tablor.cfg}{\input{tablor.cfg}}{\typeout{pas de fichier tablor.cfg}}
+
+%% on configure  tablor  dans un fichier extérieur pour la plateforme
+%% et l'éditeur
+
+\IfFileExists{tablor.cfg}{\input{tablor.cfg}}%\typeout{pas de fichier tablor.cfg}}
 
 \ProcessOptions\relax
 
@@ -102,9 +78,7 @@
 
 %% pour nettoyer les fichiers auxiliaires
 
-\AtEndDocument{\ifthenelse{\boolean{windows}}%
-{\immediate\write18{DEL tete.* *.user XCas*.* Xcas*.* *.mpx} } %
-{\immediate\write18{rm tete.* *.user XCas* Xcas* *.mpx} }}
+\AtEndDocument{\immediate\write18{\rem tete.* *.user XCas* Xcas* *.mpx}}
 
 
 
@@ -129,14 +103,22 @@
 %% Clôt le fichier metapost contenant le récapitulatif de tous les tableaux
 
 
+%% Définit des commandes disque selon l'OS utilisé
+\ifthenelse{\boolean{windows}}%
+    {\newcommand{\rem}{DEL } \newcommand{\cat}{TYPE }
+      \newcommand{\cp}{COPY }}%
+    {\newcommand{\rem}{rm }\newcommand{\cat}{cat }
+      \newcommand{\cp}{cp }}
+
+
+
 \newcommand{\nettoyer}[1][\jobname]%
-{\ifthenelse{\boolean{windows}}%
-{\immediate\write18{DEL #1.Tab.log}
-\immediate\write18{echo end >> #1.Tab.mp}}%
-{\immediate\write18{rm #1.Tab.log}
+{\immediate\write18{\rem #1.Tab.log}
 \immediate\write18{echo end >> #1.Tab.mp}
 }
-}
+
+
+
 
 %% Donne comme prefixe aux tableaux le prefixe courant
 %% Peut-être modifié par \initablor
@@ -152,6 +134,7 @@
 \newcommand{\tvbis}{\theTVnbis}
 
 
+
 %% permet de donner un prefixe aux tableaux produits (\jobname par défaut)
 %% effectue quelques vérifications :
 
@@ -161,18 +144,14 @@
 \setcounter{TVn}{0}%     Initialisation du compteur de tableaux.
 \ifthenelse{\boolean{xcas}}%    Avec l'option XCas
 {\IfFileExists{\Tableaux.Tab.mp}%      Si Tableaux.mp est présent...
-                  {\ifthenelse{\boolean{windows}}
-                  {\immediate\write18{DEL \Tableaux.Tab.mp}}% le détruire
-                  {\immediate\write18{rm \Tableaux.Tab.mp}}}% 
-                  {}%
-
-\ifthenelse{\boolean{windows}}
-   {\immediate\write18{COPY -f tete.mp \Tableaux.Tab.mp}}%  Reconstituer
-                                %  l'entête de Tableaux.mp
-   {\immediate\write18{cp -f tete.mp \Tableaux.Tab.mp}}}
-{\IfFileExists{\Tableaux.Tab.mp}%      Sans l'option XCas, si Tableaux.mp existe
-                  {\immediate\write18{mpost -interaction=batchmode \Tableaux.Tab}}% l'exécuter pour reconstituer les figures
-                  {\PackageWarning{tablor}{Pas de source metapost pour creer les tableaux.}}% sinon message d'erreur
+        {\immediate\write18{\rem \Tableaux.Tab.mp}}%  le détruire
+        {}%   
+ \immediate\write18{\cp -f tete.mp \Tableaux.Tab.mp}% Reconstituer l'entête de Tableaux.mp
+} 
+{\IfFileExists{\Tableaux.Tab.mp}%      Sans l'option XCas, si
+                                %      Tableaux.mp existe
+{\immediate\write18{mpost -interaction=batchmode \Tableaux.Tab}}% l'exécuter pour reconstituer les figures
+{\PackageWarning{tablor}{Pas de source metapost pour creer les tableaux.}}% sinon message d'erreur
                                 % (mais pas d'arret car les tableaux
                                 % peuvent être présents )
 }}%
@@ -1143,8 +1122,14 @@ Z:=NULL;
 mini:=D[0]; maxi:=D[1];lm:=" ";
 S:=resoudre(f(x),x);
 if(size(S)==0){
-li:=if(f(0)>0){"plus;"}else{"moins;"};
-lm:=" ";lf:=" ";
+l0:="val(btex $"+latex(D[0])+"$ etex);val(btex $"+latex(D[1])+"$ etex);";
+li:=if(mini!=-infinity and f(mini)==0){"
+                                valBarre(btex 0 etex);"}else{"
+                              "}+ 
+if(mini!=-infinity or maxi!=+infinity){if(f((mini+maxi)*0.5>0)){"plus;"}else{"moins;"}}else{if(f(0)>0){"plus;"}else{"moins;"}};
+lf:=if(maxi!=+infinity and f(maxi)==0){"
+                                valBarre(btex 0 etex);"}else{"
+                              "};
 }
 else{pour j de 0 jusque size(S)-1 faire 
                            if(S[j]>mini and S[j]<maxi){Z:=Z,simplifier(S[j])};
@@ -1159,7 +1144,7 @@ if(nz>2){pour u de 1 jusque nz-2 faire
 fpour;}
 nz:=size(Z);
 l0:=" ";li:=" ";lr:=" "; 
-if(nz==0){l0:="val(btex $"+latex(D[0])+"$ etex);val(btex $"+latex(D[1])+"$ etex);";
+if(nz==0) {l0:="val(btex $"+latex(D[0])+"$ etex);val(btex $"+latex(D[1])+"$ etex);";
 li:=if(mini!=-infinity and f(mini)==0){"
                                 valBarre(btex 0 etex);"}else{"
                               "}+ 
@@ -1256,9 +1241,9 @@ return(MetaL);
 \ifthenelse{\boolean{xcas}}{%        Avec l'option "XCas présent"
          \executGiacmp{XCas#1.giac}% reconstituer le tableau
                                    % exporter le source mp
-         \ifthenelse{\boolean{windows}}%
-             {\immediate\write18{TYPE XCasmpfc.mp >> \Tableaux.Tab.mp}}%
-             {\immediate\write18{cat XCasmpfc.mp >> \Tableaux.Tab.mp}}%
+                                   % puis lancer metapost pour créer
+                                   % l'image du tableau
+         \immediate\write18{\cat XCasmpfc.mp >> \Tableaux.Tab.mp}
          \immediate\write18{mpost -interaction=batchmode -jobname=\Tableaux.Tab  XCasmp#1}}%
          {% sinon, si le tableau est absent, alerte.
          \IfFileExists{\Tableaux.Tab.\theTVn}{}{% 
@@ -1283,33 +1268,21 @@ return(MetaL);
 \newcommand{\dressetoile}[1]{%
 \IfFileExists{\Tableaux.Tab.\theTVn}{% Test sur l'existence du tableau
 % Si oui, inclusion du fichier source de sauvegarde mp dans Tableaux
-\immediate\write18{cat TSav-\theTVn.mp >> \Tableaux.Tab.mp}}
+\immediate\write18{\cat TSav-\theTVn.mp >> \Tableaux.Tab.mp}}
 % Si  non,  lancement des opérations de fabrication 
 {\executGiacmp{XCas#1.giac}% 
-  \ifthenelse{\boolean{emacs}}{\immediate\write18{emacs XCasmpfc.mp}}{}
-  \ifthenelse{\boolean{xemacs}}{\immediate\write18{xemacs XCasmpfc.mp}}{}
-  \ifthenelse{\boolean{texmaker}}{\immediate\write18{texmaker XCasmpfc.mp}}{}
-  \ifthenelse{\boolean{vi}}{\immediate\write18{vi XCasmpfc.mp}}{}
-  \ifthenelse{\boolean{winshell}}{\immediate\write18{winshell XCasmpfc.mp}}{}
-  \ifthenelse{\boolean{notepad}}{\immediate\write18{notepad XCasmpfc.mp}}{}
-  \ifthenelse{\boolean{vim}}{\immediate\write18{vim XCasmpfc.mp}}{}
-  \ifthenelse{\boolean{kate}}{\immediate\write18{kate XCasmpfc.mp}}{}
-  \ifthenelse{\boolean{gedit}}{\immediate\write18{gedit XCasmpfc.mp}}{}
-   \ifthenelse{\boolean{textmate}}{\immediate\write18{textmate XCasmpfc.mp}}{}
- \ifthenelse{\boolean{texshop}}{\immediate\write18{texshop XCasmpfc.mp}}{}
+\immediate\write18{\editeur XCasmpfc.mp}
+
   % Modification avec l'éditeur choisi
 
-  \ifthenelse{\boolean{windows}}%
-        {\immediate\write18{cp -f XCasmpfc.mp TSav-\theTVn.mp}
-         \immediate\write18{cat XCasmpfc.mp >> \Tableaux.Tab.mp}}%
-        {\immediate\write18{cp -f XCasmpfc.mp TSav-\theTVn.mp}   % Sauvegarde du 
+\immediate\write18{\cp -f XCasmpfc.mp TSav-\theTVn.mp}   % Sauvegarde du 
                                  % source mp sur le disque pour une
                                  % inclusion ultérieure dans Tableaux.mp. 
-         \immediate\write18{cat XCasmpfc.mp >> \Tableaux.Tab.mp}} % Inclusion du
+\immediate\write18{\cat XCasmpfc.mp >> \Tableaux.Tab.mp}} % Inclusion du
                                                      % source dans le
                                                      % fichier
                                                      % Tableaux 
-  \immediate\write18{mpost -interaction=batchmode \Tableaux.Tab}}% Reconstitution des tableaux
+\immediate\write18{mpost -interaction=batchmode \Tableaux.Tab}% Reconstitution des tableaux
                                 % et création du dernier. L'option
                                 % pallie l'absence de end en fin de
                                 % fichier 
@@ -1356,7 +1329,8 @@ fclose(Sortie);
 
 \newenvironment{TSa}
 {\VerbatimEnvironment\begin{VerbatimOut}[commandchars=\\£µ]{XCas.user}}
-{\end{VerbatimOut}\dresse{}
+{\end{VerbatimOut}
+          \dresse{}
 }