J'ai complété le document sur la mise en orbite d'un satellite et ajouté en particuli...

[pst-eqdf.git] / gravitation / pst-eqdf.tex

diff --git a/gravitation/pst-eqdf.tex b/gravitation/pst-eqdf.tex
index b4dd3cf..803270e 100644 (file)
--- a/gravitation/pst-eqdf.tex
+++ b/gravitation/pst-eqdf.tex
@@ -28,6 +28,12 @@
 \catcode`\@=11\relax
 % Definition of the parameters
 % ----------------------------
+% Added by JG, 2012 06 20
+\def\datRoot{}
+% Definition of a "Root" within the hard drive for Distiller users
+% Note: The root must be set with "slashes" not "backslashes" like
+% \def\datRoot{C:/Users/Desktop/datfolder/}
+% By default the \datRoot is left empty (for non-Distiller usage)
 \pst@addfams{pst-eqd}
 \define@key[psset]{pst-eqd}{method}{\edef\psk@method{#1}}%
 \define@key[psset]{pst-eqd}{whichabs}{\edef\psk@whichabs{#1}}%
@@ -35,7 +41,7 @@
 \define@key[psset]{pst-eqd}{plotfuncx}{\edef\psk@plotfuncx{#1}}%
 \define@key[psset]{pst-eqd}{plotfuncy}{\edef\psk@plotfuncy{#1}}%
 \define@key[psset]{pst-eqd}{tabname}{\edef\psk@tabname{#1}}%
-\define@key[psset]{pst-eqd}{filename}{\edef\psk@filename{#1}}%
+\define@key[psset]{pst-eqd}{filename}{\edef\psk@filename{\datRoot#1}}%
 \newif\ifPst@buildvector%
 \define@key[psset]{pst-eqd}{buildvector}[true]{\@nameuse{Pst@buildvector#1}}%
 \newif\ifPst@saveData%
@@ -50,13 +56,12 @@
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %% #1-#2 x range
 %% #3 initial value of y (which is a vector)
-%% #4 value of the dérivative (y and t can be used)
+%% #4 value of the d\'{e}rivative (y and t can be used)
 \def\psequadiff{\def\pst@par{}\pst@object{psequadiff}}
 \def\psequadiff@i#1#2#3#4{%
   \pst@killglue
   \begingroup
     \use@par
-%  \addto@pscode{%
 \pstVerb{
     /x #1 def
     /x1 #2 def