texlive[45911] Master/texmf-dist: pst-fractal (26nov17)
commits+karl at tug.org
commits+karl at tug.org
Mon Nov 27 00:25:51 CET 2017
Revision: 45911
http://tug.org/svn/texlive?view=revision&revision=45911
Author: karl
Date: 2017-11-27 00:25:50 +0100 (Mon, 27 Nov 2017)
Log Message:
-----------
pst-fractal (26nov17)
Modified Paths:
--------------
trunk/Master/texmf-dist/doc/generic/pst-fractal/Changes
trunk/Master/texmf-dist/doc/generic/pst-fractal/README
trunk/Master/texmf-dist/doc/generic/pst-fractal/pst-fractal-doc.bib
trunk/Master/texmf-dist/doc/generic/pst-fractal/pst-fractal-doc.pdf
trunk/Master/texmf-dist/doc/generic/pst-fractal/pst-fractal-doc.tex
trunk/Master/texmf-dist/dvips/pst-fractal/pst-fractal.pro
trunk/Master/texmf-dist/tex/generic/pst-fractal/pst-fractal.tex
trunk/Master/texmf-dist/tex/latex/pst-fractal/pst-fractal.sty
Modified: trunk/Master/texmf-dist/doc/generic/pst-fractal/Changes
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-fractal/Changes 2017-11-26 22:59:23 UTC (rev 45910)
+++ trunk/Master/texmf-dist/doc/generic/pst-fractal/Changes 2017-11-26 23:25:50 UTC (rev 45911)
@@ -1,9 +1,13 @@
pst-fractal.pro --------
+0.04 2017-11-26 add sierpinski curve
+0.03 2011-02-10 cometic changes
0.02 2010-02-10 fix bug in tx at fern
0.01 2007-04-05 first CTAN version
pst-fractal.tex --------
+0.08 2017-11-26 - add sierpinski curve
+0.07 2013-06-17 - allow level 0 for sierpinski
0.06 2010-02-10 - add another type of a Sierpinski triangle
0.05 2007-09-25 - allow unbalanced trees with option 0<c<1
- use option c for unballanced trees
Modified: trunk/Master/texmf-dist/doc/generic/pst-fractal/README
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-fractal/README 2017-11-26 22:59:23 UTC (rev 45910)
+++ trunk/Master/texmf-dist/doc/generic/pst-fractal/README 2017-11-26 23:25:50 UTC (rev 45911)
@@ -6,7 +6,7 @@
For more information see the documentation of your LATEX distribution
on installing packages into your local TeX system or read the
TeX Frequently Asked Questions:
-(http://www.tex.ac.uk/cgi-bin/texfaq2html?label=instpackages).
+(http://www.tex.ac.uk/FAQ-install-where.html).
PSTricks is PostScript Tricks, the documentation cannot be run
with pdftex, use the sequence latex->dvips->ps2pdf.
@@ -14,3 +14,6 @@
To gett he documentation of this document you have to run
pst2pdf pst-fractal-doc --Iext=.jpg
+%% This program can be redistributed and/or modified under the terms
+%% of the LaTeX Project Public License Distributed from CTAN archives
+%% in directory macros/latex/base/lppl.txt.
Modified: trunk/Master/texmf-dist/doc/generic/pst-fractal/pst-fractal-doc.bib
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-fractal/pst-fractal-doc.bib 2017-11-26 22:59:23 UTC (rev 45910)
+++ trunk/Master/texmf-dist/doc/generic/pst-fractal/pst-fractal-doc.bib 2017-11-26 23:25:50 UTC (rev 45911)
@@ -1,88 +1,35 @@
- at STRING{dtk = {{D}ie {\TeX}nische {K}om{\"o}die} }
+ at STRING{tugboat = {TUGboat} }
+ at STRING{beiprogramm = {{\TeX}-Beiprogramm} }
+ at STRING{bretter = {Bretter, die die Welt bedeuten} }
+ at STRING{dtk = {{D}ie {\TeX}nische {K}om{\"o}die} }
+ at STRING{editorial = {Editorial} }
+ at STRING{fremdebuehne = {Von fremden B{\"u}hnen} }
+ at STRING{fundus = {Aus dem Fundus} }
+ at STRING{hinterbuehne = {Hinter der B{\"u}hne} }
+ at STRING{leserbrief = {Leserbrief(e)} }
+ at STRING{magazin = {Magazin} }
+ at STRING{rezension = {Rezensionen} }
+ at STRING{schonimmer = {Was Sie schon immer {\"u}ber {\TeX} wissen wollten \dots} }
+ at STRING{theaterkasse = {Von der Theaterkasse} }
+ at STRING{theatertage = {{\TeX}-Theatertage} }
- at Book{PostScript,
- Author = {Kollock, Nikolai G.},
- Title = {PostScript richtig eingesetzt: vom Konzept zum
- praktischen Einsatz},
- Publisher = {IWT},
- Address = {Vaterstetten},
- year = 1989,
-}
- at Manual{pstricks,
- Title = {PSTricks - {\PS} macros for Generic TeX},
- Author = {Timothy Van Zandt},
- Organization = {},
- Address = {\url{http://www.tug.org/application/PSTricks}},
- Note = {},
- year = 1993,
-}
-
-
- at Manual{pdftricks,
- Title = {PSTricks Support for pdf},
- Author = {Herbert Voss},
- Organization = {},
- Address = {\url{http://PSTricks.de/pdf/pdfoutput.phtml}},
- Note = {},
- year = 2002,
-}
-
- at Manual{miwi,
- Title = {References for \TeX{} and Friends},
- Author = {Michael Wiedmann and Peter Karp},
- Organization = {},
- Address = {\url{http://www.miwie.org/tex-refs/}},
- Note = {},
- year = 2003,
-}
-
-
- at Manual{vue3d:2002,
- Title = {Vue en 3D},
- Author = {Manuel Luque},
- Organization = {},
- Address = {\url{http://members.aol.com/Mluque5130/vue3d16112002.zip}},
- Note = {},
- year = 2002,
-}
-
- at Article{dtk02.2:jackson.voss:plot-funktionen,
- author = {Laura E. Jackson and Herbert Vo{\ss}},
- title = {Die {P}lot-{F}unktionen von {\texttt{pst-plot}}},
+ at Article{ dtk02.1:voss:mathematischen,
+ author = {Herbert Voß},
+ title = {Die mathematischen {F}unktionen von {P}ost{S}cript},
journal = dtk,
year = 2002,
- volume = {2/02},
- altvolume = 2,
- altnumber = 14,
- month = jun,
- pages = {27--34},
- annote = bretter,
- keywords = {},
- abstract = { Im letzten Heft wurden die mathematischen Funktionen von
- \PS~im Zusammenhang mit dem {\LaTeX}-Paket
- \texttt{pst-plot} zum Zeichnen von Funktionen beschrieben
- und durch Beispiele erl{\"a}utert. In diesem Teil werden
- die bislang nur erw{\"a}hnten Plot-Funktionen f{\"u}r
- externe Daten behandelt. }
-}
-
- at Article{dtk02.1:voss:mathematischen,
- author = {Herbert Vo{\ss}},
- title = {Die mathematischen {F}unktionen von {P}ostscript},
- journal = dtk,
- year = 2002,
volume = {1/02},
altvolume = 1,
altnumber = 14,
month = mar,
- pages = {40-47},
+ pages = {},
annote = bretter,
keywords = {},
abstract = { \PS, faktisch genauso alt wie {\TeX}, ist im
Verh{\"a}ltnis dazu allgemein noch weniger bekannt, wenn es
darum geht zu beurteilen, was es denn nun im eigentlichen
- Sinne ist. Au{\ss}erdem wird h{\"a}ufig vergessen, dass
+ Sinne ist. Außerdem wird h{\"a}ufig vergessen, dass
sich mit den \PS-Funktionen viele Dinge erledigen lassen,
bei denen sonst auf externe Programme zur{\"u}ckgegriffen
wird. Dies wird im Folgenden f{\"u}r die mathematischen
@@ -91,29 +38,88 @@
}
@Book{tlgc2,
- author = {Michel Goosens and Frank Mittelbach and Sebastian Rahtz and Denis Roegel and Herbert Vo{\ss}},
+ author = {Michel Goosens and Frank Mittelbach and Sebastian Rahtz and Denis Roegel and Herbert Voß},
title = {The {\LaTeX} {G}raphics {C}ompanion},
publisher = {{Addison-Wesley Publishing Company}},
- edition = second,
+ edition = 2,
year = {2007},
address = {Reading, Mass.}
}
+ at Article{girou:01:,
+ author = {Denis Girou},
+ title = {Pr\'esentation de {PST}ricks},
+ journal = {Cahier {GUT}enberg},
+ year = 1994,
+ volume = {16},
+ month = apr,
+ pages = {21-70}
+}
+
+ at Article{girou:02:,
+ author = {{Timothy van} Zandt and Denis Girou},
+ title = {Inside {PST}ricks},
+ journal = TUGboat,
+ year = 1994,
+ volume = {15},
+ month = sep,
+ pages = {239-246}
+}
+
+ at Book{PostScript,
+ Author = {Kollock, Nikolai G.},
+ Title = {Post{S}cript richtig eingesetzt: vom {K}onzept zum
+ praktischen {E}insatz},
+ Publisher = {IWT},
+ Address = {Vaterstetten},
+ year = 1989,
+}
+
+ at online{pstricks,
+ Title = {PSTricks - {\PS} macros for generic {\TeX}},
+ Author = {{Timothy van} Zandt},
+ Organization = {},
+ url = {http://www.tug.org/application/PSTricks},
+ year = 1993
+}
+
@Book{PSTricks2,
- author = {Herbert Vo\ss},
+ author = {Herbert Voß},
title = {\texttt{PSTricks} -- {G}rafik f\"ur \TeX{} und \LaTeX},
- edition = {4.},
+ edition = {7},
publisher = {DANTE -- Lehmanns},
+ year = {2016},
+ publisher = {Heidelberg and Berlin}
+}
+
+ at Book{PSTricks2-UIT,
+ author = {Herbert Voß},
+ title = {PSTricks -- Graphics for \TeX\ and \LaTeX},
+ publisher = {UIT},
+ year = {2011},
+ address = {Cambridge}
+}
+
+ at Book{LaTeXRef-UIT,
+ author = {Herbert Voß},
+ title = {{\LaTeX} quick reference},
+ publisher = {UIT},
+ year = {2012},
+ address = {Cambridge}
+}
+
+ at online{wolfram,
+ author = {Eric Weisstein},
+ title = {Wolfram MathWorld},
+ publisher = {{Wolfram}},
year = {2007},
- address = {Heidelberg/Hamburg}
+ url = {http://mathworld.wolfram.com}
}
- at Book{voss:math,
- author = {Herbert Vo\ss},
- title = {\LaTeX\ in {M}athematik und {N}aturwissenschaften},
- publisher = {{Franzis-Verlag}},
- year = {2006},
- address = {Poing}
+ at ctan{pst-tools,
+ author = {Herbert Voß},
+ title = {\texttt{pst-tools} -- Helper functions},
+ year = {2012},
+ url = {/graphics/pstricks/contrib/pst-tools}
}
-
Modified: trunk/Master/texmf-dist/doc/generic/pst-fractal/pst-fractal-doc.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/doc/generic/pst-fractal/pst-fractal-doc.tex
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-fractal/pst-fractal-doc.tex 2017-11-26 22:59:23 UTC (rev 45910)
+++ trunk/Master/texmf-dist/doc/generic/pst-fractal/pst-fractal-doc.tex 2017-11-26 23:25:50 UTC (rev 45911)
@@ -1,12 +1,16 @@
-%% $Id: pst-func-doc.tex 273 2010-01-26 18:28:55Z herbert $
+%% $Id: pst-fractal-doc.tex 658 2017-11-26 16:55:41Z herbert $
\documentclass[11pt,english,BCOR10mm,DIV12,bibliography=totoc,parskip=false,
smallheadings, headexclude,footexclude,oneside]{pst-doc}
\usepackage[utf8]{inputenc}
-\usepackage{pst-fractal,pst-exa}
+\usepackage{pst-fractal}
\let\pstFV\fileversion
-\renewcommand\bgImage{\includegraphics[scale=1.5]{images/pst-fractal-doc-tmp-1.pdf}}
+\renewcommand\bgImage{\includegraphics[scale=1.5]{images/pst-fractal-doc-tmp-1}}
\def\PSLenv{\Lenv{pspicture}}
+\usepackage{animate}
+%\usepackage{auto-pst-pdf}
+
+\addbibresource{\jobname.bib}
\lstset{language=PSTricks,basicstyle=\footnotesize\ttfamily}
%
\begin{document}
@@ -57,28 +61,97 @@
In difference to \Lcs{psfractal} it doesn't reserve any space, this is the
reason why it should be part of a \PSLenv{} environment.
-\begin{PSTexample}[pos=l]
+\begin{LTXexample}[pos=l]
\begin{pspicture}(5,5)
\psSier(0,0)(2,5)(5,0)
\end{pspicture}
-\end{PSTexample}
+\end{LTXexample}
-\begin{PSTexample}[pos=l]
-\begin{pspicture}(5,5)
+\begin{LTXexample}[pos=t]
+\multido{\iA=1+1}{6}{%
+\begin{pspicture}(2,1.7)
\psSier[linecolor=blue!70,
- fillcolor=red!40](0,0){5cm}{4}
+ fillcolor=red!40](0,0){2cm}{\iA}
+\end{pspicture} }
+\end{LTXexample}
+
+
+\section{Sierpinski curve}
+
+There are four special optional arguments for the Siepinski curve:
+\begin{itemize}
+ \item \texttt{[n=4]} : number of iterations
+ \item \texttt{[N=all]} : number of placed points (only of interest for an animation)
+ \item \texttt{[dotcolor=red]} : in difference to linecolor for standard PSTricks
+ \item \texttt{[showpoints=false]} : show calculated points
+\end{itemize}
+
+\begin{LTXexample}[pos=t]
+\begin{pspicture}(-4,-4)(4,4)
+\psframe*[linecolor=cyan](-4,-4)(4,4)
+\psSier[unit=0.25,n=4,fillstyle=solid,fillcolor=yellow,linecolor=blue]
+\psgrid[subgriddiv=0,gridcolor=blue,griddots=5,gridlabels=0pt,unit=0.5](-8,-8)(8,8)
\end{pspicture}
-\end{PSTexample}
+\end{LTXexample}
+\begin{LTXexample}[pos=t]
+\begin{pspicture}[showgrid](-4,-4)(4,4)
+\psset{unit=0.25}
+% n=4 => Nmax=4^(n+1)=1024
+% ici on marque la moitie des points
+\psSier[n=4,N=512]
+\end{pspicture}
+\end{LTXexample}
+
+
+
+\begin{LTXexample}[pos=t]
+\begin{pspicture}(-4,-4)(4,4)
+\psframe*[linecolor=-yellow](-4,-4)(4,4)
+\psSier[n=5,unit=0.125,fillstyle=solid,fillcolor=-cyan,linecolor=-blue]
+\end{pspicture}
+\end{LTXexample}
+
+
+
+\iffalse
+
+\begin{animateinline}[controls,% palindrome,
+ begin={\begin{pspicture}(-4,-4)(4,4)},
+ end={\end{pspicture}}]{5}% 5 image/s
+\multiframe{256}{i=1+1}{%
+ \psframe*[linecolor=yellow!20](-4,-4)(4,4)
+ \psgrid[subgriddiv=0,gridcolor=blue,griddots=5,gridlabels=0pt,unit=0.5](-8,-8)(8,8)
+% n=3 => Nmax=4^(n+1)=256 points
+ \psSier[linecolor=blue,linewidth=0.05,n=3,showpoints,dotsize=0.1,N=\i,unit=0.5]}
+\end{animateinline}
+
+
+\begin{verbatim}
+\begin{animateinline}[controls,% palindrome,
+ begin={\begin{pspicture}(-4,-4)(4,4)},
+ end={\end{pspicture}}]{5}% 5 image/s
+\multiframe{256}{i=1+1}{%
+\psframe*[linecolor=yellow!20](-4,-4)(4,4)
+\psgrid[subgriddiv=0,gridcolor=blue,griddots=5,gridlabels=0pt,unit=0.5](-8,-8)(8,8)
+% n=3 => Nmax=4^(n+1)=256 points
+\psSierpinskyCurve[linecolor=blue,linewidth=0.05,n=3,showpoints,dotsize=0.1,N=\i,unit=0.5]}
+\end{animateinline}
+\end{verbatim}
+
+\fi
+
\section{Julia and Mandelbrot sets}
The syntax of the \Lcs{psfractal} macro is simple
-
+%
\begin{BDef}
\Lcs{psfractal}\OptArgs\coord0\coord1
\end{BDef}
+
+
All Arguments are optional, \Lcs{psfractal} is the same as \Lcs{psfractal}\verb+(-1,-1)(1,1)+.
The Julia and Mandelbrot sets are a graphical representation of the following sequence
$x$ is the real and $y$ the imaginary part of the complex number $z$. $C(x,y)$ is a complex constant
@@ -97,15 +170,17 @@
\end{align}
$(x_0;y_0)$ is the starting value.
-\begin{PSTexample}[pos=l]
-\pspicture(-1,-1)(1,1)\psfractal\endpspicture
-\end{PSTexample}
+\psset{unit=1cm,opacity=0}
-\begin{PSTexample}[pos=l]
-\pspicture(-2,-2)(2,2)
+
+
+\begin{LTXexample}[pos=l]
+\psfractal
+\end{LTXexample}
+
+\begin{LTXexample}[pos=l]
\psfractal[xWidth=4cm,yWidth=4cm, baseColor=white, dIter=20](-2,-2)(2,2)
-\endpspicture
-\end{PSTexample}
+\end{LTXexample}
\subsection{Mandelbrot sets}
@@ -120,20 +195,16 @@
$(x_0;y_0)$ is the starting value.
-\begin{PSTexample}[pos=l]
-\pspicture(-1,-1)(1,1)
+\begin{LTXexample}[pos=l]
\psfractal[type=Mandel]
-\endpspicture
-\end{PSTexample}
+\end{LTXexample}
-\begin{PSTexample}[pos=l]
-\pspicture(-2,-2)(2,2)
+\begin{LTXexample}[pos=l]
\psfractal[type=Mandel, xWidth=6cm,
yWidth=4.8cm, baseColor=white,
dIter=10](-2,-1.2)(1,1.2)
-\endpspicture
-\end{PSTexample}
+\end{LTXexample}
\subsection{The options}
@@ -142,22 +213,18 @@
\Lkeyword{txpe} can be of \Lkeyval{Julia} (default) or \Lkeyval{Mandel}.
-\begin{PSTexample}[pos=l]
-\pspicture(-1,-1)(3,1)
+\begin{LTXexample}[pos=l]
\psfractal
\psfractal[type=Mandel]
-\endpspicture
-\end{PSTexample}
+\end{LTXexample}
\subsection{\texttt{baseColor}}
The color for the convergent part is set by \Lkeyword{baseColor}.
-\begin{PSTexample}
-\begin{postscript}
+\begin{LTXexample}
\psfractal[xWidth=4cm,yWidth=4cm,dIter=30](-2,-2)(2,2)
\psfractal[xWidth=4cm,yWidth=4cm,baseColor=yellow,dIter=30](-2,-2)(2,2)
-\end{postscript}
-\end{PSTexample}
+\end{LTXexample}
\subsection{\texttt{xWidth} and \texttt{yWidth}}
@@ -164,22 +231,18 @@
\Lkeyword{xWidth} and \Lkeyword{yWidth}
define the physical width of the fractal.
-\begin{PSTexample}
-\begin{postscript}
+\begin{LTXexample}
\psfractal[type=Mandel,xWidth=12.8cm,yWidth=10.8cm,dIter=5](-2.5,-1.3)(0.7,1.3)
-\end{postscript}
-\end{PSTexample}
+\end{LTXexample}
\subsection{\texttt{cx} and \texttt{cy}}\xLkeyword{cx}\xLkeyword{cy}
Define the starting value for the complex constant number $C$.
-\begin{PSTexample}
-\begin{postscript}
+\begin{LTXexample}
\psset{xWidth=5cm,yWidth=5cm}
\psfractal[dIter=2](-2,-2)(2,2)
\psfractal[dIter=2,cx=-1.3,cy=0](-2,-2)(2,2)
-\end{postscript}
-\end{PSTexample}
+\end{LTXexample}
\subsection{\texttt{dIter}}
@@ -187,25 +250,21 @@
\Lkeyword{dIter} is the step, predefined by 1. The wavelength is given by
the value of \Lps{iter} added by 400.
-\begin{PSTexample}
-\begin{postscript}
+\begin{LTXexample}
\psset{xWidth=5cm,yWidth=5cm}
\psfractal[dIter=30](-2,-2)(2,2)
\psfractal[dIter=10,cx=-1.3,cy=0](-2,-2)(2,2)
-\end{postscript}
-\end{PSTexample}
+\end{LTXexample}
\subsection{\texttt{maxIter}}
\Lkeyword{maxIter} is the number of the maximum iteration until it leaves the loop.
It is predefined by 255, but internally multiplied by \Lkeyword{dIter}.
-\begin{PSTexample}
-\begin{postscript}
+\begin{LTXexample}
\psset{xWidth=5cm,yWidth=5cm}
\psfractal[maxIter=50,dIter=3](-2,-2)(2,2)
\psfractal[maxIter=30,cx=-1.3,cy=0](-2,-2)(2,2)
-\end{postscript}
-\end{PSTexample}
+\end{LTXexample}
\subsection{\texttt{maxRadius}}
If the square of distance of $z_n$ to the origin of the complex coordinate system
@@ -213,18 +272,16 @@
and sets the point. \Lkeyword{maxRadius} should always be the square of the "`real"'
value, it is preset by 100.
-\begin{PSTexample}
-\begin{postscript}
+\begin{LTXexample}
\psset{xWidth=5cm,yWidth=5cm}
\psfractal[maxRadius=30,dIter=10](-2,-2)(2,2)
\psfractal[maxRadius=30,dIter=30,cx=-1.3,cy=0](-2,-2)(2,2)
-\end{postscript}
-\end{PSTexample}
+\end{LTXexample}
\subsection{\texttt{plotpoints}}\xLkeyword{plotpoints}
This option is only valid for the Sierpinski triangle and preset by 2000.
-\begin{PSTexample}
+\begin{LTXexample}
\begin{pspicture}(5,5)
\psSier(0,0)(2.5,5)(5,0)
\end{pspicture}
@@ -231,7 +288,7 @@
\begin{pspicture}(5,5)
\psSier[plotpoints=10000](0,0)(2.5,5)(5,0)
\end{pspicture}
-\end{PSTexample}
+\end{LTXexample}
@@ -250,63 +307,57 @@
is assumed.
-\begin{PSTexample}[pos=l]
-\begin{postscript}
-\psframebox{\begin{pspicture}(-3,-3)(3,3)
+\begin{LTXexample}[pos=l]
+\psframebox{%
+\begin{pspicture}(-3,-3)(3,3)
\psPhyllotaxis
\end{pspicture}}
-\end{postscript}
-\end{PSTexample}
+\end{LTXexample}
-\begin{PSTexample}[pos=l]
-\begin{postscript}
-\psframebox{\begin{pspicture}(-3,-3)(4,4)
+\begin{LTXexample}[pos=l]
+\psframebox{%
+\begin{pspicture}(-3,-3)(4,4)
\psPhyllotaxis(1,1)
\end{pspicture}}
-\end{postscript}
-\end{PSTexample}
+\end{LTXexample}
\subsection{\texttt{angle}}\xLkeyword{angle}
-\begin{PSTexample}[pos=l]
-\begin{postscript}
-\psframebox{\begin{pspicture}(-2.5,-2.5)(2.5,2.5)
+\begin{LTXexample}[pos=l]
+\psframebox{%
+\begin{pspicture}(-2.5,-2.5)(2.5,2.5)
\psPhyllotaxis[angle=99]
\end{pspicture}}
-\end{postscript}
-\end{PSTexample}
+\end{LTXexample}
\subsection{\texttt{c}}\xLkeyword{c}
This is the length of one element in the unit pt.
-\begin{PSTexample}
-\begin{postscript}
-\psframebox{\begin{pspicture}(8,8)
+\begin{LTXexample}
+\psframebox{%
+\begin{pspicture}(8,8)
\psPhyllotaxis[c=7](4,4)
\end{pspicture}}
-\end{postscript}
-\end{PSTexample}
+\end{LTXexample}
-\begin{PSTexample}
-\begin{postscript}
-\psframebox{\begin{pspicture}(-3,-3)(3,3)
+\begin{LTXexample}
+\psframebox{%
+\begin{pspicture}(-3,-3)(3,3)
\psPhyllotaxis[c=4,angle=111]
\end{pspicture}}
-\end{postscript}
-\end{PSTexample}
+\end{LTXexample}
\subsection{\texttt{maxIter}}\xLkeyword{maxIter}
This is the number for the iterations.
-\begin{PSTexample}
-\begin{postscript}
-\psframebox{\begin{pspicture}(-3,-3)(3,3)
+\begin{LTXexample}
+\psframebox{%
+\begin{pspicture}(-3,-3)(3,3)
\psPhyllotaxis[c=6,angle=111,maxIter=100]
\end{pspicture}}
-\end{postscript}
-\end{PSTexample}
+\end{LTXexample}
@@ -319,29 +370,26 @@
The coordinates of the starting point are optional, if they are missing, then $(0,0)$
is assumed. The default \Lkeyword{scale} is set to 10.
-\begin{PSTexample}
-\begin{postscript}
-\psframebox{\begin{pspicture}(-1,0)(1,4)
+\begin{LTXexample}
+\psframebox{%
+\begin{pspicture}(-1,0)(1,4)
\psFern
\end{pspicture}}
-\end{postscript}
-\end{PSTexample}
+\end{LTXexample}
-\begin{PSTexample}
-\begin{postscript}
-\psframebox{\begin{pspicture}(-1,0)(2,5)
+\begin{LTXexample}
+\psframebox{%
+\begin{pspicture}(-1,0)(2,5)
\psFern(1,1)
\end{pspicture}}
-\end{postscript}
-\end{PSTexample}
+\end{LTXexample}
-\begin{PSTexample}
-\begin{postscript}
-\psframebox{\begin{pspicture}(-3,0)(3,11)
+\begin{LTXexample}
+\psframebox{%
+\begin{pspicture}(-3,0)(3,11)
\psFern[scale=30,maxIter=100000,linecolor=green]
\end{pspicture}}
-\end{postscript}
-\end{PSTexample}
+\end{LTXexample}
\section{Koch flake}
@@ -355,14 +403,14 @@
or black point
in the following example:
-\begin{PSTexample}
+\begin{LTXexample}
\begin{pspicture}[showgrid=true](-2.4,-0.4)(5,5)
\psKochflake[scale=10]
\psdot[linecolor=red,dotstyle=*](0,0)
\end{pspicture}
-\end{PSTexample}
+\end{LTXexample}
-\begin{PSTexample}
+\begin{LTXexample}
\begin{pspicture}(-0.4,-0.4)(12,4)
\psset{fillcolor=lime,fillstyle=solid}
\multido{\iA=0+1,\iB=0+2}{6}{%
@@ -369,7 +417,7 @@
\psKochflake[angle=-30,scale=3,maxIter=\iA](\iB,2.5)\psdot*(\iB,2.5)
\psKochflake[scale=3,maxIter=\iA](\iB,0)\psdot*(\iB,0)}
\end{pspicture}
-\end{PSTexample}
+\end{LTXexample}
Optional arguments are \Lkeyword{scale}, \Lkeyword{maxIter} (iteration depth) and \Lkeyword{angle}
for the first rotation angle.
@@ -384,18 +432,18 @@
The coordinates of the starting point are optional, if they are missing, then $(0,0)$
is assumed. The origin is the center of the circle:
-\begin{PSTexample}
+\begin{LTXexample}
\begin{pspicture}[showgrid=true](-4,-4)(4,4)
\psAppolonius[Radius=4cm]
\end{pspicture}
-\end{PSTexample}
+\end{LTXexample}
-\begin{PSTexample}
+\begin{LTXexample}
\begin{pspicture}(-5,-5)(5,5)
\psAppolonius[Radius=5cm,Color]
\end{pspicture}
-\end{PSTexample}
+\end{LTXexample}
\section{Trees}
@@ -423,33 +471,33 @@
\end{center}
\bigskip
-\begin{PSTexample}
+\begin{LTXexample}
\begin{pspicture}[showgrid=true](-3,0)(3,4)
\psPTree
\psdot*(0,0)
\end{pspicture}
-\end{PSTexample}
+\end{LTXexample}
-\begin{PSTexample}
+\begin{LTXexample}
\begin{pspicture}[showgrid=true](-6,0)(6,7)
\psPTree[xWidth=1.75cm,Color=true]
\psdot*[linecolor=white](0,0)
\end{pspicture}
-\end{PSTexample}
+\end{LTXexample}
-\begin{PSTexample}
+\begin{LTXexample}
\begin{pspicture}(-7,-1)(6,8)
\psPTree[xWidth=1.75cm,c=0.35]
\end{pspicture}
-\end{PSTexample}
+\end{LTXexample}
-\begin{PSTexample}
+\begin{LTXexample}
\begin{pspicture}(-5,-1)(7,8)
\psPTree[xWidth=1.75cm,Color=true,c=0.65]
\end{pspicture}
-\end{PSTexample}
+\end{LTXexample}
-\begin{PSTexample}
+\begin{LTXexample}
\begin{pspicture}[showgrid=true](-1,0)(1,3)
\psFArrow{0.5}
\end{pspicture}
@@ -461,10 +509,10 @@
\begin{pspicture*}[showgrid=true](-3,0)(3,3.5)
\psFArrow[linewidth=3pt]{0.65}
\end{pspicture*}
-\end{PSTexample}
+\end{LTXexample}
-\begin{PSTexample}
+\begin{LTXexample}
\begin{pspicture}(-1,0)(1,3)
\psFArrow[Color]{0.5}
\end{pspicture}
@@ -476,10 +524,10 @@
\begin{pspicture*}(-3,0)(3,3.5)
\psFArrow[Color]{0.65}
\end{pspicture*}
-\end{PSTexample}
+\end{LTXexample}
-\begin{PSTexample}
+\begin{LTXexample}
\begin{pspicture}(-3,-3)(2,3)
\psFArrow[Color]{0.6}
\psFArrow[angle=90,Color]{0.6}
@@ -489,7 +537,7 @@
\psFArrow[Color]{0.7}
\psFArrow[angle=90,Color]{0.7}
\end{pspicture*}
-\end{PSTexample}
+\end{LTXexample}
\section{List of all optional arguments for \texttt{pst-fractal}}
@@ -496,10 +544,8 @@
\xkvview{family=pst-fractal,columns={key,type,default}}
\bgroup
-\raggedright
\nocite{*}
-\bibliographystyle{plain}
-\bibliography{pst-fractal-doc}
+\printbibliography
\egroup
\printindex
Modified: trunk/Master/texmf-dist/dvips/pst-fractal/pst-fractal.pro
===================================================================
--- trunk/Master/texmf-dist/dvips/pst-fractal/pst-fractal.pro 2017-11-26 22:59:23 UTC (rev 45910)
+++ trunk/Master/texmf-dist/dvips/pst-fractal/pst-fractal.pro 2017-11-26 23:25:50 UTC (rev 45911)
@@ -1,3 +1,4 @@
+%% $Id: pst-fractal.pro 659 2017-11-26 16:58:16Z herbert $
%%
%% This is file `pst-fractal.pro',
%%
@@ -15,9 +16,9 @@
%% `pst-fractal' is a PSTricks package to draw fractal objects
%%
%%
-%% version 0.02 / 2010-02-10 Herbert Voss <hvoss _at_ tug.org>
+%% version 0.04 / 2017-11-26 Herbert Voss <hvoss _at_ tug.org>
%
-/tx at fractalDict 20 dict def
+/tx at fractalDict 100 dict def
tx at fractalDict begin
%
/tx at Fractal {
@@ -46,7 +47,7 @@
/MaxXPixel ED
/MaxY ED /MaxX ED
/MinY ED /MinX ED
- /rPixel 0.5 def
+ /rPixel 1 def
/totMaxIter maxIter dIter mul def
%
/DX MaxX MinX sub def
@@ -83,12 +84,12 @@
} repeat
plot{
baseColor x y putPixel
- }{ iter 400 add tx at addDict begin
- ifCMYK { wavelengthToCMYK Cyan Magenta Yellow Black end setcmykcolor
- }{ wavelengthToRGB Red Green Blue end setrgbcolor } ifelse
+ }{ iter 400 add
+ ifCMYK { tx at addDict begin wavelengthToCMYK Cyan Magenta Yellow Black end setcmykcolor
+ }{ tx at addDict begin wavelengthToRGB Red Green Blue end setrgbcolor } ifelse
ifJulia { x y }{ cx cy } ifelse
- putPixel stroke
- }ifelse % Plot point if point is in set
+ putPixel stroke
+ }ifelse % Plot point if point is in set
} for
} for
} def
@@ -129,6 +130,76 @@
} repeat
} def
%
+/append {
+% macro de Jean-Paul Vignault
+% extraite de pst-solides3d.pro
+ 3 dict begin
+ /tab2 exch def
+ /tab1 exch def
+ [ tab1 aload pop tab2 aload pop ]
+ end
+} def
+%
+/Rot-90 {
+ 2 dict begin
+ /y exch def /x exch def
+ y
+ x neg
+ end
+} def
+%
+/makeSierVariables {
+ /Pi [1.5 unit 1 unit
+ 1 unit 0.5 unit
+ 1 unit -0.5 unit
+ 1.5 unit -1 unit
+ ] def
+%
+ /P0 Pi def
+ /coefficient 1 def
+ 3 {
+ P0
+ [
+ 0 2 Pi length 2 sub {/i exch def
+ Pi i get Pi i 1 add get Rot-90
+ } for
+ ] /Pi exch def
+ P0 Pi append /P0 exch def
+ } repeat
+%
+/P1 {[
+ 0 2 P0 length 2 sub {/i exch def
+ P0 i get P0 i 1 add get % Rot-90
+ -2 unit coefficient mul add exch
+ -2 unit coefficient mul add exch
+ } for
+] } def
+%
+/P2 {[
+0 2 P0 length 2 sub {/i exch def
+P0 i get P0 i 1 add get Rot-90
+ 2 unit coefficient mul add exch
+-2 unit coefficient mul add exch
+} for
+] }def
+%
+/P3 {[
+0 2 P0 length 2 sub {/i exch def
+P0 i get P0 i 1 add get Rot-90 Rot-90
+ 2 unit coefficient mul add exch
+2 unit coefficient mul add exch
+} for
+] } def
+%
+/P4 {[
+ 0 2 P0 length 2 sub {/i exch def
+ P0 i get P0 i 1 add get Rot-90 Rot-90 Rot-90
+ -2 unit coefficient mul add exch
+ 2 unit coefficient mul add exch
+ } for
+] } def
+} def
+%
/tx at Phyllotaxis { %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% \pst at tempA
% \pst at fractal@c
@@ -326,4 +397,125 @@
pop pop pop pop { count 0 eq { exit } if appol } loop
} def
%
+/tx at Hugo { %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%Creator: Hugo M. Ayala'89, MIT
+% \pst at fractal@scale
+% \pst at tempA
+% \pst at fractal@maxIter, which is the depth
+% \pst at number\pslinewidth
+% { \pst at usecolor\pslinecolor }
+/setColor ED
+SLW
+/depth ED
+translate
+dup scale
+2 setlinecap
+setColor
+%
+/oldarrayx [0 540 72 72] def
+/oldarrayy [0 396 720 72] def
+%
+/scl .1 def
+%
+realtime srand
+/prorand { rand 32768 div 32768 div 1 sub scl mul} def
+/findrow {8 mul 7 sub sqrt 1 add 2 div truncate} def
+/findindex {dup 1 sub mul 2 div 1 add} def
+/findcolumn {dup findrow findindex sub} def
+/findnewrow {2 mul 1 sub} def
+/findnewcolumn {2 mul} def
+/findarraysize {dup 1 add mul 2 div 1 add} def
+/findnumoflines {dup 1 sub mul 2 div 3 mul} def
+/findnumpoints {dup 1 add mul 2 div} def
+/gtol {2 exch exp 1 add} def
+/fixangle {dup 180 ge {180 sub} if} def
+/backangle {dup 180 ge {180 sub} {180 add} ifelse} def
+/splitline {
+ tpx btx add 2 div /mdx exch def
+ tpy bty add 2 div /mdy exch def
+ tpy bty sub tpx btx sub atan
+ 90 add fixangle
+ /lineangle exch def
+ tpy bty sub dup mul
+ tpx btx sub dup mul
+ add sqrt /linelen exch def
+ prorand linelen mul dup
+ lineangle cos mul mdx add /mdx exch def
+ lineangle sin mul mdy add /mdy exch def
+} def
+%
+/findnewindex{ cvi /oldindex exch def
+ oldindex findrow cvi dup /oldrow exch def
+ findindex oldindex exch sub cvi /oldcolumn exch def
+ oldrow findnewrow cvi dup /newrow exch def findindex
+ oldcolumn findnewcolumn cvi dup /newcolumn exch def add
+ cvi /newindex exch def
+} def
+%
+/drawfractal {
+ 1 1 generation gtol 1 sub findnumpoints {
+ cvi /topindex exch def
+ topindex dup findcolumn exch findrow 1 add findindex add cvi
+ /leftindex exch def
+ leftindex 1 add cvi
+ /rightindex exch def
+ /tpx oldarrayx topindex get def
+ /tpy oldarrayy topindex get def
+ /btx oldarrayx leftindex get def
+ /bty oldarrayy leftindex get def
+ /mdx oldarrayx rightindex get def
+ /mdy oldarrayy rightindex get def
+ tpx tpy moveto
+ btx bty lineto
+ mdx mdy lineto
+ closepath stroke
+ } for
+} def
+%
+1 1 depth {
+ /generation exch def
+ generation gtol findarraysize cvi dup array /newarrayx exch def
+ array /newarrayy exch def
+ 1 1 generation 1 sub gtol findnumpoints {
+ findnewindex
+ newarrayx newindex
+ oldarrayx oldindex get put
+ newarrayy newindex
+ oldarrayy oldindex get put
+ } for
+ 1 1 generation 1 sub gtol 1 sub findnumpoints {
+ findnewindex
+ newcolumn newrow 2 add findindex add cvi dup
+ /leftindex exch def
+ 2 add cvi /rightindex exch def
+ newcolumn newrow 1 add findindex add cvi
+ /mindex exch def
+ /tpx newarrayx newindex get def
+ /tpy newarrayy newindex get def
+ /btx newarrayx leftindex get def
+ /bty newarrayy leftindex get def
+ splitline
+ newarrayx mindex mdx put
+ newarrayy mindex mdy put
+ mindex 1 add cvi /mindex exch def
+ /btx newarrayx rightindex get def
+ /bty newarrayy rightindex get def
+ splitline
+ newarrayx mindex mdx put
+ newarrayy mindex mdy put
+ /mindex leftindex 1 add cvi def
+ /tpx newarrayx leftindex get def
+ /tpy newarrayy leftindex get def
+ splitline
+ newarrayx mindex mdx put
+ newarrayy mindex mdy put
+ } for
+ /oldarrayx newarrayx def
+ /oldarrayy newarrayy def
+ 7 generation sub 5 div setlinewidth
+% drawfractal showpage
+} for
+drawfractal
+} def % end of /tx at Hugo
+%
end
Modified: trunk/Master/texmf-dist/tex/generic/pst-fractal/pst-fractal.tex
===================================================================
--- trunk/Master/texmf-dist/tex/generic/pst-fractal/pst-fractal.tex 2017-11-26 22:59:23 UTC (rev 45910)
+++ trunk/Master/texmf-dist/tex/generic/pst-fractal/pst-fractal.tex 2017-11-26 23:25:50 UTC (rev 45911)
@@ -1,3 +1,4 @@
+%% $Id: pst-fractal.tex 659 2017-11-26 16:58:16Z herbert $
%%
%% This is file `pst-fractal.tex',
%%
@@ -21,8 +22,8 @@
\ifx\PSTricksAddLoaded\endinput\else\input pstricks-add.tex\fi
\ifx\PSTXKeyLoaded\endinput\else \input pst-xkey \fi
%
-\def\fileversion{0.06}
-\def\filedate{2010/02/10}
+\def\fileversion{0.08}
+\def\filedate{2017/11/26}
\message{`PST-fractal' v\fileversion, \filedate\space (hv)}
%
\edef\PstAtCode{\the\catcode`\@} \catcode`\@=11\relax
@@ -68,6 +69,10 @@
\define at boolkey[psset]{pst-fractal}[Pst at fractal@]{Color}[true]{}
\psset[pst-fractal]{Radius=5cm,Color=false}
%
+\define at key[psset]{pst-fractal}{n}{\def\pst at fractal@n{#1 }}
+\define at key[psset]{pst-fractal}{dotcolor}{\pst at getcolor{#1}\psdotcolor}
+\define at key[psset]{pst-fractal}{N}{\def\pst at fractal@N{#1}}
+\psset[pst-fractal]{n=3,N=all,dotcolor=red}
%===========================================================
%
\def\psfractal{\pst at object{psfractal}}
@@ -75,7 +80,7 @@
\def\psfractal at ii(#1){\@ifnextchar({\psfractal at iii(#1)}{\psfractal at iii(#1)(1,1)}}%
\def\psfractal at iii(#1)(#2){%
\begin at SpecialObj
- \psset{unit=1pt}
+ \psset{unit=1pt}%
\pst at getcoor{#1}\pst at temp@A
\pst at getcoor{#2}\pst at temp@B
\pspicture(\pst at fractal@xWidth,\pst at fractal@yWidth)%
@@ -91,15 +96,17 @@
\pst at fractal@maxRadius
{ \pst at usecolor\pst at fractal@baseColor }
\ifx\pst at fractal@type\pst at fractal@Julia true \else false \fi
- \ifPst at CMYK true \else false \fi ^^J%
- tx at fractalDict begin tx at Fractal end ^^J%
+ \ifPst at CMYK true \else false \fi ^^J
+ tx at fractalDict begin tx at Fractal end ^^J
}% end add at pscode
- \endpspicture% end box
- \end at SpecialObj%
+ \endpspicture
+ \end at SpecialObj
\ignorespaces}
%
\def\psSier{\pst at object{psSier}}
-\def\psSier at i(#1){\@ifnextchar({\psSier at ii(#1)}{\psSier at iii(#1)}}
+\def\psSier at i{\@ifnextchar({\psSier at v}{\psSier at vi}}
+%
+\def\psSier at v(#1){\@ifnextchar({\psSier at ii(#1)}{\psSier at iii(#1)}}
\def\psSier at ii(#1)(#2)(#3){{%
\pst at getcoor{#1}\pst at temp@A
\pst at getcoor{#2}\pst at temp@B
@@ -133,12 +140,73 @@
\pst at tempB\space dup scale
0 setlinewidth
0 0 moveto 1 0 lineto 0.5 0.8660254 lineto 0 setlinewidth closepath
- gsave \pst at usecolor\psfillcolor fill grestore stroke
- #3 sierpy }%
+ gsave #3 0 gt { \pst at usecolor\psfillcolor }{ \pst at usecolor\pslinecolor } ifelse
+ fill grestore stroke
+ #3 dup 0 gt { sierpy } if }%
\end at OpenObj%
}
%
+\def\psSier at vi{% Siepinski curve
+ \begin at SpecialObj
+ \addto at pscode{
+ /n@ \pst at fractal@n def
+ /NbrePts (\pst at fractal@N) def
+ NbrePts (all) eq {/Npts 4 n@ 1 add exp cvi def}{/Npts NbrePts cvi def Npts 4 n@ 1 add exp gt {/Npts 4 n@ 1 add exp cvi def} if } ifelse
+ /dotcolor {\pst at usecolor\psdotcolor } def
+ /unit { \pst at number\psunit mul } def
+ tx at fractalDict begin
+ makeSierVariables
%
+ n@ 1 eq {/Sierpinsky P0 def}{
+ n@ 1 sub {
+ /Sierpinsky P1 P2 append P3 append P4 append def
+%
+ /Tab1 [
+ 0 2 Sierpinsky length 2 sub {/i exch def
+ Sierpinsky i 2 getinterval
+ } for
+ ] def
+ /i@ Sierpinsky length 8 div 2.5 mul cvi def %
+ /Sierpinsky2 [
+ Tab1 length {
+ Tab1 i@ get
+ /i@ i@ 1 add def
+ i@ Tab1 length ge {/i@ 0 def} if
+ }repeat
+ ] def
+%
+ /P0 [
+ 0 1 Sierpinsky2 length 1 sub {/i exch def
+ Sierpinsky2 i get aload pop
+ } for
+ ] def
+ /coefficient coefficient 2 mul def
+ } repeat } ifelse
+%
+ newpath
+ Sierpinsky 0 get Sierpinsky 1 get moveto
+ 0 2 Sierpinsky length 2 sub {/i exch def
+ i 2 div Npts ge {exit} if
+ Sierpinsky i get Sierpinsky i 1 add get lineto
+ } for
+ Npts 4 n@ 1 add exp cvi ge {closepath} if
+ \ifx\psk at fillstyle\relax\else gsave \pst at usecolor\psfillcolor fill grestore\fi
+ \ifx\pslinestyle\@none\else \psls at solid stroke \fi
+ \ifshowpoints
+ 0 2 Sierpinsky length 2 sub {/i exch def
+ i 2 div Npts ge {exit} if
+ Sierpinsky i get
+ Sierpinsky i 1 add get
+ \psk at dotsize DS
+ 0 360 arc dotcolor fill
+ } for
+ \fi
+ end
+ }%
+ \showpointsfalse
+ \end at SpecialObj
+ \ignorespaces}
+%
\def\psPhyllotaxis{\pst at object{psPhyllotaxis}}
\def\psPhyllotaxis at i{\@ifnextchar({\psPhyllotaxis at ii}{\psPhyllotaxis at ii(0,0)}}
\def\psPhyllotaxis at ii(#1){{%
@@ -174,6 +242,23 @@
\end at SpecialObj%
}}
%
+\def\psHugo{\pst at object{psHugo}}
+\def\psHugo at i{\@ifnextchar({\psHugo at ii}{\psHugo at ii(0,0)}}
+\def\psHugo at ii(#1){{%
+ \addbefore at par{scale=0.1,linewidth=0.001pt,maxIter=5}%
+ \pst at getcoor{#1}\pst at tempA%
+ \begin at SpecialObj%
+ \addto at pscode{
+ \pst at fractal@Xscale
+ \pst at tempA
+ \pst at fractal@maxIter
+ \pst at number\pslinewidth
+ { \pst at usecolor\pslinecolor }
+ tx at fractalDict begin tx at Hugo end
+ }% end add at pscode
+ \end at SpecialObj%
+}}
+%
\def\psKochflake{\pst at object{psKochflake}}
\def\psKochflake at i{\@ifnextchar({\psKochflake at ii}{\psKochflake at ii(0,0)}}
\def\psKochflake at ii(#1){{%
@@ -184,12 +269,12 @@
gsave ^^J%
\pst at tempA translate
\pst at usecolor\pslinecolor
- \pst at fractal@angle rotate ^^J%
- \pst at number\pslinewidth 10 div \pst at fractal@Xscale div SLW ^^J%
- \pst at fractal@maxIter ^^J%
- tx at fractalDict begin ^^J%
- \pst at fractal@scale ^^J%
- tx at Kochflake end ^^J%
+ \pst at fractal@angle rotate ^^J
+ \pst at number\pslinewidth 10 div \pst at fractal@Xscale div SLW ^^J
+ \pst at fractal@maxIter ^^J
+ tx at fractalDict begin ^^J
+ \pst at fractal@scale ^^J
+ tx at Kochflake end ^^J
}% end add at pscode
\psk at fillstyle
\addto at pscode{stroke grestore }
@@ -206,14 +291,14 @@
\pst at fractal@dIter
\pst at number\pst at fractal@Radius
\ifPst at fractal@Color true \else false \fi
- \ifPst at CMYK true \else false \fi ^^J%
- tx at fractalDict begin ^^J%
- gsave ^^J%
- \pst at tempA translate ^^J%
+ \ifPst at CMYK true \else false \fi ^^J
+ tx at fractalDict begin ^^J
+ gsave ^^J
+ \pst at tempA translate ^^J
\pst at usecolor\pslinecolor
\pst at fractal@scale
- \pst at number\pslinewidth SLW ^^J%
- tx at Appolonius end ^^J%
+ \pst at number\pslinewidth SLW ^^J
+ tx at Appolonius end ^^J
}% end add at pscode
\psk at fillstyle%
\addto at pscode{stroke grestore}%
Modified: trunk/Master/texmf-dist/tex/latex/pst-fractal/pst-fractal.sty
===================================================================
--- trunk/Master/texmf-dist/tex/latex/pst-fractal/pst-fractal.sty 2017-11-26 22:59:23 UTC (rev 45910)
+++ trunk/Master/texmf-dist/tex/latex/pst-fractal/pst-fractal.sty 2017-11-26 23:25:50 UTC (rev 45911)
@@ -1,3 +1,4 @@
+%% $Id: pst-fractal-doc.tex 658 2017-11-26 16:55:41Z herbert $
\RequirePackage{pstricks}
\ProvidesPackage{pst-fractal}[2007/09/25 package wrapper for
pst-fractal.tex (hv)]
@@ -4,7 +5,7 @@
\input{pst-fractal.tex}
\IfFileExists{pst-fractal.pro}{%
\ProvidesFile{pst-fractal.pro}
- [2007/05/14 v. 0.01, PostScript prologue file (hv)]
+ [2017/11/26 v. 0.04, PostScript prologue file (hv)]
\@addtofilelist{pst-fractal.pro}}{}%
\ProvidesFile{pst-fractal.tex}
[\filedate\space v\fileversion\space `PST-fractal' (hv)]
More information about the tex-live-commits
mailing list