summaryrefslogtreecommitdiff
path: root/info/examples/PSTricks_en/29-02-2.ltx
diff options
context:
space:
mode:
Diffstat (limited to 'info/examples/PSTricks_en/29-02-2.ltx')
-rw-r--r--info/examples/PSTricks_en/29-02-2.ltx39
1 files changed, 39 insertions, 0 deletions
diff --git a/info/examples/PSTricks_en/29-02-2.ltx b/info/examples/PSTricks_en/29-02-2.ltx
new file mode 100644
index 0000000000..172cd3a80f
--- /dev/null
+++ b/info/examples/PSTricks_en/29-02-2.ltx
@@ -0,0 +1,39 @@
+%%
+%% A DANTE-Edition example
+%%
+%% Example 29-02-2 on page 565.
+%%
+%% Copyright (C) 2011 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[]{article}
+\pagestyle{empty}
+\setlength\textwidth{375.57637pt}
+\setlength\parindent{0pt}
+
+\usepackage{pst-eucl}
+
+\begin{document}
+\psset{unit=.5}
+\begin{pspicture*}(-4,-4)(4,4)
+\pstGeonode[PosAngle={-135,-90,180}]{O}(1,0.5){I}(0.5,2){J}
+\pstLineAB[nodesep=10]{O}{I} \pstLineAB[nodesep=10]{O}{J}
+\multips(-5,-2.5)(1,.5){11}{\psline(0,-.15)(0,.15)}
+\multips(-2,-8)(.5,2){9}{\psline(-.15,0)(.15,0)}
+\psset{linestyle=dotted}
+\multips(-5,-2.5)(1,.5){11}{\psline(-10,-40)(10,40)}
+\multips(-2,-8)(.5,2){9}{\psline(-10,-5)(10,5)}
+\psset{PointSymbol=x,dotscale=2,linestyle=solid}
+\pstOIJGeonode[PosAngle={-90,0},CurveType=curve,linewidth=2pt,linecolor=red]%
+ (3,1){A}{O}{I}{J}(-2,1){B}(-1,-1.5){C}(2,-1){D}
+\end{pspicture*}
+\end{document}