Repository navigation
Expand file tree
/
Copy pathtuple1.eps
More file actions
135 lines (130 loc) · 3.67 KB
/
Copy pathtuple1.eps
File metadata and controls
135 lines (130 loc) · 3.67 KB
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
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
%!PS-Adobe-2.0 EPSF-2.0
%%Title: tuple1.fig
%%Creator: fig2dev Version 3.2 Patchlevel 4
%%CreationDate: Tue Jul 31 12:27:49 2007
%%For: downey@rocky.olin.edu (Allen Downey)
%%BoundingBox: 0 0 123 53
%%Magnification: 1.0000
%%EndComments
/$F2psDict 200 dict def
$F2psDict begin
$F2psDict /mtrx matrix put
/col-1 {0 setgray} bind def
/col0 {0.000 0.000 0.000 srgb} bind def
/col1 {0.000 0.000 1.000 srgb} bind def
/col2 {0.000 1.000 0.000 srgb} bind def
/col3 {0.000 1.000 1.000 srgb} bind def
/col4 {1.000 0.000 0.000 srgb} bind def
/col5 {1.000 0.000 1.000 srgb} bind def
/col6 {1.000 1.000 0.000 srgb} bind def
/col7 {1.000 1.000 1.000 srgb} bind def
/col8 {0.000 0.000 0.560 srgb} bind def
/col9 {0.000 0.000 0.690 srgb} bind def
/col10 {0.000 0.000 0.820 srgb} bind def
/col11 {0.530 0.810 1.000 srgb} bind def
/col12 {0.000 0.560 0.000 srgb} bind def
/col13 {0.000 0.690 0.000 srgb} bind def
/col14 {0.000 0.820 0.000 srgb} bind def
/col15 {0.000 0.560 0.560 srgb} bind def
/col16 {0.000 0.690 0.690 srgb} bind def
/col17 {0.000 0.820 0.820 srgb} bind def
/col18 {0.560 0.000 0.000 srgb} bind def
/col19 {0.690 0.000 0.000 srgb} bind def
/col20 {0.820 0.000 0.000 srgb} bind def
/col21 {0.560 0.000 0.560 srgb} bind def
/col22 {0.690 0.000 0.690 srgb} bind def
/col23 {0.820 0.000 0.820 srgb} bind def
/col24 {0.500 0.190 0.000 srgb} bind def
/col25 {0.630 0.250 0.000 srgb} bind def
/col26 {0.750 0.380 0.000 srgb} bind def
/col27 {1.000 0.500 0.500 srgb} bind def
/col28 {1.000 0.630 0.630 srgb} bind def
/col29 {1.000 0.750 0.750 srgb} bind def
/col30 {1.000 0.880 0.880 srgb} bind def
/col31 {1.000 0.840 0.000 srgb} bind def
end
save
newpath 0 53 moveto 0 0 lineto 123 0 lineto 123 53 lineto closepath clip newpath
-98.3 99.7 translate
1 -1 scale
/cp {closepath} bind def
/ef {eofill} bind def
/gr {grestore} bind def
/gs {gsave} bind def
/sa {save} bind def
/rs {restore} bind def
/l {lineto} bind def
/m {moveto} bind def
/rm {rmoveto} bind def
/n {newpath} bind def
/s {stroke} bind def
/sh {show} bind def
/slc {setlinecap} bind def
/slj {setlinejoin} bind def
/slw {setlinewidth} bind def
/srgb {setrgbcolor} bind def
/rot {rotate} bind def
/sc {scale} bind def
/sd {setdash} bind def
/ff {findfont} bind def
/sf {setfont} bind def
/scf {scalefont} bind def
/sw {stringwidth} bind def
/tr {translate} bind def
/tnt {dup dup currentrgbcolor
4 -2 roll dup 1 exch sub 3 -1 roll mul add
4 -2 roll dup 1 exch sub 3 -1 roll mul add
4 -2 roll dup 1 exch sub 3 -1 roll mul add srgb}
bind def
/shd {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul
4 -2 roll mul srgb} bind def
/$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def
/$F2psEnd {$F2psEnteredState restore end} def
$F2psBegin
10 setmiterlimit
0 slj 0 slc
0.06000 0.06000 sc
%
% Fig objects follow
%
%
% here starts figure with depth 51
% Polyline
7.500 slw
n 1650 975 m 3675 975 l 3675 1650 l 1650 1650 l
cp gs col7 0.90 shd ef gr gs col0 s gr
% Polyline
gs clippath
2490 1477 m 2490 1417 l 2338 1417 l 2458 1447 l 2338 1477 l cp
eoclip
n 2100 1447 m
2475 1447 l gs col0 s gr gr
% arrowhead
n 2338 1477 m 2458 1447 l 2338 1417 l col0 s
% Polyline
gs clippath
2490 1177 m 2490 1117 l 2338 1117 l 2458 1147 l 2338 1177 l cp
eoclip
n 2100 1147 m
2475 1147 l gs col0 s gr gr
% arrowhead
n 2338 1177 m 2458 1147 l 2338 1117 l col0 s
/Helvetica ff 165.00 scf sf
2025 1200 m
gs 1 -1 sc (0) dup sw pop neg 0 rm col0 sh gr
/Helvetica ff 165.00 scf sf
2025 1500 m
gs 1 -1 sc (1) dup sw pop neg 0 rm col0 sh gr
/Helvetica ff 165.00 scf sf
2550 1200 m
gs 1 -1 sc ('Cleese') col0 sh gr
/Helvetica ff 165.00 scf sf
2550 1500 m
gs 1 -1 sc ('John') col0 sh gr
/Helvetica ff 165.00 scf sf
1650 900 m
gs 1 -1 sc (tuple) col0 sh gr
% here ends figure;
$F2psEnd
rs
showpage