blob: f7232c1a105b027d2e44d383e9b7c351a2485c98 (
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
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
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
|
%!PS-Adobe-2.0 EPSF-2.0
%%Title: arch5.fig
%%Creator: fig2dev Version 3.2 Patchlevel 3d
%%CreationDate: Mon Oct 1 15:51:54 2001
%%For: root@t-27-94 (Charlie &)
%%BoundingBox: 0 0 95 264
%%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
/col32 {0.667 0.667 0.667 srgb} bind def
/col33 {0.333 0.333 0.333 srgb} bind def
/col34 {0.557 0.561 0.557 srgb} bind def
/col35 {0.251 0.251 0.251 srgb} bind def
/col36 {0.502 0.502 0.502 srgb} bind def
/col37 {0.753 0.753 0.753 srgb} bind def
/col38 {0.878 0.878 0.878 srgb} bind def
end
save
newpath 0 264 moveto 0 0 lineto 95 0 lineto 95 264 lineto closepath clip newpath
-122.6 400.0 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.06299 0.06299 sc
%
% Fig objects follow
%
/Times-Roman ff 135.00 scf sf
2694 3729 m
gs 1 -1 sc (insert_in_data method) dup sw pop 2 div neg 0 rm col0 sh gr
/Times-Roman ff 135.00 scf sf
2703 6074 m
gs 1 -1 sc (table) dup sw pop 2 div neg 0 rm col0 sh gr
/Times-Roman ff 135.00 scf sf
2709 4771 m
gs 1 -1 sc (check if the symbol already) dup sw pop 2 div neg 0 rm col0 sh gr
/Times-Roman ff 135.00 scf sf
2709 4932 m
gs 1 -1 sc (exists , if so give an error) dup sw pop 2 div neg 0 rm col0 sh gr
/Times-Roman ff 135.00 scf sf
2709 3574 m
gs 1 -1 sc (call the symbols) dup sw pop 2 div neg 0 rm col0 sh gr
/Times-Roman ff 135.00 scf sf
2709 3895 m
gs 1 -1 sc (\(aligns the data correctly\)) dup sw pop 2 div neg 0 rm col0 sh gr
/Times-Roman ff 135.00 scf sf
2705 2509 m
gs 1 -1 sc (set owner of symbol) dup sw pop 2 div neg 0 rm col0 sh gr
/Times-Roman ff 135.00 scf sf
2705 2670 m
gs 1 -1 sc (to this symbol table) dup sw pop 2 div neg 0 rm col0 sh gr
% Polyline
7.500 slw
n 2034 2181 m 1959 2181 1959 2869 75 arcto 4 {pop} repeat
1959 2944 3364 2944 75 arcto 4 {pop} repeat
3439 2944 3439 2256 75 arcto 4 {pop} repeat
3439 2181 2034 2181 75 arcto 4 {pop} repeat
cp gs col0 s gr
% Polyline
n 2034 3312 m 1959 3312 1959 4000 75 arcto 4 {pop} repeat
1959 4075 3364 4075 75 arcto 4 {pop} repeat
3439 4075 3439 3387 75 arcto 4 {pop} repeat
3439 3312 2034 3312 75 arcto 4 {pop} repeat
cp gs col0 s gr
% Polyline
n 2034 5574 m 1959 5574 1959 6263 75 arcto 4 {pop} repeat
1959 6338 3364 6338 75 arcto 4 {pop} repeat
3439 6338 3439 5649 75 arcto 4 {pop} repeat
3439 5574 2034 5574 75 arcto 4 {pop} repeat
cp gs col0 s gr
% Polyline
gs clippath
2619 3327 m 2656 3327 l 2656 3220 l 2638 3296 l 2619 3220 l cp
eoclip
n 2638 2963 m
2638 3312 l gs col0 s gr gr
% arrowhead
n 2619 3220 m 2638 3296 l 2656 3220 l 2619 3220 l cp gs 0.00 setgray ef gr col0 s
% Polyline
gs clippath
2610 4449 m 2647 4449 l 2647 4342 l 2629 4418 l 2610 4342 l cp
eoclip
n 2629 4094 m
2629 4434 l gs col0 s gr gr
% arrowhead
n 2610 4342 m 2629 4418 l 2647 4342 l 2610 4342 l cp gs 0.00 setgray ef gr col0 s
% Polyline
gs clippath
2629 5561 m 2666 5561 l 2666 5454 l 2648 5530 l 2629 5454 l cp
eoclip
n 2648 5216 m
2648 5546 l gs col0 s gr gr
% arrowhead
n 2629 5454 m 2648 5530 l 2666 5454 l 2629 5454 l cp gs 0.00 setgray ef gr col0 s
% Polyline
n 2034 4443 m 1959 4443 1959 5132 75 arcto 4 {pop} repeat
1959 5207 3364 5207 75 arcto 4 {pop} repeat
3439 5207 3439 4518 75 arcto 4 {pop} repeat
3439 4443 2034 4443 75 arcto 4 {pop} repeat
cp gs col0 s gr
/Times-Roman ff 135.00 scf sf
2703 5913 m
gs 1 -1 sc (insert symbol into hash) dup sw pop 2 div neg 0 rm col0 sh gr
$F2psEnd
rs
|
