From 7539f2b2489595315242e441cd91abb7cba8ae75 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sun, 11 Dec 2011 22:40:37 +0000 Subject: pstricks-add (11dec11) git-svn-id: svn://tug.org/texlive/trunk@24826 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/doc/generic/pstricks-add/Changes | 3 +- Master/texmf-dist/doc/generic/pstricks-add/README | 58 -------------- .../doc/generic/pstricks-add/pstricks-add-doc.pdf | Bin 1888770 -> 1886721 bytes .../tex/generic/pstricks-add/pstricks-add.tex | 89 ++++++++++----------- .../tex/latex/pstricks-add/pstricks-add.cfg | 4 - 5 files changed, 46 insertions(+), 108 deletions(-) delete mode 100644 Master/texmf-dist/doc/generic/pstricks-add/README delete mode 100644 Master/texmf-dist/tex/latex/pstricks-add/pstricks-add.cfg (limited to 'Master/texmf-dist') diff --git a/Master/texmf-dist/doc/generic/pstricks-add/Changes b/Master/texmf-dist/doc/generic/pstricks-add/Changes index 56fcbcf7913..0a77d7ca705 100644 --- a/Master/texmf-dist/doc/generic/pstricks-add/Changes +++ b/Master/texmf-dist/doc/generic/pstricks-add/Changes @@ -1,4 +1,4 @@ -%% $Id: Changes 566 2011-08-20 07:19:32Z herbert $ +%% $Id: Changes 606 2011-12-11 17:32:58Z herbert $ %% pstricks-add.pro ----------- 0.23 2009-12-17 - add RGBtoGRAY and WavelengthToGRAY @@ -39,6 +39,7 @@ pstricks-add.sty ----------- (hv) pstricks-add.tex ----------- (Dominik Rodriguez/hv) + v 3.55 2011-12-11 - fix bug in \psplotTangent for arrows and linewidth v 3.54 2011-08-20 - new optional argument for the vee arrow line style v 3.53 2011-08-03 - use setting of \Pst@Debug for shownode() v 3.52 2011-06-09 - add new optional argument for \psCancel diff --git a/Master/texmf-dist/doc/generic/pstricks-add/README b/Master/texmf-dist/doc/generic/pstricks-add/README deleted file mode 100644 index 852dd71f408..00000000000 --- a/Master/texmf-dist/doc/generic/pstricks-add/README +++ /dev/null @@ -1,58 +0,0 @@ -pstricks-add redefines a lot of the pstricks macros and uses the extended -version of the keyval package. So be sure that you -- pstricks-add depends on the pstricks.pro Version 1.05, 2008/06/25 - you can get it from http://perce.de/LaTeX/pstricks/ or CTAN -- load pstricks-add as last pstricks related package -- have installed xkeyval with the special pst-xkey - (CTAN: tex-archive/macros/latex/contrib/xkeyval/) -- do not load another package after pstricks-add, which loads - the old keyval.sty or pst-key.tex - -pstricks-add collects a lot of the code which was posted -to the pstricks mailing list and has some more new features: - -- pstricks - o random dots - O braces - o define and calculate colors on PS side - o Gouraud shading - o braces as node connection/linestyle - o line style bar - o lines, drawn "by hand" - o arrows, arrows, arrows, ... - -- pst-plot - o new syntax for \psplot and \psparametricplot - o new environment psgraph - o new macro pstScalePoints - o new option for logarithmic axes - o new macro and options for ticklines - o new plot option bar and option barwidth - o new options step, start end for plotting data files - o new options xLabel, yLabel - o new option plotNo for multiple data files x y1 y2 y3 ... - o new macro psplotTangent - o new macro psplotDiffEqn - o new option algebraic for infix notation - o new option changeOrder - -- pst-node - o new macro nclineII for a two-colored line - o new option lineAngle for ncdiag - o new macros for interpolation nodes - and linear combination of two vectors - o new macro ncbarr (line with 5 segments) - - -pstricks-add.pro : the prolog file for pstricks-add -pstricks-add-doc.tex: the included doc file -pst-fp.tex : for floating point multiplication and division - -Save the files pstricks-add.sty|pro|tex and pst-fp.tex in a directory, -which is part of your local TeX tree. The pro file should go -into $TEXMF/dvips/pstricks/ -Then do not forget to run texhash to update this tree. -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). diff --git a/Master/texmf-dist/doc/generic/pstricks-add/pstricks-add-doc.pdf b/Master/texmf-dist/doc/generic/pstricks-add/pstricks-add-doc.pdf index 31537fd930d..c9939ccdaa4 100644 Binary files a/Master/texmf-dist/doc/generic/pstricks-add/pstricks-add-doc.pdf and b/Master/texmf-dist/doc/generic/pstricks-add/pstricks-add-doc.pdf differ diff --git a/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex b/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex index 3f82e910a9d..4840064a482 100644 --- a/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex +++ b/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex @@ -1,4 +1,4 @@ -%% $Id: pstricks-add.tex 566 2011-08-20 07:19:32Z herbert $ +%% $Id: pstricks-add.tex 606 2011-12-11 17:32:58Z herbert $ %% %% %% This is file `pstricks-add.tex', @@ -31,8 +31,8 @@ \ifx\PSTXKeyLoaded\endinput\else \input pst-xkey \fi \ifx\PSTmathLoaded\endinput\else \input pst-math \fi % -\def\fileversion{3.54} -\def\filedate{2011/08/20} +\def\fileversion{3.55} +\def\filedate{2011/12/11} \message{`pstricks-add' v\fileversion, \filedate\space (dr,hv)} % \edef\PstAtCode{\the\catcode`\@} \catcode`\@=11\relax @@ -902,7 +902,7 @@ /tmpar 2 array def /str 4 string def tmpar 0 (Created data for points #1Tick0..#1Tick) put tmpar 1 scount str cvs put tmpar tx@NodeDict begin concatstringarray = end - \fi + \fi% end }% end pst@Verb %Draw ticks \multido{\iA=#4+1}{#5}{% @@ -1275,66 +1275,64 @@ \tx@Line }% \end@OpenObj\ignorespaces} -\def\psplotTangent@ii#1,#2,#3\@nil{% +\def\psplotTangent@x#1,#2,#3\@nil{% \def\pst@tempLeft{#1}% \def\pst@tempRight{#2}} %% #1 : x value %% #2 : delta x or x0,x1 %% #3 : function -\def\psplotTangent{\pst@object{psplotTangent}}% -%\def\psplotTangent{\@ifnextchar*{\def\pst@tempA{true }\psplotTangent@v}{\def\pst@tempA{false }\psplotTangent@v*}} -%\def\psplotTangent@v*{\@ifnextchar[{\psplotTangent@i}{\psplotTangent@i[]}} -\def\psplotTangent@i#1#2#3{% - \expandafter\psplotTangent@ii#2,,\@nil -% \def\pst@par{#1}% -% \addbefore@par{Derive=NOT@EMPTY} - \begin@OpenObj% +\def\psplotTangent{\@ifnextchar*{\@startrue\psplotTangent@i}{\@starfalse\psplotTangent@i*}} +\def\psplotTangent@i*{\@ifnextchar[{\psplotTangent@ii}{\psplotTangent@ii[]}} +\def\psplotTangent@ii[#1]#2#3#4{% + \pst@killglue% + \expandafter\psplotTangent@x#3,,\@nil\relax + \begingroup% + \ifx\relax#1\relax\else\psset{linestyle=solid,#1}\fi \ifx\psk@Derive\@empty\ifPst@algebraic\def\psk@Derive{NOT@EMPTY}\fi\fi%%dr 0606 hv 1003 + \pst@addarrowdef \addto@pscode{ -% /StarVersion \if@star true \else false \fi def - gsave % save current state - /F@pstplot \ifPst@algebraic (#3) tx@addDict begin AlgParser end cvx \else { #3 } \fi def % define function + /F@pstplot \ifPst@algebraic (#4) tx@addDict begin AlgParser end cvx \else { #4 } \fi def % define function \ifx\psk@Derive\@empty\else - \ifx\psk@Derive\@NOTEMPTY\else%%dr 0606 - /FDer@pstplot % do we have a derivation defined? + \ifx\psk@Derive\@NOTEMPTY\else%%dr 0606 + /FDer@pstplot % do we have a derivation defined? \ifPst@algebraic (\psk@Derive) tx@addDict begin AlgParser end cvx \else { \psk@Derive } \fi def % define derivation - \fi%%dr 0606 - \fi + \fi%%dr 0606 + \fi% /@parametric false def %%dr 0606 % first we calculate the origin - #1 dup /x ED /t ED tx@addDict begin mark F@pstplot end counttomark 1 gt % test, if we have parametricplot + #2 dup /x ED /t ED tx@addDict begin mark F@pstplot end counttomark 1 gt % test, if we have parametricplot %%{ /y ED /x ED } % if yes, then we have 2 values { /y ED /x ED /@parametric true def } % if yes, then we have 2 values%%dr 0606 { \ifPst@polarplot x \ifPst@algebraic RadtoDeg \fi PtoC /y ED /x ED \else /y ED \fi } ifelse cleartomark \ifx\psk@Derive\@NOTEMPTY%%begin dr 0606 %% algebraic we can use the derivative machine - /FDer@pstplot (#3) @parametric { (t) } { (x) } ifelse + /FDer@pstplot (#4) @parametric { (t) } { (x) } ifelse tx@Derive begin Derive end tx@addDict begin AlgParser end cvx def \fi%%end dr 0606 x \pst@number\psxunit mul y \pst@number\psyunit mul translate % define the temporary origin % now we calculate the slope of the tangent \ifx\psk@Derive\@empty% de we have a derivation defined? - #1 abs 1.0e-6 lt % no, we choose secant for the tangent - { #1 0.0005 add dup /x ED /t ED tx@addDict begin mark F@pstplot end counttomark 1 gt % test, if we have parametricplot + #2 abs 1.0e-6 lt % no, we choose secant for the tangent + { #2 0.0005 add dup /x ED /t ED tx@addDict begin mark F@pstplot end counttomark 1 gt % test, if we have parametricplot { /y2 ED /x2 ED } % we have 2 values { \ifPst@polarplot dup x \ifPst@algebraic RadtoDeg \fi cos mul /x2 ED x \ifPst@algebraic RadtoDeg \fi sin mul \else /x2 x def \fi /y2 ED } ifelse cleartomark % delete the mark - #1 0.0005 sub dup /x ED /t ED tx@addDict begin mark F@pstplot end counttomark 1 gt % test, if we have parametricplot + #2 0.0005 sub dup /x ED /t ED tx@addDict begin mark F@pstplot end counttomark 1 gt % test, if we have parametricplot { /y1 ED /x1 ED } { \ifPst@polarplot dup x \ifPst@algebraic RadtoDeg \fi cos mul /x1 ED x \ifPst@algebraic RadtoDeg \fi sin mul \else /x1 x def \fi /y1 ED } ifelse cleartomark y2 y1 sub x2 x1 sub } % dy dx { % > 1.0e-06 - #1 1.0005 mul dup /x ED /t ED tx@addDict begin mark F@pstplot end counttomark 1 gt % test, if we have parametricplot + #2 1.0005 mul dup /x ED /t ED tx@addDict begin mark F@pstplot end counttomark 1 gt % test, if we have parametricplot { /y2 ED /x2 ED } % we have 2 values { \ifPst@polarplot dup x \ifPst@algebraic RadtoDeg \fi cos mul /x2 ED x \ifPst@algebraic RadtoDeg \fi sin mul \else /x2 x def \fi /y2 ED } ifelse cleartomark - #1 .9995 mul dup /x ED /t ED tx@addDict begin mark F@pstplot end counttomark 1 gt % test, if we have parametricplot + #2 .9995 mul dup /x ED /t ED tx@addDict begin mark F@pstplot end counttomark 1 gt % test, if we have parametricplot { /y1 ED /x1 ED } % we have 2 values { \ifPst@polarplot dup x \ifPst@algebraic RadtoDeg \fi cos mul /x1 ED x \ifPst@algebraic RadtoDeg \fi sin mul \else /x1 x def \fi /y1 ED } ifelse @@ -1343,7 +1341,7 @@ atan % atan(dy dx), we have the slope angle of the secant \ifPST@Tnormal 90 add \fi \else % there is a derivation defined - #1 dup /x ED /t ED tx@addDict begin mark FDer@pstplot end counttomark 1 gt % test, if we have parametricplot + #2 dup /x ED /t ED tx@addDict begin mark FDer@pstplot end counttomark 1 gt % test, if we have parametricplot { /y ED /x ED } { \ifPst@polarplot /Fphi ED % the value F'(phi) tx@addDict begin F@pstplot end x \ifPst@algebraic RadtoDeg \fi PtoC /y0 ED /x0 ED % the x y values @@ -1357,39 +1355,40 @@ cvi 180 mod dup 90 gt { 180 sub } if % -90 <= angle <= 90 rotate % rotate, depending to the origin /Lineto /lineto load def % the pro file needs /Lineto + \pst@cp % kill the currentpoint, if any [ % start array of points \ifPST@Tnormal 0 0 % moveto - #2 + #3 y \pst@number\psyunit mul x \pst@number\psxunit mul Atan cos div \pst@number\psxunit mul 0 % lineto \else % points are in reverse order ... - \ifx\pst@tempRight\@empty #2 \else \pst@tempRight\space \fi \pst@number\psxunit mul 0 % moveto - \if@star 0 - \else - \ifx\pst@tempRight\@empty #2 neg \else \pst@tempLeft\space \fi + \ifx\pst@tempRight\@empty #3 \else \pst@tempRight\space \fi \pst@number\psxunit mul 0 % moveto + \if@star 0 + \else + \ifx\pst@tempRight\@empty #3 neg \else \pst@tempLeft\space \fi \pst@number\psxunit mul \fi 0 % lineto \fi - \pst@cp % kill the currentpoint, if any + \pst@usecolor\pslinecolor false % don't show the points \tx@Line -% ArrowA CP 4 2 roll ArrowB L % the line with arrows L is defined in pstricks.pro -% \pst@number\pslinewidth SLW % set linewidth in pt -% \@nameuse{psls@\pslinestyle} % linestyle -% \pst@usecolor\pslinecolor % linecolor - stroke % stroke everything + \ifx\pslinestyle\@none\else + \pst@number\pslinewidth SLW + \tx@setStrokeTransparency + \@nameuse{psls@\pslinestyle} + \fi \ifshowpoints % show the points? + gsave \psk@dotsize - \@nameuse{psds@\psk@dotstyle}% + \@nameuse{psds@\psk@dotstyle} 0 0 Dot + grestore \fi - grestore % restore old graphics state }% - \use@pscode % part of \end@OpenObj - \endgroup% % part of \end@OpenObj + \use@pscode + \endgroup% \@starfalse% - \ignorespaces% % part of \end@OpenObj -}% + \ignorespaces} % %% #1-#2 x range %% #3 initial value of y (which is a vector) y(0) y'(0) y''(0) ... diff --git a/Master/texmf-dist/tex/latex/pstricks-add/pstricks-add.cfg b/Master/texmf-dist/tex/latex/pstricks-add/pstricks-add.cfg deleted file mode 100644 index 69d5fb85556..00000000000 --- a/Master/texmf-dist/tex/latex/pstricks-add/pstricks-add.cfg +++ /dev/null @@ -1,4 +0,0 @@ -\ProvidesFile{pstricks-add.cfg} - [2005/01/10 v0.1 addtional user stuff (hv)] -% -% \ No newline at end of file -- cgit v1.2.3