summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/dvips/pst-fractal/pst-fractal.pro
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/dvips/pst-fractal/pst-fractal.pro')
-rw-r--r--Master/texmf-dist/dvips/pst-fractal/pst-fractal.pro16
1 files changed, 8 insertions, 8 deletions
diff --git a/Master/texmf-dist/dvips/pst-fractal/pst-fractal.pro b/Master/texmf-dist/dvips/pst-fractal/pst-fractal.pro
index 041b7122890..388447fd20f 100644
--- a/Master/texmf-dist/dvips/pst-fractal/pst-fractal.pro
+++ b/Master/texmf-dist/dvips/pst-fractal/pst-fractal.pro
@@ -15,7 +15,7 @@
%% `pst-fractal' is a PSTricks package to draw fractal objects
%%
%%
-%% version 0.01 / 2007-05-14 Herbert Voss <voss _at_ PSTricks.de>
+%% version 0.02 / 2010-02-10 Herbert Voss <hvoss _at_ tug.org>
%
/tx@fractalDict 20 dict def
tx@fractalDict begin
@@ -157,18 +157,18 @@ tx@fractalDict begin
} def
%
/tx@Fern { %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% \pst@tempA
-% \pst@fractal@scale
-% \pst@fractal@maxIter
-% \pst@fractal@radius
-% \pst@number\pslinewidth
-% { \pst@usecolor\pslinecolor }
+% \pst@fractal@scale
+% \pst@tempA
+% \pst@fractal@maxIter
+% \pst@fractal@radius
+% \pst@number\pslinewidth
+% { \pst@usecolor\pslinecolor }
/setColor ED
SLW
/radius ED
/maxIter ED
- 10 10 scale
translate
+ dup scale
/m1 [ 0.00 0.00 0.00 0.16 0.00 0.00 ] def
/m2 [ 0.85 -0.04 0.04 0.85 0.00 1.60 ] def
/m3 [ 0.20 0.23 -0.26 0.22 0.00 1.60 ] def