summaryrefslogtreecommitdiff
path: root/info/examples/PSTricks_en/36-00-79.ltx
diff options
context:
space:
mode:
Diffstat (limited to 'info/examples/PSTricks_en/36-00-79.ltx')
-rw-r--r--info/examples/PSTricks_en/36-00-79.ltx61
1 files changed, 61 insertions, 0 deletions
diff --git a/info/examples/PSTricks_en/36-00-79.ltx b/info/examples/PSTricks_en/36-00-79.ltx
new file mode 100644
index 0000000000..703b2a6ee0
--- /dev/null
+++ b/info/examples/PSTricks_en/36-00-79.ltx
@@ -0,0 +1,61 @@
+%%
+%% A DANTE-Edition example
+%%
+%% Example 36-00-79 on page 800.
+%%
+%% 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{pstricks,pst-plot,pst-node,graphicx}
+
+\begin{document}
+\resizebox{\linewidth}{!}{%
+\newcommand{\R}{\mathbf{R}}
+\newcommand{\eps}{\varepsilon}
+\psset{xunit=.47cm,yunit=.47cm}
+\begin{pspicture}(0,0.5)(28,19)
+ \psaxes[labels=none,ticks=none]{->}(18,12)(17,11)(27,18)
+ \psaxes[labels=none,ticks=none]{->}(18,2)(17,1)(27,8)
+ \psline{->}(0,9)(11,9)
+ \uput[r](11,9){$\R^n$} \uput[63](18,18){$\R^{m-n}$}
+ \uput[r](27,12){$\R^n$} \uput[63](18,8){$\R^{m-n}$}
+ \uput[r](27,2){$\R^n$}
+ \psline[linewidth=1.2pt,linecolor=blue]{o-o}(1,9)(9,9)
+ \psline[linewidth=1.2pt,linecolor=lightgray]{o-o}(3,9)(7,9)
+ \qdisk(5,9){2pt} \uput[d](5,9){$p$}
+ \uput[u](6.5,9){$U'$} \uput[u](8.5,9){$U$}
+ \uput[d](21,2){$g\bigl(f(p)\bigr)$}
+ \psline{->}(21,10.5)(21,6) \uput[r](21,8.5){$g$}
+ \uput[10](25,15){$f(U)$}
+ \pscurve[linewidth=1.2pt,linecolor=red]{-}(18.5,12.5)(19.5,13.5)(21,14)(22.5,14)(24.8,14.2)%
+ (25.4,13.9)(25.5,13.3)(24.9,13.5)(24.8,14.2)(25,15)(24.5,16)
+ \psecurve[linewidth=1.2pt,linecolor=magenta]{-}(18.5,12.5)(19.5,13.5)%
+ (21,14)(22.5,14)(24.8,14.2)
+ \pscircle[linestyle=dashed,linecolor=blue](21,14){0.8} \uput[45](22,15.2){$V$}
+ \qdisk(21,14){2pt} \uput[d](21,14){$f(p)$}
+ \psccurve[linestyle=dashed,linecolor=blue](19,2.8)(20.1,2.6)(21.7,2.9)(22.8,2)(22.3,0.7)(21,0.4)%
+ (19.3,0.7)(19.5,2)
+ \psline[linewidth=1.2pt,linecolor=lightgray]{-}(19.5,2)(22.8,2)
+ \pscurve[linewidth=1.2pt,linecolor=red]{-}(18.5,1.5)(19,1.95)(19.5,2)
+ \pscurve[linewidth=1.2pt,linecolor=red]{-}(22.8,2)(23.3,2.1)(24.5,3)(25.5,4.5)(26,4.8)%
+ (26.7,4.4)(26,4)(25.5,4.5)(25,5.7)(24,6.3)
+ \qdisk(21,2){2pt} \uput[15](25,5.7){$g(V)$}
+ \pccurve[angleA=35,angleB=180,linecolor=magenta]{->}(6.5,10.5)(17,14) \Aput{$f$}
+ \pcline[linecolor=magenta]{->}(6.5,8)(17,4) \Bput{$g\circ f$}
+\end{pspicture}
+}
+\end{document}