J'ai introduit une variable (path= ) permettant d'indiquer le chemin d'un éventuel...
[pst-anamorphosis.git] / doc / pst-anamorphosis-add.tex
index 05a8722..d06c42c 100644 (file)
@@ -13,8 +13,8 @@
 \ifx\PSTnodesLoaded\endinput\else\input pst-node \fi
 \ifx\MultidoLoaded\endinput\else \input multido.tex \fi
 \ifx\PSTXKeyLoaded\endinput\else  \input pst-xkey \fi
-\def\fileversion{0.2}
-\def\filedate{2011/10/13}
+\def\fileversion{0.3}
+\def\filedate{2011/10/19}
 \message{`PSTANAMORPHOSISAdd' v\fileversion, \filedate}
 
 
@@ -62,7 +62,7 @@ n1 {
   /Y1 ED /X1 ED
   TableauPoints i 1 add get aload pop
   /Y2 ED /X2 ED
-0 0.01 1.0 { % k
+0 0.005 1.0 { % k
     /K exch def
     [
     K X2 mul 1 K sub X1 mul add
@@ -103,9 +103,12 @@ n1 {
     \pssetlength\pst@dimc{#2}%
     \def\pst@linetype{4}%
     \addto@pscode{
+    \tx@optionsanamorphosis
+    \tx@optionsanamorphosisAdd
       \pst@coor /yC exch def /xC exch def
       \ifPst@SpecialLength \pst@SpecialLength \else \pst@number\pst@dimc \fi
-      \psk@dimen CLW mul sub /rayon exch def
+      \psk@dimen CLW mul sub
+      /rayon exch def
       rayon xC add yC
       tx@anamorphosisPathDict begin Anamorphose end
       moveto
@@ -336,7 +339,7 @@ stroke
   }%
   \end@SpecialObj%
 \endgroup%
-} 
+}
 
 
 

Licence Creative Commons Les fichiers de Syracuse sont mis à disposition (sauf mention contraire) selon les termes de la
Licence Creative Commons Attribution - Pas d’Utilisation Commerciale - Partage dans les Mêmes Conditions 4.0 International.