From 863fd221e0a76260801e4369a92f8612eb9ba1bc Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Fri, 21 Mar 2008 17:38:34 +0000 Subject: tablor update (19mar08) git-svn-id: svn://tug.org/texlive/trunk@7062 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/doc/latex/tablor/Figures.zip | Bin 123875 -> 142673 bytes Master/texmf-dist/doc/latex/tablor/tablor.html | 40 ++++--- Master/texmf-dist/doc/latex/tablor/tablor.pdf | Bin 267818 -> 287467 bytes Master/texmf-dist/doc/latex/tablor/tablor.tex | 157 +++++++++++++++++++++++-- Master/texmf-dist/tex/latex/tablor/tablor.sty | 12 +- 5 files changed, 178 insertions(+), 31 deletions(-) (limited to 'Master') diff --git a/Master/texmf-dist/doc/latex/tablor/Figures.zip b/Master/texmf-dist/doc/latex/tablor/Figures.zip index 4063f1cf6a9..9e1f9648f9b 100644 Binary files a/Master/texmf-dist/doc/latex/tablor/Figures.zip and b/Master/texmf-dist/doc/latex/tablor/Figures.zip differ diff --git a/Master/texmf-dist/doc/latex/tablor/tablor.html b/Master/texmf-dist/doc/latex/tablor/tablor.html index 6e67fa4e93b..e26383d0ea4 100644 --- a/Master/texmf-dist/doc/latex/tablor/tablor.html +++ b/Master/texmf-dist/doc/latex/tablor/tablor.html @@ -83,7 +83,7 @@
 
 \NeedsTeXFormat{LaTeX2e}[1995/12/01]
-\ProvidesPackage{tablor}[28/02/2008 v1.8 la machine à créer des tableaux de signes et variations]
+\ProvidesPackage{tablor}[19/03/2008 v1.9 la machine à créer des tableaux de signes et variations]
 
 % \copyleft Connan le Barbare \copyright
 % avec l'efficace participation de Jean-Michel Boucart
@@ -1198,7 +1198,7 @@ return(Meta);
 
 
 
