1 files changed, 60 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/pstricks-examples/08-02-2.ltx b/Master/texmf-dist/doc/latex/pstricks-examples/08-02-2.ltx
new file mode 100644
index 00000000000..83b0fba6768
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/pstricks-examples/08-02-2.ltx
@@ -0,0 +1,60 @@
+%% 
+%%  Ein Beispiel der DANTE-Edition
+%% 
+%% 
+%%  Copyright (C) 2010 Herbert Voss
+%% 
+%%  It may be distributed and/or modified under the conditions
+%%  of the LaTeX Project Public License, either version 1.3
+%%  of this license or (at your option) any later version.
+%% 
+%%  See http://www.latex-project.org/lppl.txt for details.
+%% 
+%% 
+%% ==== 
+% Show page(s) 1
+%% 
+\documentclass[]{exaarticle}
+\pagestyle{empty}
+\setlength\textwidth{190.324pt}
+\setlength\parindent{0pt}
+\StartShownPreambleCommands
+\usepackage{pstricks}
+\makeatletter                      % Definition neuer "Pfeile" B-B
+\edef\pst@arrowtable{\pst@arrowtable,B-B} % zur Tabelle hinzufuegen
+\def\tx@ABox{ABox } %              interner PostScript Name ABox
+\@namedef{psas@B}{%                interner Makroname
+  /ABox { %                        PostScript procedure
+    CLW mul add dup CLW sub 2 div %Liniendicke beruecksichtigen
+    /x ED mul %                    save x value
+    /y ED %                        y as well
+    /z CLW 2 div def %             reserve
+    x neg y moveto %               starting point
+    x neg CLW 2 div L %            lineto
+    x CLW 2 div L  %               lineto
+    x y L  %                       lineto
+    x neg y L  %                   lineto
+    closepath %                    Linie schliessen
+    stroke 0 y moveto %            draw and go to line end
+  } def
+  \psk@bracketlength \psk@tbarsize \tx@ABox % width height ABox
+}
+\newpsfontdot{CircleMultiply}[2 0.0 0.0 2 -0.78 -0.7]{Symbol}{<C4>} % 196
+\newpsfontdot{CirclePlus}[2 0.0 0.0 2 -0.78 -0.7]{Symbol}{<C5>} % 197
+\@namedef{psas@cm}{\psk@dotsize \psds@CircleMultiply 0 0 Dot}
+\@namedef{psas@cp}{\psk@dotsize \@nameuse{psds@CirclePlus} 0 0 Dot}
+\makeatother
+\StopShownPreambleCommands
+\begin{document}
+\begin{pspicture}(4,4)
+  \psset{arrowscale=3,arrows=B-cp}
+  \psline[bracketlength=2](1,1)(4,4)
+  \psarc[linecolor=red](0,0){2}{0}{90}
+  \psarc[arrowsize=2mm,linecolor=blue]{cm-cp}(1,1){2}{20}{70}
+\end{pspicture}\hspace{1cm}
+\begin{pspicture}(4,4)
+  \psset{arrowscale=3,arrows=B->}     \psline(3,3)
+  \psarc[linecolor=red,tbarsize=20pt](0,0){2}{0}{90}
+  \psarc[tbarsize=0.5cm,bracketlength=0.3,linecolor=blue](1,1){2}{20}{70}
+\end{pspicture}
+\end{document}