pstricks-add (18apr14)

git-svn-id: svn://tug.org/texlive/trunk@33525 c570f23f-e606-0410-a88d-b1316a301751

4 files changed, 51 insertions, 3 deletions

diff --git a/Master/texmf-dist/doc/generic/pstricks-add/Changes b/Master/texmf-dist/doc/generic/pstricks-add/Changes
index 34630794747..7170c04da44 100644
--- a/Master/texmf-dist/doc/generic/pstricks-add/Changes
+++ b/Master/texmf-dist/doc/generic/pstricks-add/Changes
@@ -39,6 +39,7 @@ pstricks-add.sty ----------- (hv)
 
 
 pstricks-add.tex ----------- (hv)
+ v 3.66  2014-04-17 - added \psBigArrow
  v 3.65  2014-01-21 - added \ignorespaces for \psStartPoint
  v 3.64  2014-01-03 - fix for \psCircleTangent
  v 3.63  2013-12-14 - added \ignorespaces in \psRelNode
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 b9fa858d8f4..566eb704a9e 100644
--- a/Master/texmf-dist/doc/generic/pstricks-add/pstricks-add-doc.pdf
+++ b/Master/texmf-dist/doc/generic/pstricks-add/pstricks-add-doc.pdf
diff --git a/Master/texmf-dist/doc/generic/pstricks-add/pstricks-add-doc.tex b/Master/texmf-dist/doc/generic/pstricks-add/pstricks-add-doc.tex
index 84b89f1d00d..9e44051b63a 100644
--- a/Master/texmf-dist/doc/generic/pstricks-add/pstricks-add-doc.tex
+++ b/Master/texmf-dist/doc/generic/pstricks-add/pstricks-add-doc.tex
@@ -4115,6 +4115,19 @@ overpainted by the line.
 \end{LTXexample}
 
 
+\subsection{Big Arrows}
+
+\begin{LTXexample}[width=5cm]
+\begin{pspicture}(5,5)
+\psset{doublesep=1cm}
+\psBigArrow[fillstyle=solid,
+  fillcolor=blue!30,linecolor=blue](0,3)(5,3)
+\psBigArrow[fillstyle=solid,opacity=0.3,
+  fillcolor=red,linecolor=red](0.5,0.5)(5,5)
+\end{pspicture}
+\end{LTXexample}
+
+
 %--------------------------------------------------------------------------------------
 \subsection{Examples}
 %--------------------------------------------------------------------------------------
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 8baba237afa..bbbc6f344fe 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 874 2014-01-22 14:25:35Z herbert $
+%% $Id: pstricks-add.tex 908 2014-04-17 20:48:05Z herbert $
 %%
 %% This is file `pstricks-add.tex',
 %%
@@ -30,8 +30,8 @@
 \ifx\PSTXKeyLoaded\endinput\else  \input pst-xkey \fi
 \ifx\PSTmathLoaded\endinput\else  \input pst-math \fi
 %
-\def\fileversion{3.65}
-\def\filedate{2014/01/21}
+\def\fileversion{3.66}
+\def\filedate{2014/04/17}
 \message{`pstricks-add' v\fileversion, \filedate\space (dr,hv)}
 %
 \edef\PstAtCode{\the\catcode`\@} \catcode`\@=11\relax
@@ -339,6 +339,40 @@ a add
 %
 %
 % -------------- the arrow part -------------
+%
+\def\psBigArrow{\pst@object{psBigArrow}}
+\def\psBigArrow@i(#1)(#2){%
+  \addbefore@par{doublesep=1cm}
+  \begin@ClosedObj
+  \pssetlength\pst@dimm{\psdoublesep}
+  \pst@getcoor{#1}\pst@tempA
+  \pst@getcoor{#2}\pst@tempB  
+  \addto@pscode{
+    /Width \pst@number\pst@dimm def
+    \pst@tempA % x y 
+    \pst@tempB % x y
+    exch       % x y y x
+    4 -1 roll   % y y x x
+    sub        % y y dx
+    3 1 roll   % dx y y
+    sub        % dx dy
+    exch       % dy dx
+    atan neg      % alpha
+    \pst@tempA
+    translate
+    rotate     
+    0 0 moveto
+    0 Width 2 div rlineto % |
+    \pst@tempB \pst@tempA Pyth2 Width 1.5 mul sub 0 rlineto
+    0 Width 1.5 div rlineto
+    Width 1.5 mul dup neg rlineto
+    Width 1.5 mul neg dup rlineto
+    0 Width 1.5 div rlineto
+    \pst@tempB \pst@tempA Pyth2 neg Width 1.5 mul add 0 rlineto
+    closepath 
+  }%
+  \end@ClosedObj
+}
 %  the original table
 % \def\pst@arrowtable{,<->,<<->>,>-<,>>-<<,(-),[-],)-(,]-[,|>-<|}
 %