summaryrefslogtreecommitdiff
path: root/info/examples/PSTricks_en/12-04-2.ltx
blob: 0df28e2ee9a3b8dcdaeb3dd22f684087f5db5ddd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
%% 
%%  A DANTE-Edition example
%% 
%%  Example 12-04-2 on page 146.
%% 
%%  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,amsmath,graphicx}
\SpecialCoor
\definecolor{redtwenty}{cmyk}{0,0.2,0.2,0}
\definecolor{graytwenty}{cmyk}{0,0,0,0.2}

\begin{document}
\resizebox{.8\linewidth}{!}{%
\psset{xunit=10mm,yunit=10mm,curvature=1 .1 .75,plotpoints=200}
\begin{pspicture}(-7,-6.5)(7,7)
\pswedge[linecolor=black,linewidth=.17mm,fillstyle=solid,fillcolor=redtwenty](0,-5){1}{0}{135}
\pswedge[linecolor=black,linewidth=.17mm,fillstyle=solid,fillcolor=redtwenty](-3.535533906,-3.535533906){1}{0}{112.5}
\pswedge[linecolor=black,linewidth=.17mm,fillstyle=solid,fillcolor=redtwenty](-5,0){1}{0}{90}
\pswedge[linecolor=black,linewidth=.17mm,fillstyle=solid,fillcolor=redtwenty](-3.535533906,3.535533906){1}{0}{67.5}
\pswedge[linecolor=black,linewidth=.17mm,fillstyle=solid,fillcolor=redtwenty](0,5){1}{0}{45}
\pswedge[linecolor=black,linewidth=.17mm,fillstyle=solid,fillcolor=redtwenty](3.535533906,3.535533906){1}{0}{22.5}
\psaxes[Dx=2,dx=2,Dy=2,dy=2,labelsep=.75mm,arrowlength=1.75,ticksize=2pt,linewidth=0.17mm]%
{->}(0,0)(-6.99,-6.5)(7,7)
\rput[Br](7,-.35){$\text{Re}(z)$}
\rput[tl](.15,7){$\text{Im}(z)$}
\rput[Br](-.15,-.35){$0$}
%
\uput{1mm}[45](6,.1){$w_0$}
\uput{1mm}[45](4.5,3.9){$w_1$}
\uput{1mm}[45](.7,5.7){$w_2$}
\uput{1mm}[90](-3,4.5){$w_3$}
\uput{1mm}[135](-5,1){$w_4$}
\uput{1mm}[135](-3.8,-2.6){$w_5$}
\uput{1mm}[135](-.7,-4.3){$w_6$}
\uput{1mm}[45](1,.1){$z_0$}
\uput{1mm}[45](.7,.7){$z_2$}
\uput{1mm}[135](-.1,1){$z_4$}
%
\pscircle[linewidth=.1mm](0,1){.05}
\pscircle[linewidth=.1mm](0.7071,.7071){.05}
\pscircle[linewidth=.1mm](6,0){.05}
\pscircle*[linewidth=.1mm](1,0){.05}
%
\pscircle[linewidth=.17mm](0,0){5}
\pscircle[linewidth=.17mm](0,0){1}
\pscircle[linewidth=.17mm](5,0){1}
\pscircle[linewidth=.17mm](0,-5){1}
\pscircle[linewidth=.17mm](-5,0){1}
\pscircle[linewidth=.17mm](0,5){1}
\pscircle[linewidth=.17mm](3.535533906,3.535533906){1}
\pscircle[linewidth=.17mm](-3.535533906,3.535533906){1}
\pscircle[linewidth=.17mm](3.535533906,-3.535533906){1}
\pscircle[linewidth=.17mm](-3.535533906,-3.535533906){1}
%
\rput(0,-5){\psline[linewidth=.35mm]{->}(1;135)}
\rput(-3.535533906,-3.535533906){\psline[linewidth=.35mm]{->}(1;112.5)}
\rput(-5,0){\psline[linewidth=.35mm]{->}(1;90)}
\rput(-3.535533906,3.535533906){\psline[linewidth=.35mm]{->}(1;67.5)}
\rput(0,5){\psline[linewidth=.35mm]{->}(1;45)}
\rput(3.535533906,3.535533906){\psline[linewidth=.35mm]{->}(1;22.5)}
%
\rput(0,-5){%
\psline[linewidth=.17mm,linestyle=dashed,dash=.7mm .5mm](1;315)}
\rput(-3.535533906,-3.535533906){%
\psline[linewidth=.17mm,linestyle=dashed,dash=.7mm .5mm](1;292.5)}
\rput(-5,0){%
\psline[linewidth=.17mm,linestyle=dashed,dash=.7mm .5mm](1;270)}
\rput(-3.535533906,3.535533906){%
\psline[linewidth=.17mm,linestyle=dashed,dash=.7mm .5mm](1;247.5)}
\rput(0,5){%
\psline[linewidth=.17mm,linestyle=dashed,dash=.7mm .5mm](1;225)}
\rput(3.535533906,3.535533906){%
\psline[linewidth=.17mm,linestyle=dashed,dash=.7mm .5mm](1;202.5)}
\end{pspicture}
}
\end{document}