-\begin{VerbatimOut}{XcasTSc.cxx}
+\begin{VerbatimOut}{XcasTSc.cxx}
 TSc(g,D,nmr):={
 f:=unapply(g,x);
 Z:=NULL;
@@ -1207,10 +1207,10 @@ S:=resoudre(f(x),x);
 if(size(S)==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{"
+                                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){"
+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{"
                               "};
 }
@@ -1225,20 +1225,22 @@ if(nz>2){pour u de 1 jusque nz-2 faire
      si Z[u]==Z[u+1] alors Z:=Z[0..u-1],Z[u+1..nz-1];nz:=nz-1;
      fsi;
 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{"
                               "}+ 
 if(f((mini+maxi)*0.5>0)){"plus;"}else{"moins;"};
 lf:=if(maxi!=+infinity and f(maxi)==0){"
-                                valBarre(btex 0 etex);"}else{"
+                                valBarre(btex 0 etex);"}else{"
                               "};
 
 }else{
 l0:="val(btex $"+latex(D[0])+"$ etex);";li:=" ";
-pour m de 0 jusque nz-1 faire l0:=l0+"val(btex $"+latex(Z[m])+"$ etex);
+pour m de 0 jusque nz-1 faire l0:=l0+"val(btex $"+latex(Z[m])+"$ etex);
 ";
 fpour; 
 l0:=l0+"val(btex $"+latex(D[1])+"$ etex);";
@@ -1246,13 +1248,13 @@ l0:=l0+"val(btex $"+latex(D[1])+"$ etex);";
 li:= if(mini!=-infinity and f(mini)==0){"
                                 valBarre(btex 0 etex);"}else{"
                               "}+ 
-if(f(Z[0]-0.01)>0){"plus;"}else{"moins;"}+if(simplifier(f(Z[0]))==0){"valBarre(btex 0 etex);"}else{"barre;"};                               
+if(f(Z[0]-0.01)>0){"plus;"}else{"moins;"}+"valBarre(btex 0 etex);";                               
 
-lm:=if(nz>=2){for(r:=0; r<=nz-2;r++){if(f((Z[r]+Z[r+1])*.5)>0){"plus;"}else{"moins;"}+
-                                      if(simplifier(f(Z[r+1]))==0){"valBarre(btex 0 etex);"}else{"barre;"} 
-                           }}else{" "}; 
+lm:=if(nz>=2){for(r:=0; r<=nz-2;r++){lm:=lm+if(f((Z[r]+Z[r+1])*.5)>0){"plus;"}else{"moins;"}+
+                                      "valBarre(btex 0 etex);" 
+                           }}else{" "}; 
 
-lf:=if(f(Z[nz-1]+1.0)>0){"plus;"}else{"moins;"}+if(maxi!=+infinity and f(maxi)==0){"valBarre(btex 0 etex);"}else{"
+lf:=if(f(Z[nz-1]+1.0)>0){"plus;"}else{"moins;"}+if(maxi!=+infinity and f(maxi)==0){"valBarre(btex 0 etex);"}else{"
                               "};
 }};  
 
@@ -1269,15 +1271,15 @@ MetaL:=" input tableauVariation;
 beginTableau("+nmr+")
 newLigneVariables(btex $\\Mathbold{x}$ etex);
    "+l0+"
-newLigneSignes(btex $\\hbox{\\bf Signe de }\\atop{\\displaystyle \\Mathbold{"+latex(f(x))+"}}$ etex);"+
+newLigneSignes(btex $\\hbox{\\bf Signe de }\\atop{\\displaystyle \\Mathbold{"+latex(f(x))+"}}$ etex);"+
                      li+lm+lf
                      +"
 endTableau;
-end"
+end"
 ;
 
 
-MetaLfc:="
+MetaLfc:="
 
 beginTableau("+nmr+")
 newLigneVariables(btex $\\Mathbold{x}$ etex);
@@ -1285,7 +1287,7 @@ newLigneVariables(btex $\\Mathbold{x}$ etex
 newLigneSignes(btex $\\hbox{\\bf Signe de }\\atop{\\displaystyle \\Mathbold{"+latex(f(x))+"}}$ etex);"+
                      li+lm+lf
                      +"
-endTableau;
+endTableau;
 
 "
 ;
@@ -1300,7 +1302,7 @@ fclose(sortie);
 
 
 
-return(MetaL);
+return(MetaL);
  }:;
 \end{VerbatimOut}
 
@@ -1312,7 +1314,7 @@ return(MetaL);
 
 %%
 %%
-%% traitement des fichiers produits par giac/xcas
+%% traitement des fichiers produits par giac/xcas
 %%
 %%
 
diff --git a/Master/texmf-dist/doc/latex/tablor/tablor.pdf b/Master/texmf-dist/doc/latex/tablor/tablor.pdf
index fb6fb954d59..b1975418732 100644
Binary files a/Master/texmf-dist/doc/latex/tablor/tablor.pdf and b/Master/texmf-dist/doc/latex/tablor/tablor.pdf differ
diff --git a/Master/texmf-dist/doc/latex/tablor/tablor.tex b/Master/texmf-dist/doc/latex/tablor/tablor.tex
index b1d730707a7..211b1339708 100644
--- a/Master/texmf-dist/doc/latex/tablor/tablor.tex
+++ b/Master/texmf-dist/doc/latex/tablor/tablor.tex
@@ -2,7 +2,7 @@
 \usepackage[height=250mm,width=183mm]{geometry}
 \usepackage[upright]{fourier}
 \usepackage{preambule}
-\usepackage{tablor}
+\usepackage[xcas]{tablor}
 
 \usepackage[dvips,colorlinks=true,linkcolor=orange]{hyperref}
 
@@ -25,7 +25,7 @@ keywordstyle =\color{0.2white}\usefont{OT1}{cmtt}{b}{n},basicstyle=\ttfamily,com
 \author{Guillaume \textsc{Connan} \\ \href{http://gconnan.free.fr}{http://gconnan.free.fr}\\
 avec l'efficace participation de Jean-Michel \textsc{Boucart}}
 
-\date{28 février 2008 - Version 1.8}
+\date{19 mars 2008 - Version 1.9}
 
 \begin{document}
 
@@ -102,11 +102,15 @@ pour installer une nouvelle extension \LaTeX{}.
 
 \item il faut avoir à disposition l'extension \texttt{fancyvrb};
 
-\item pour ceux qui compilent avec \texttt{pdf\LaTeX{}}, il n'y a aucun problème car \texttt{tablor}
-  contient déjà ce qu'il faut~:
+\item pour ceux qui compilent avec \texttt{pdf\LaTeX{}}, il n'y a aucun problème et rien à faire car \texttt{tablor}
+  contient déjà ce qu'il faut pour s'adapter~:
     \verb+\ifpdf \DeclareGraphicsRule{*}{mps}{*}{} \fi+
 
-\item il faut installer le fichier \texttt{tablor.sty} dans son \texttt{texmf} personnel.
+\item il faut installer le fichier  \texttt{tablor.sty} dans son \texttt{texmf} personnel. Pour ceux
+  qui ont \Prog{MiKTeX} sous \Prog{windows}, il suffit d'aller le chercher dans les dépôts. Pour les
+  utilisateurs de  \Prog{Unix}, vous  devez savoir  comment faire... Par  commodité, vous  pouvez en
+  profiter pour  installer la  version \Prog{Unix}  de \emph{MiKTeX package  manager}. J'ai  fait un
+  petit script pour vous y aider ici : \href{http://gconnan.free.fr/?page=52}{http://gconnan.free.fr/?page=52}
 
 
 
@@ -180,7 +184,7 @@ Le pr
 \usepackage{graphicx}
 \usepackage[french]{babel}
 \usepackage[upright]{fourier}
-\usepackage[xcas,linux,emacs]{tablor} % options modifiables
+\usepackage[xcas]{tablor} % option modifiable
 \end{lstlisting}
 
 
@@ -680,7 +684,7 @@ automatiquement pour m'afficher le tableau voulu~:
 
 
 \begin{center}
-  \begin{TS*}{101}
+  \begin{TS*}{106}
     TS([3*x+2,5*x^2-1],[-50,50],\tv)
   \end{TS*}
 \end{center}
@@ -912,6 +916,145 @@ TSc((x-10)*(x+10),[-10,10],\tv)
 
 
 
+
+
+
+
+\begin{lstlisting}
+\begin{enumerate}
+\item 
+
+ Selon le tableau de variation de la fonction $f$
+    ci-dessous, on peut affirmer que \ldots
+     
+\begin{TV}
+        TV([-5,10],[],"f","x",(5/2)*x^2-2*x+12,0,\tv)
+\end{TV}
+
+\VF
+\begin{itemize}
+
+    \item[\ldots] 5 n'a pas d'antécédent \Rep
+    \item[\ldots] 5 n'a pas d'image \Rep
+    \item[\ldots] 5 a deux antécédents \Rep
+    \item[\ldots] 5 a une image supérieure à celle de $\sqrt{2}$\Rep
+  
+\end{itemize}
+
+
+
+\item Soit $f$ la fonction définie par $f~:~x\mapsto 3x^3-5x^2+2x-7$.  Les tableaux suivants peuvent
+  correspondre à $f$~:
+
+\VF
+
+  \begin{enumerate}
+
+
+ \item Tableau 1 \Rep
+
+\begin{TV*}{1001}M
+        TV([-20,20],[],"f","x",3*x^3-5*x^2+2*x-7,0,\tv)
+\end{TV*}
+
+\item Tableau 2 \Rep
+
+\begin{TV*}{1002}
+        TV([-20,20],[],"f","x",-3*x^3+5*x^2-2*x+7,0,\tv)
+\end{TV*}
+
+\item Tableau 3 \Rep
+
+\begin{TSc*}{1003}
+        TSc(-3*x^3+5*x^2-2*x+7,[-20,20],\tv)
+\end{TSc*}
+
+
+\item Tableau 4 \Rep
+
+\begin{TSc*}{1004}
+        TSc(3*x^3-5*x^2+2*x-7,[-20,20],\tv)
+\end{TSc*}
+
+
+\end{enumerate}
+
+\end{enumerate}
+
+\end{lstlisting}
+
+
+
+
+
+\begin{enumerate}
+\item 
+
+ Selon le tableau de variation de la fonction $f$
+    ci-dessous, on peut affirmer que \ldots
+     
+\begin{TV}
+        TV([-5,10],[],"f","x",(5/2)*x^2-2*x+12,0,\tv)
+\end{TV}
+
+\VF
+\begin{itemize}
+
+    \item[\ldots] 5 n'a pas d'antécédent \Rep
+    \item[\ldots] 5 n'a pas d'image \Rep
+    \item[\ldots] 5 a deux antécédents \Rep
+    \item[\ldots] 5 a une image supérieure à celle de $\sqrt{2}$\Rep
+  
+\end{itemize}
+
+
+
+\item Soit $f$ la fonction définie par $f~:~x\mapsto 3x^3-5x^2+2x-7$.  Les tableaux suivants peuvent-ils
+  correspondre à la fonction $f$~:
+
+\VF
+
+  \begin{enumerate}
+
+
+ \item Tableau 1 \Rep
+
+
+\begin{TV*}{102}
+        TV([-20,20],[],"f","x",3*x^3-5*x^2+2*x-7,0,\tv)
+\end{TV*}
+
+\item Tableau 2 \Rep
+
+\begin{TV*}{103}
+        TV([-20,20],[],"f","x",-3*x^3+5*x^2-2*x+7,0,\tv)
+\end{TV*}
+
+\item Tableau 3 \Rep
+
+\begin{TSc*}{104}
+        TSc(-3*x^3+5*x^2-2*x+7,[-20,20],\tv)
+\end{TSc*}
+
+
+\item Tableau 4 \Rep
+
+\begin{TSc*}{105}
+        TSc(3*x^3-5*x^2+2*x-7,[-20,20],\tv)
+\end{TSc*}
+
+
+\end{enumerate}
+
+\end{enumerate}
+
+
+
+
+
+
+
+
 \pagebreak
 
 \tableofcontents
diff --git a/Master/texmf-dist/tex/latex/tablor/tablor.sty b/Master/texmf-dist/tex/latex/tablor/tablor.sty
index 065f6f236a4..726ed6f45a5 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}[28/02/2008 v1.8 la machine à créer des tableaux de signes et variations]
+\ProvidesPackage{tablor}[19/03/2008 v1.9 la machine à créer des tableaux de signes et variations]
 
 % \copyleft Connan le Barbare \copyright
 % avec l'efficace participation de Jean-Michel Boucart
@@ -1142,9 +1142,11 @@ if(nz>2){pour u de 1 jusque nz-2 faire
      si Z[u]==Z[u+1] alors Z:=Z[0..u-1],Z[u+1..nz-1];nz:=nz-1;
      fsi;
 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{"
                               "}+ 
@@ -1163,10 +1165,10 @@ l0:=l0+"val(btex $"+latex(D[1])+"$ etex);";
 li:= if(mini!=-infinity and f(mini)==0){"
                                 valBarre(btex 0 etex);"}else{"
                               "}+ 
-if(f(Z[0]-0.01)>0){"plus;"}else{"moins;"}+if(simplifier(f(Z[0]))==0){"valBarre(btex 0 etex);"}else{"barre;"};                               
+if(f(Z[0]-0.01)>0){"plus;"}else{"moins;"}+"valBarre(btex 0 etex);";                               
 
-lm:=if(nz>=2){for(r:=0; r<=nz-2;r++){if(f((Z[r]+Z[r+1])*.5)>0){"plus;"}else{"moins;"}+
-                                      if(simplifier(f(Z[r+1]))==0){"valBarre(btex 0 etex);"}else{"barre;"} 
+lm:=if(nz>=2){for(r:=0; r<=nz-2;r++){lm:=lm+if(f((Z[r]+Z[r+1])*.5)>0){"plus;"}else{"moins;"}+
+                                      "valBarre(btex 0 etex);" 
                            }}else{" "}; 
 
 lf:=if(f(Z[nz-1]+1.0)>0){"plus;"}else{"moins;"}+if(maxi!=+infinity and f(maxi)==0){"valBarre(btex 0 etex);"}else{"
-- 
cgit v1.2.3