annotate middle/pic/single_linda.eps @ 9:0e15522609bc

last
author kazz@kazzone.st.ie.u-ryukyu.ac.jp
date Sat, 31 Oct 2009 17:34:45 +0900
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
9
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
1 %!PS-Adobe-3.0 EPSF-3.0
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
2 %%HiResBoundingBox: 0.000000 0.000000 237.000000 121.000000
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
3 %APL_DSC_Encoding: UTF8
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
4 %%Title: (Unknown)
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
5 %%Creator: (Unknown)
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
6 %%CreationDate: (Unknown)
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
7 %%For: (Unknown)
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
8 %%DocumentData: Clean7Bit
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
9 %%LanguageLevel: 2
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
10 %%Pages: 1
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
11 %%BoundingBox: 0 0 237 121
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
12 %%EndComments
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
13 %%BeginProlog
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
14 %%BeginFile: cg-pdf.ps
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
15 %%Copyright: Copyright 2000-2004 Apple Computer Incorporated.
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
16 %%Copyright: All Rights Reserved.
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
17 currentpacking true setpacking
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
18 /cg_md 141 dict def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
19 cg_md begin
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
20 /L3? languagelevel 3 ge def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
21 /bd{bind def}bind def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
22 /ld{load def}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
23 /xs{exch store}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
24 /xd{exch def}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
25 /cmmtx matrix def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
26 mark
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
27 /sc/setcolor
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
28 /scs/setcolorspace
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
29 /dr/defineresource
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
30 /fr/findresource
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
31 /T/true
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
32 /F/false
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
33 /d/setdash
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
34 /w/setlinewidth
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
35 /J/setlinecap
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
36 /j/setlinejoin
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
37 /M/setmiterlimit
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
38 /i/setflat
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
39 /rc/rectclip
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
40 /rf/rectfill
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
41 /rs/rectstroke
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
42 /f/fill
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
43 /f*/eofill
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
44 /sf/selectfont
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
45 /s/show
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
46 /xS/xshow
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
47 /yS/yshow
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
48 /xyS/xyshow
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
49 /S/stroke
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
50 /m/moveto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
51 /l/lineto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
52 /c/curveto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
53 /h/closepath
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
54 /n/newpath
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
55 /q/gsave
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
56 /Q/grestore
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
57 counttomark 2 idiv
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
58 {ld}repeat pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
59 /SC{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
60 /ColorSpace fr scs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
61 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
62 /sopr /setoverprint where{pop/setoverprint}{/pop}ifelse ld
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
63 /soprm /setoverprintmode where{pop/setoverprintmode}{/pop}ifelse ld
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
64 /cgmtx matrix def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
65 /sdmtx{cgmtx currentmatrix pop}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
66 /CM {cgmtx setmatrix}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
67 /cm {cmmtx astore CM concat}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
68 /W{clip newpath}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
69 /W*{eoclip newpath}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
70 statusdict begin product end dup (HP) anchorsearch{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
71 pop pop pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
72 true
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
73 }{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
74 pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
75 (hp) anchorsearch{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
76 pop pop true
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
77 }{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
78 pop false
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
79 }ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
80 }ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
81 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
82 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
83 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
84 pop pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
85 (0)dup 0 4 -1 roll put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
86 F charpath
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
87 }cshow
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
88 }
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
89 }{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
90 {F charpath}
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
91 }ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
92 /cply exch bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
93 /cps {cply stroke}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
94 /pgsave 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
95 /bp{/pgsave save store}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
96 /ep{pgsave restore showpage}def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
97 /re{4 2 roll m 1 index 0 rlineto 0 exch rlineto neg 0 rlineto h}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
98 /scrdict 10 dict def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
99 /scrmtx matrix def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
100 /patarray 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
101 /createpat{patarray 3 1 roll put}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
102 /makepat{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
103 scrmtx astore pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
104 gsave
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
105 initgraphics
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
106 CM
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
107 patarray exch get
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
108 scrmtx
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
109 makepattern
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
110 grestore
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
111 setpattern
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
112 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
113 /cg_BeginEPSF{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
114 userdict save/cg_b4_Inc_state exch put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
115 userdict/cg_endepsf/cg_EndEPSF load put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
116 count userdict/cg_op_count 3 -1 roll put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
117 countdictstack dup array dictstack userdict/cg_dict_array 3 -1 roll put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
118 3 sub{end}repeat
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
119 /showpage {} def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
120 0 setgray 0 setlinecap 1 setlinewidth 0 setlinejoin
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
121 10 setmiterlimit [] 0 setdash newpath
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
122 false setstrokeadjust false setoverprint
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
123 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
124 /cg_EndEPSF{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
125 countdictstack 3 sub { end } repeat
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
126 cg_dict_array 3 1 index length 3 sub getinterval
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
127 {begin}forall
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
128 count userdict/cg_op_count get sub{pop}repeat
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
129 userdict/cg_b4_Inc_state get restore
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
130 F setpacking
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
131 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
132 /cg_biproc{currentfile/RunLengthDecode filter}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
133 /cg_aiproc{currentfile/ASCII85Decode filter/RunLengthDecode filter}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
134 /ImageDataSource 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
135 L3?{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
136 /cg_mibiproc{pop pop/ImageDataSource{cg_biproc}def}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
137 /cg_miaiproc{pop pop/ImageDataSource{cg_aiproc}def}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
138 }{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
139 /ImageBandMask 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
140 /ImageBandData 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
141 /cg_mibiproc{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
142 string/ImageBandMask xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
143 string/ImageBandData xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
144 /ImageDataSource{[currentfile/RunLengthDecode filter dup ImageBandMask/readstring cvx
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
145 /pop cvx dup ImageBandData/readstring cvx/pop cvx]cvx bind}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
146 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
147 /cg_miaiproc{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
148 string/ImageBandMask xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
149 string/ImageBandData xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
150 /ImageDataSource{[currentfile/ASCII85Decode filter/RunLengthDecode filter
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
151 dup ImageBandMask/readstring cvx
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
152 /pop cvx dup ImageBandData/readstring cvx/pop cvx]cvx bind}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
153 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
154 }ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
155 /imsave 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
156 /BI{save/imsave xd mark}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
157 /EI{imsave restore}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
158 /ID{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
159 counttomark 2 idiv
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
160 dup 2 add
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
161 dict begin
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
162 {def} repeat
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
163 pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
164 /ImageType 1 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
165 /ImageMatrix[Width 0 0 Height neg 0 Height]def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
166 currentdict dup/ImageMask known{ImageMask}{F}ifelse exch
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
167 L3?{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
168 dup/MaskedImage known
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
169 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
170 pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
171 <<
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
172 /ImageType 3
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
173 /InterleaveType 2
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
174 /DataDict currentdict
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
175 /MaskDict
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
176 << /ImageType 1
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
177 /Width Width
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
178 /Height Height
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
179 /ImageMatrix ImageMatrix
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
180 /BitsPerComponent 1
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
181 /Decode [0 1]
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
182 currentdict/Interpolate known
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
183 {/Interpolate Interpolate}if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
184 >>
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
185 >>
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
186 }if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
187 }if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
188 exch
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
189 {imagemask}{image}ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
190 end
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
191 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
192 /cguidfix{statusdict begin mark version end
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
193 {cvr}stopped{cleartomark 0}{exch pop}ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
194 2012 lt{dup findfont dup length dict begin
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
195 {1 index/FID ne 2 index/UniqueID ne and
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
196 {def} {pop pop} ifelse}forall
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
197 currentdict end definefont pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
198 }{pop}ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
199 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
200 /t_array 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
201 /t_i 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
202 /t_c 1 string def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
203 /x_proc{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
204 exch t_array t_i get add exch moveto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
205 /t_i t_i 1 add store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
206 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
207 /y_proc{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
208 t_array t_i get add moveto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
209 /t_i t_i 1 add store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
210 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
211 /xy_proc{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
212
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
213 t_array t_i 2 copy 1 add get 3 1 roll get
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
214 4 -1 roll add 3 1 roll add moveto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
215 /t_i t_i 2 add store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
216 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
217 /sop 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
218 /cp_proc/x_proc ld
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
219 /base_charpath
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
220 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
221 /t_array xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
222 /t_i 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
223 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
224 t_c 0 3 -1 roll put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
225 currentpoint
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
226 t_c cply sop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
227 cp_proc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
228 }forall
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
229 /t_array 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
230 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
231 /sop/stroke ld
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
232 /nop{}def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
233 /xsp/base_charpath ld
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
234 /ysp{/cp_proc/y_proc ld base_charpath/cp_proc/x_proc ld}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
235 /xysp{/cp_proc/xy_proc ld base_charpath/cp_proc/x_proc ld}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
236 /xmp{/sop/nop ld /cp_proc/x_proc ld base_charpath/sop/stroke ld}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
237 /ymp{/sop/nop ld /cp_proc/y_proc ld base_charpath/sop/stroke ld}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
238 /xymp{/sop/nop ld /cp_proc/xy_proc ld base_charpath/sop/stroke ld}bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
239 /refnt{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
240 findfont dup length dict copy dup
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
241 /Encoding 4 -1 roll put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
242 definefont pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
243 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
244 /renmfont{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
245 findfont dup length dict copy definefont pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
246 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
247 L3? dup dup{save exch}if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
248 /Range 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
249 /DataSource 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
250 /val 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
251 /nRange 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
252 /mulRange 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
253 /d0 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
254 /r0 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
255 /di 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
256 /ri 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
257 /a0 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
258 /a1 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
259 /r1 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
260 /r2 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
261 /dx 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
262 /Nsteps 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
263 /sh3tp 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
264 /ymax 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
265 /ymin 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
266 /xmax 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
267 /xmin 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
268 /setupFunEval
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
269 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
270 begin
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
271 /nRange Range length 2 idiv store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
272 /mulRange
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
273
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
274 [
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
275 0 1 nRange 1 sub
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
276 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
277 2 mul/nDim2 xd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
278 Range nDim2 get
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
279 Range nDim2 1 add get
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
280 1 index sub
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
281
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
282 255 div
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
283 exch
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
284 }for
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
285 ]store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
286 end
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
287 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
288 /FunEval
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
289 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
290 begin
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
291
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
292 nRange mul /val xd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
293
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
294 0 1 nRange 1 sub
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
295 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
296 dup 2 mul/nDim2 xd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
297 val
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
298 add DataSource exch get
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
299 mulRange nDim2 get mul
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
300 mulRange nDim2 1 add get
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
301 add
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
302 }for
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
303 end
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
304 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
305 /max
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
306 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
307 2 copy lt
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
308 {exch pop}{pop}ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
309 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
310 /sh2
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
311 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
312 /Coords load aload pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
313 3 index 3 index translate
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
314
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
315 3 -1 roll sub
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
316 3 1 roll exch
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
317 sub
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
318 2 copy
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
319 dup mul exch dup mul add sqrt
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
320 dup
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
321 scale
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
322 atan
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
323
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
324 rotate
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
325
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
326 /Function load setupFunEval
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
327
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
328
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
329 clippath {pathbbox}stopped {0 0 0 0}if newpath
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
330 /ymax xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
331 /xmax xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
332 /ymin xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
333 /xmin xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
334 currentdict/Extend known
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
335 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
336 /Extend load 0 get
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
337 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
338 0/Function load FunEval sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
339 xmin ymin xmin abs ymax ymin sub rectfill
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
340 }if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
341 }if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
342
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
343 /Nsteps/Function load/Size get 0 get 1 sub store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
344 /dx 1 Nsteps div store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
345 gsave
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
346 /di ymax ymin sub store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
347 /Function load
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
348
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
349 0 1 Nsteps
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
350 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
351 1 index FunEval sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
352 0 ymin dx di rectfill
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
353 dx 0 translate
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
354 }for
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
355 pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
356 grestore
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
357 currentdict/Extend known
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
358 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
359 /Extend load 1 get
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
360 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
361 Nsteps/Function load FunEval sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
362 1 ymin xmax 1 sub abs ymax ymin sub rectfill
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
363 }if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
364 }if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
365 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
366 /shp
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
367 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
368 4 copy
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
369
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
370 dup 0 gt{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
371 0 exch a1 a0 arc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
372 }{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
373 pop 0 moveto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
374 }ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
375 dup 0 gt{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
376 0 exch a0 a1 arcn
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
377 }{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
378 pop 0 lineto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
379 }ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
380
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
381 fill
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
382
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
383 dup 0 gt{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
384 0 exch a0 a1 arc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
385 }{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
386 pop 0 moveto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
387 }ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
388 dup 0 gt{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
389 0 exch a1 a0 arcn
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
390 }{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
391 pop 0 lineto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
392 }ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
393
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
394 fill
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
395 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
396 /calcmaxs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
397 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
398
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
399 xmin dup mul ymin dup mul add sqrt
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
400 xmax dup mul ymin dup mul add sqrt
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
401 xmin dup mul ymax dup mul add sqrt
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
402 xmax dup mul ymax dup mul add sqrt
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
403 max max max
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
404 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
405 /sh3
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
406 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
407 /Coords load aload pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
408 5 index 5 index translate
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
409 3 -1 roll 6 -1 roll sub
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
410 3 -1 roll 5 -1 roll sub
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
411 2 copy dup mul exch dup mul add sqrt
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
412 /dx xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
413 2 copy 0 ne exch 0 ne or
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
414 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
415
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
416 exch atan rotate
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
417 }{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
418 pop pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
419 }ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
420
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
421 /r2 xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
422 /r1 xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
423 /Function load
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
424 dup/Size get 0 get 1 sub
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
425 /Nsteps xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
426 setupFunEval
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
427
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
428
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
429
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
430
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
431
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
432 dx r2 add r1 lt{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
433
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
434 0
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
435 }{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
436 dx r1 add r2 le
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
437 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
438 1
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
439 }{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
440 r1 r2 eq
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
441 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
442 2
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
443 }{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
444 3
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
445 }ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
446 }ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
447 }ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
448 /sh3tp xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
449 clippath {pathbbox}stopped {0 0 0 0}if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
450 newpath
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
451 /ymax xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
452 /xmax xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
453 /ymin xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
454 /xmin xs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
455
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
456 dx dup mul r2 r1 sub dup mul sub dup 0 gt
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
457 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
458 sqrt r2 r1 sub atan
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
459 /a0 exch 180 exch sub store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
460 /a1 a0 neg store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
461 }{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
462 pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
463 /a0 0 store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
464 /a1 360 store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
465 }ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
466 currentdict/Extend known
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
467 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
468 /Extend load 0 get r1 0 gt and
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
469 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
470 0/Function load FunEval sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
471
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
472
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
473
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
474
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
475 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
476 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
477 dx 0 r1 360 0 arcn
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
478 xmin ymin moveto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
479 xmax ymin lineto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
480 xmax ymax lineto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
481 xmin ymax lineto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
482 xmin ymin lineto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
483 eofill
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
484 }
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
485 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
486 r1 0 gt{0 0 r1 0 360 arc fill}if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
487 }
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
488 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
489
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
490
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
491
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
492
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
493 0 r1 xmin abs r1 add neg r1 shp
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
494 }
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
495 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
496
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
497
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
498 r2 r1 gt{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
499
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
500 0 r1
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
501 r1 neg r2 r1 sub div dx mul
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
502 0
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
503 shp
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
504 }{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
505
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
506
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
507
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
508 0 r1 calcmaxs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
509 dup
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
510
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
511 r2 add dx mul dx r1 r2 sub sub div
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
512 neg
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
513 exch 1 index
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
514 abs exch sub
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
515 shp
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
516 }ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
517 }
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
518 }sh3tp get exec
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
519 }if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
520 }if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
521
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
522 /d0 0 store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
523 /r0 r1 store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
524 /di dx Nsteps div store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
525 /ri r2 r1 sub Nsteps div store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
526 /Function load
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
527 0 1 Nsteps
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
528 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
529 1 index FunEval sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
530 d0 di add r0 ri add d0 r0 shp
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
531 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
532
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
533 d0 0 r0 a1 a0 arc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
534 d0 di add 0 r0 ri add a0 a1 arcn
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
535 fill
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
536
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
537
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
538 d0 0 r0 a0 a1 arc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
539 d0 di add 0 r0 ri add a1 a0 arcn
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
540 fill
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
541 }pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
542
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
543
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
544 /d0 d0 di add store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
545 /r0 r0 ri add store
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
546 }for
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
547 pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
548
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
549 currentdict/Extend known
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
550 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
551 /Extend load 1 get r2 0 gt and
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
552 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
553 Nsteps/Function load FunEval sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
554
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
555
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
556
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
557
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
558 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
559 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
560 dx 0 r2 0 360 arc fill
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
561 }
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
562 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
563 dx 0 r2 360 0 arcn
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
564 xmin ymin moveto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
565 xmax ymin lineto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
566 xmax ymax lineto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
567 xmin ymax lineto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
568 xmin ymin lineto
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
569 eofill
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
570 }
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
571 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
572
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
573
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
574 xmax abs r1 add r1 dx r1 shp
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
575 }
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
576 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
577
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
578 r2 r1 gt{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
579
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
580
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
581
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
582 calcmaxs dup
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
583
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
584 r1 add dx mul dx r2 r1 sub sub div
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
585 exch 1 index
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
586 exch sub
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
587 dx r2
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
588 shp
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
589 }{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
590
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
591 r1 neg r2 r1 sub div dx mul
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
592 0
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
593 dx
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
594 r2
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
595 shp
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
596 }ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
597 }
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
598 }
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
599 sh3tp get exec
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
600 }if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
601 }if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
602 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
603 /sh
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
604 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
605 begin
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
606 /ShadingType load dup dup 2 eq exch 3 eq or
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
607 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
608 gsave
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
609 newpath
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
610 /ColorSpace load scs
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
611 currentdict/BBox known
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
612 {
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
613 /BBox load aload pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
614 2 index sub
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
615 3 index
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
616 3 -1 roll exch sub
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
617 exch rectclip
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
618 }if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
619 2 eq
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
620 {sh2}{sh3}ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
621 grestore
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
622 }{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
623
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
624 pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
625 (DEBUG: shading type unimplemented\n)print flush
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
626 }ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
627 end
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
628 }bd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
629 {restore}if not dup{save exch}if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
630 L3?{
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
631 /sh/shfill ld
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
632 /csq/clipsave ld
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
633 /csQ/cliprestore ld
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
634 }if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
635 {restore}if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
636 end
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
637 setpacking
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
638 %%EndFile
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
639 %%EndProlog
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
640 %%BeginSetup
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
641 %%EndSetup
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
642 %%Page: 1 1
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
643 %%PageBoundingBox: 0 0 237 121
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
644 %%BeginPageSetup
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
645 cg_md begin
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
646 bp
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
647 sdmtx
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
648 %RBIBeginFontSubset: Helvetica
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
649 %!FontType1-1.0: Helvetica 1.0000.0.0000
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
650 14 dict begin/FontName /Helvetica def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
651 /PaintType 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
652 /Encoding 256 array 0 1 255{1 index exch/.notdef put}for
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
653 dup 33 /L put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
654 dup 34 /i put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
655 dup 35 /n put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
656 dup 36 /d put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
657 dup 37 /a put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
658 dup 38 /C put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
659 dup 39 /l put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
660 dup 40 /e put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
661 dup 41 /t put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
662 dup 42 /V put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
663 dup 43 /w put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
664 dup 44 /r put
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
665 readonly def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
666 42/FontType resourcestatus{pop pop false}{true}ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
667 %APLsfntBegin
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
668 {currentfile 0(%APLsfntEnd\n)/SubFileDecode filter flushfile}if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
669 /FontType 42 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
670 /FontMatrix matrix def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
671 /FontBBox[2048 -1947 1 index div -985 2 index div 2961 3 index div 2297 5 -1 roll div]cvx def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
672 /sfnts [<
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
673 74727565000900000000000063767420000000000000009C0000036C6670676D000000000000040800000A0C676C79660000000000000E1400000A74686561640000000000001888000000386868656100000000000018C000000024686D747800000000000018E4000000346C6F636100000000000019180000001C6D617870000000000000193400000020707265700000000000001954000003CF05C0001005BD00280580001A042F001F0000FFD90000FFDA0000FFD9FE55FFE605C70010FE6DFFF1033B000000B9000000B902FE3F3C00C0008D009B00AF000600A800C00028005E009800C9016A00B9015C00B400D6011E002E0080000400B8004C00CC01FFFFD1006600A400AF007400C2009500B1000C0028006D0015004C008E0125FF7A000C0040004C00620084FFA200240038008600BD0039005E008E00EDFFA9FFB300400052005500AA00AB00C200CB012302B10413FFAEFFE4000800510074008400AA00D1FF4CFFAF0012002C004200500051008400BE012503DAFF680018003B0098009C009F00A100C100EC018201B4FF68FF76FFD0FFE100020018001C00530053007D01B401E103AF0486FF9CFFEAFFFE001F0028002A00520060009300A300AA00AF00AF00C001000145016B0174019301950240028202B404850517FEFD00060029004700470048006F008800B400B900C400F200F901EF02180310037403C5FF35FFF3000B004B004C0052005500650076007600870087008E00AB00BB0106013001430150017D0194019501D3022A025502580277027802E6034E035C037903D3047304B2058C0598060BFEF5FFBBFFC7FFD50017001D005B0072007E009C00C200D000F400FA01030106011C0125013B0142015E015E0180019B02B901A101B9025001C001D002AA01DF01E301EF01FB0205020C0215022B0274029302AB02C202CE03690395039903DF03F5043E050205A105E5062507DBFE62FE89FECEFF3BFFE1FFF800030008002100390042004E005F0061006F00700034007F008E00AD00AD00AF00BD00C400C500C900C900C900E3011C00ED00F800F901000112011A0132014D014D014E014F01660169019E01BA01BA01BE01E301EF01F602000200020902110217021C02530262026D028002D50280031B032A034A035A03AF03AF03C803D603FB03FB04050413041504470449008C046D049A049A04A604A804B204CF0539053E054E055605800589058C036305D105D6067E068E06B206EF06F00728074C076F078C00B400C900C000C10000000000000000000000000004012400AF0032006E0063014401620096014301A10161008A00740064018801EF01700028FF5D037E0347023000AA00BE007B0062009A007D0089035C00A1FFD803AA00D70093006C0000008000A70442001D0597001D00820030002A
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
674 002A002A002A002A40292A292827262524232221201F1E1D1C1B1A191817161514131211100D0C0B0A090807060504030201002C4523466020B02660B004262348482D2C452346236120B02661B004262348482D2C45234660B0206120B04660B004262348482D2C4523462361B0206020B02661B02061B004262348482D2C45234660B0406120B06660B004262348482D2C4523462361B0406020B02661B04061B004262348482D2C0110203C003C2D2C20452320B0CD442320B8015A51582320B08D44235920B0ED51582320B04D44235920B09051582320B00D44235921212D2C20204518684420B001602045B04676688A4560442D2C01B9400000000A2D2C00B9000040000B2D2C2045B00043617D6818B0004360442D2C45B01A234445B01923442D2C2045B00325456164B050515845441B2121592D2C20B0032552582359212D2C69B04061B0008B0C6423648BB8400062600C642364615C58B0036159B002602D2C45B0112BB0172344B0177AE5182D2C45B0112BB01723442D2C45B0112BB017458CB0172344B0177AE5182D2CB002254661658A46B040608B482D2CB0022546608A46B040618C482D2C4B53205C58B002855958B00185592D2C20B0032545B019236A4445B01A23444565234520B00325606A20B009234223688A6A606120B0005258B21A401A4523614459B0005058B219401945236144592D2CB9187E3B210B2D2CB92D412D410B2D2CB93B21187E0B2D2CB93B21E7830B2D2CB92D41D2C00B2D2CB9187EC4E00B2D2C4B525845441B2121592D2C0120B003252349B04060B0206320B000525823B002253823B002256538008A63381B212121212159012D2C456920B00943B0022660B00325B005254961B0805358B21940194523616844B21A401A4523606A44B209191A45652345604259B00943608A103A2D2C01B005251023208AF500B0016023EDEC2D2C01B005251023208AF500B0016123EDEC2D2C01B0062510F500EDEC2D2C20B001600110203C003C2D2C20B001610110203C003C2D2C764520B003254523616818236860442D2C7645B00325452361682318456860442D2C7645B0032545616823452361442D2C4569B014B0324B505821B0205961442DB8002B2C4BB800095058B101018E59B801FF85B800441DB9000900035F5E2DB8002C2C2020456944B001602DB8002D2CB8002C2A212DB8002E2C2046B003254652582359208A208A49648A204620686164B004254620686164525823658A592F20B00053586920B000545821B040591B6920B000545821B0406559593A2DB8002F2C2046B00425465258238A592046206A6164B0042546206A61645258238A592FFD2DB800302C4B20B0032650585158B080441BB04044591B21212045B0C05058B0C0441B2159592DB800312C2020456944B0016020
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
675 20457D691844B001602DB800322CB800312A2DB800332C4B20B003265358B0801BB040598A8A20B0032653582321B0C08A8A1B8A235920B0032653582321B801008A8A1B8A235920B0032653582321B801408A8A1B8A235920B80003265358B0032545B8018050582321B8018023211BB003254523212321591B2159442DB800342C4B535845441B2121592DB800352C4BB800095058B101018E59B801FF85B800441DB9000900035F5E2DB800362C2020456944B001602DB800372CB800362A212DB800382C2046B003254652582359208A208A49648A204620686164B004254620686164525823658A592F20B00053586920B000545821B040591B6920B000545821B0406559593A2DB800392C2046B00425465258238A592046206A6164B0042546206A61645258238A592FFD2DB8003A2C4B20B0032650585158B080441BB04044591B21212045B0C05058B0C0441B2159592DB8003B2C2020456944B001602020457D691844B001602DB8003C2CB8003B2A2DB8003D2C4B20B003265358B0801BB040598A8A20B0032653582321B0C08A8A1B8A235920B0032653582321B801008A8A1B8A235920B0032653582321B801408A8A1B8A235920B80003265358B0032545B8018050582321B8018023211BB003254523212321591B2159442DB8003E2C4B535845441B2121592DB8003F2C4BB800095058B101018E59B801FF85B800441DB9000900035F5E2DB800402C2020456944B001602DB800412CB800402A212DB800422C2046B003254652582359208A208A49648A204620686164B004254620686164525823658A592F20B00053586920B000545821B040591B6920B000545821B0406559593A2DB800432C2046B00425465258238A592046206A6164B0042546206A61645258238A592FFD2DB800442C4B20B0032650585158B080441BB04044591B21212045B0C05058B0C0441B2159592DB800452C2020456944B001602020457D691844B001602DB800462CB800452A2DB800472C4B20B003265358B0801BB040598A8A20B0032653582321B0C08A8A1B8A235920B0032653582321B801008A8A1B8A235920B0032653582321B801408A8A1B8A235920B80003265358B0032545B8018050582321B8018023211BB003254523212321591B2159442DB800482C4B535845441B2121592DB800492C4BB800095058B101018E59B801FF85B800441DB9000900035F5E2DB8004A2C2020456944B001602DB8004B2CB8004A2A212DB8004C2C2046B003254652582359208A208A49648A204620686164B004254620686164525823658A592F20B00053586920B000545821B040591B6920B000545821B0406559593A2DB8004D2C2046B00425465258238A592046206A6164B0042546206A61645258238A592FFD2DB8004E2C4B20B0032650585158
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
676 B080441BB04044591B21212045B0C05058B0C0441B2159592DB8004F2C2020456944B001602020457D691844B001602DB800502CB8004F2A2DB800512C4B20B003265358B0801BB040598A8A20B0032653582321B0C08A8A1B8A235920B0032653582321B801008A8A1B8A235920B0032653582321B801408A8A1B8A235920B80003265358B0032545B8018050582321B8018023211BB003254523212321591B2159442DB800522C4B535845441B2121592DB800532C4BB800095058B101018E59B801FF85B800441DB9000900035F5E2DB800542C2020456944B001602DB800552CB800542A212DB800562C2046B003254652582359208A208A49648A204620686164B004254620686164525823658A592F20B00053586920B000545821B040591B6920B000545821B0406559593A2DB800572C2046B00425465258238A592046206A6164B0042546206A61645258238A592FFD2DB800582C4B20B0032650585158B080441BB04044591B21212045B0C05058B0C0441B2159592DB800592C2020456944B001602020457D691844B001602DB8005A2CB800592A2DB8005B2C4B20B003265358B0801BB040598A8A20B0032653582321B0C08A8A1B8A235920B0032653582321B801008A8A1B8A235920B0032653582321B801408A8A1B8A235920B80003265358B0032545B8018050582321B8018023211BB003254523212321591B2159442DB8005C2C4B535845441B2121592D00020042000004D005BD00030007003FB800532BB800082FB800092FB8000810B80000D0B800002FB8000910B80003DCB80004DCB8000010B80007DC00BA0007000000562BBA0002000500562B3031331121112711211142048EB8FCE205BDFA43B8044DFBB300000002005AFFDA057105E5001D001E00B1403B1B0597019605031F011F0482018705891305530803861D111115063A1D030C3A15091E021E1E190331023B1031111A20093119191F20A1216A66182B2B4EF44DED4E10F64DEDF4ED12392F003F3FED3FED12392F10ED31304379403A001C172513260E251B260B160932000D1410320112110F10071C0932000500033201010204030A180C32000F120C3200081A06320104010632012B2B2B2B01103C103C2B2B103C103C2B2B2B2B2B2B815D015D080117232E0123220011101233323736373306070621202726111037362123041E013411C221C5B2D9FEF5F1EFDC733D1EC21A92AFFED7FF00AEE5ACBA01472805E5FEDABB8EA6FECFFEC5FEFEFEBFA95991E89DBD9BCD01AC0145D0E200000001009C0000044B05BD000500314013000203021E040508031A070102250500190607B80153B321765E182B2B4EF43C4DFD3C4E10E6003F3C4DFD3C3F31301333112115219CC702E8FC5105BDFAF2AF000100340000053605BD0006008F40449001A001
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
677 0240015401021601017805E6010267046805880403192802251203030400251206060501050203060300020504080817171A0402039E0500019E0619078E5E182B194E10F4184DFD3939FD3939194E456544E618003F3C3F173C123901874D2E2B872E182B4B5279400C01020100030401000102060587087D10C487087D10C43130015D005D717172090233012301011001A601A1DFFDE8D3FDE905BDFB1D04E3FA4305BD00000000030052FFDC04470449000F003B003C00DD40382A30010A100B1B0C1C2733481069096A10073908120C09031B320724091D100C1D3B2B022E293BB73B023B322A2512100705081C2722171CB8018A4023171D1F07271D2E0B021D350B3C073C3C1C1407292AA8241A3E1B291C4A0F2738193D3EBC0197002100B9019600182B2B4EF44DEDF4ED4E10F64DE4FDC412392F003F3FED3FED3FEDED1239111217395D1112392EED2EED01111239111739313043794028363715220001192501360F2100181E1B21001620142101212200370221001A1D1721011521172101002B2B2B01103C2B2B2B2B818181005D015D2416333237363D010E010F0106070615013637363534262322070607233E01333217161511141633323637150E0123222726270E012322263534363713010E724E5F59962168326D62315301B43E150C837A8D3B210AA805F7A3BD767517250C1E112A2C265D2A160937CE7C95BDBA978ACF5A2C49A691151C060E0D1C2F67016C082C182D5C534C2A53C69B484898FD971C220303850C06422340486AB58895A41301E40000020038FFDA03ED05C2000B001D00774032370E470E570EA704A91B05250814020F1D1000081D1D07130A021D170B052E132E102911121A1F0B271A191E1F87217242182B2B4EF44DED4E10F63C4DFDE4E4003FED3F3FED3F1139113931304379401A181C090A000101180B2600091C0B260000190226000A1B0826012B2B012B2B818181005D1216333236353426232206150017161711331123350E0123220035341233F692A17DA1A67A88A9018A53303DADA23FAC6FB3FEFAEFDE015FE8D7C9CBC3D0CA0237341E4B021DFA3E956358012DFAEA015700030048FFDA041A0449001C00240025010C40799708991AA71F03050E020F0514150E120F1514400C401408291A014B0BB603C701C603C71BD808D909D61FD823E817E8230BC711C712025C080521240F9A161D243906070716211D1C070A1D160B2507971CA71CB71CD71C0425160F251C05190A0C07110E270F1D27051A27242E072719192627D421A65D182B2B4EF44DFDE44E10F64DEDD4FD391239391112393912392F5D003F3FED3FED12392F3CFD3C10ED1112393130437940460023040503050205010504061F26111012101310141004060C25221B24260020001D26011E1D09170726000B150E
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
678 26010D0E231A2126011E0521260108180A26000D100A2600002B2B2B2B01103C2B2B103C2B2B2B2A2B2A8101715D00715D5D00161716171615211E013332373637330E01070607062322001110003301262726232206070102B4D638361210FCEF0590978D543014B1074F3152794152C8FEEA0118E2011F0B284AAD7CA805012304476B55516C4AA2A3C55D36473B912E501C100123010601020142FE26754682B38A01DC000000000200840000013B05BD000300070036401C07E50400010006030A0917171A06010229070300190809AA216242182B2B4EF43C4DC4FD3CC44E456544E6003F3F3C3F4DED3130133311231133152384B7B7B7B7042AFBD605BDCC0000000100890000013D05BD0003002940150000030A0517171A0102290003190405AA216242182B2B4EF43C4DFD3C4E456544E6003F3F31301333112389B4B405BDFA43000000020084000003ED04490019001A005E4031B706C706020406140627147606740705140C021418101D05070006180B0A1A071A1A000C29091A1C012E18291900191B1CB80106B3216242182B2B4EF43C4DFDE44E10F64DED12392F003F3F3C3F3FED1139390112393130005D015D1333153E01333217161511231134272623220706070E011511230184AB4CAA68E4502CB71D307E40294A382D1BB401A7042F985E529F57A2FD5102A3623C640D1642357169FDCF044900000100890000029204470011004F40262703260D37034704040E0810020E0911090C270805070006110A081A13012E10291100191213B80145B321627E182B2B4EF43C4DFDE44E10E6003F3F4D3FC4FDC411123939011112393130005D1333153E0133321617152E0123220615112389AB15A46B05181D101B108892B4042FB9369B0203BE0302AF72FD980000010017FFEF0209055A00180052B50D2E0AC00E01B8013F40250416391703060E0A111A17171A0301062900150E150F031F030203FC1619191AFC21677D182B2B4EF44DFD5D39C42F3CFD3C104E456544E6002F3F3F3C4DFD3CED10FDE431301333113315231114171633323637150E012322263511233533A8B6ABAB2615310D1E141F43277E5A9191055AFED593FD4538130B01028E0908816702C593000000010012000005A1042F000C0120407E4704AA09028E09014607490B87038A08850ACA02C403C607C908C60AC90B0B66076A08650A690B76077908760A790B85078A0B0A4607490B0247037700780503572816282B012B043B013B048F018F0406090401030B020305060C050006080A0B03070A0E17171A0705069B080304C40A0209C40B00019B0C190D677E182B194E10F4184DFD3939FD3939FD3939FD3939194E456544E618003F173C3F173C1217395D4B5179400C0529120607060029120C0C0B0587102B87102B4B5279B4090A09080A
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
679 B8018B401312010102070604050529120606070908090A08B8018B400E120404030B0C00010029120C0C0B01874D2E2B87107DC41805872E182B087D10C505872E182B877D10C405872E182B087D10C53130015D71717100715D1B02331B013301230B012301D7CED1CAD2DBB4FEC9BBDAD3BBFECB042FFCB4034CFCB90347FBD1033DFCC3042F000001000000000000032DBC1E5F0F3CF500110800000000005F4D8F0000000000C321F6B6F865FC270B9108F9000000090001000000000000000100000629FE2900000C01F865FCED0B9100010000000000000000000000000000000D0512004205C7005A0473009C0556003404730052047300380473004801C7008401C700890473008402AA00890239001705C700120000003400C400EC014A02140280034A0378039A03F6043C048C053A00010000000D006F0009006B0007000200100010005D000007E80A0C00040001B800532BB800492BB8003F2BB800352BB8002B2B4118008001A6009001A600A001A600030069018B0079018B0089018B0099018B00040089018B0099018B00A9018B00B9018BB2040840BA0179001A014A400B041F5414191F180A0B1FD2B80106B49E1FD918E3BB0119000D00E10119B20D0009410A01A0019F0064001F01A50025017A00480028019AB3296C1F60410A01A9007001A9008001A90003008001A9000101A9B21E321FBE012C00250401001F0126001E0401B61FE7312D1FE531B80201B21FC227B80401B21FC11EB80201400F1FC01D9E1FBF1D671FBE1D671FAB27B80401B21FAA29B80401B61FA91D6C1F931EB8019AB21F921DB80101B21F911DB80101B21F751DB80201B61F6D29961F6431B8019AB21F4C96B802ABB21F391DB80156400B1F3638211F351DE41F2F27B80801400B1F2D1D4C1F2A31CD1F241DB802ABB21F201EB8012540111F1C1D931F3A1D4C1F1E1D45273A1D4527BB01AA019B002A019BB2254A1FBA019B0025017AB349293896B8017BB348283125B8017A403648289629482725294C1F252946272729482756C80784075B07410732072B072807260721071B071408120810080E080C080A08080807B801ACB23F1F06BB01AB003F001F01ABB308060805B801AEB23F1F04BB01AD003F001F01ADB70804080208000814B8FFE0B40000010014B801ABB41000000100B801ABB606100000010006B801ADB300000100B801AD401F04000001000410000001001002000001000200000001000002010802004A00B0018DB806008516763F183F123E113946443E113946443E113946443E113946443E113946443E11394660443E11394660443E11394660442B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B18011DB0964B5358B0AA1D59B0324B5358B0FF1D592B2B2B2B2B2B2B2B182B2B2B2B2B2B2B2B2B
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
680 2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B74752B2B2B65422B2B4B5279B376706A66456523456023456560234560B08B766818B080622020B16A704565234520B003266062636820B003266165B070236544B06A234420B176664565234520B003266062636820B003266165B066236544B0762344B10066455458B166406544B27640764523614459B36242725D456523456023456560234560B089766818B080622020B172424565234520B003266062636820B003266165B042236544B072234420B1625D4565234520B003266062636820B003266165B05D236544B0622344B1005D455458B15D406544B262406245236144592B2B2B2B456953427374B8019A2045694B20B02853B049515A58B020615944B801A6204569447500
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
681 00>] def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
682 /CharStrings 13 dict dup begin
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
683 /.notdef 0 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
684 /C 1 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
685 /L 2 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
686 /V 3 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
687 /a 4 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
688 /d 5 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
689 /e 6 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
690 /i 7 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
691 /l 8 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
692 /n 9 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
693 /r 10 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
694 /t 11 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
695 /w 12 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
696 end readonly def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
697 currentdict dup/FontName get exch definefont pop end
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
698 %APLsfntEnd
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
699 42/FontType resourcestatus{pop pop true}{false}ifelse
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
700 {currentfile 0(%APLT1End\n)/SubFileDecode filter flushfile}if
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
701 /FontType 1 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
702 /FontMatrix [ 0.00048828125 0 0 0.00048828125 0 0 ] def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
703 /FontBBox{-1947 -985 2961 2297}def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
704 /UniqueID 4375838 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
705 currentdict currentfile eexec
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
706 54544758EC884CF30C3CD503CEDBFF3839C47C3C3333173232E3FDBFF439491DB843E1924E63AA7726BBB0485AB56D93D8C0906F647A47162891E73FFC2A9873C4B1EAC5EEBDFFC4D06084FBD84139DF4583C6E259D10699944D1068C9C45667DCCCFB9B7EA01B606435EDCBD273ABAC093D14085CCBAC149BD7382E842CFE0D7FE4FD2EF589A2471F6074A80A8B675C2F7A50D63AC1EF90D787BADD11633CB01CF6EE3B37AAF9078A69AC4740E9B6525D78BBD839551A1CB80DB8682FA5E87591BBD6EE8B946063A2A58D9CA3685AB305495DC5FB5747EB8A9A059C4976C0FE4EEAB1D56FF47F1E9664ED9F4A7DAB763AF92B2F6CF2FA7DEC24710E0B9096E30F772BA7FEA9BDBE496C42ED2CEB58F54E80BDF57CE7B4DB6CCFE7182F43BF93CCA0767AF95D62C5D2C3DC6AE1E6D139F51A2C63432117F1714C5566572EE9967A715420ABDCD1D7BD74F8450B89965FCC81C6ACA565C5F3CCF91D430D1F953E4F1A645300A98DD8C47CD64555F08F422340A85404EAE0D3229C4F9336B9470CACBD6BBF3395104750A915CC6EAAC197668267B8C62D2764C8CD69FD937CA3C924D997A0EDE7964BEB9EA2F92EF70C5E5DA0AA5567765E71F2B911B3C5586B741EEB93F3C73016EC16BFF283758900903D203992EFC8BAFAF13579C602F38C91B71CCBEC8DADBFCB2CF6F614DCF0404E4678133CDA654CD39ADC4A8DD9DC9E199CA389B3097EA53D68A2728AA3C6C75ED53FA8420C021D872E28D46F54806A8A409E053FBF428B872BD7670370D1C6BC11C4F08B535F81FEC940561036581FE25FD6C1C0A09496DB88EA10A7EA4B850CC136C106108D3D2E0ED3DC5B2F3ED4DB8E926227ABECDB879DD6A00008E8F757E92A18D35454F40B60D9B137E5879C22494D728A8023655F28A8D45BD110ECF7CF78E0D3578AFBF7E5B3C23E65B00D8E29D68C75623571A64F9B693BD2C9712BD391C956536C6A3F2EABAD6A7A9F38EE3B3131AC6B0346121C1BD852865E648F9AA3C5D354053DC585EBCAAF4385CE6DF0C8AC2F4431CBF883FE600AB7DC5D86F56512802DA1F9221ED1E0DFF990210A549FA5B1CBC01EC2266D0EF917E53C1863E0CA07CA8FE24F135F9EA1EC298E0D9C329B38B009D77C08FAFE947B2A873B5EDE4AA3EE32E6F018B1DE38B015359176D044769C6A59FF51C9B07D89841CCCE89C46683A94855CE8565FDA70B0A4117319F9C58E08E6A1A43A7CB42BFF2B0E610E5C0CE01DC3DFC09AACEE83F7BCA3186011D832E9225F9586A1F822E65BEDB5D13B6FA4EFFFD16F3957D8E7BF0F4216F379028CD47043A5DCA0F1829698BDA564FC2C338F214E902CC37C2282AEF0260F76C5C093A9959A555C8299A22C3889381609F354E4CFC12F173BD574BBDA2AF4750B34B8A84C727015C88DCA14792271D26C983ECDE1212836C84908ACFD
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
707 AF3ACE8AFA373E33EE3CE3EF5A13B5D027841D3CF437FD470B66B37F7E926CEF2AF2347D249E06AE7CB12568681BA3DE4C1678E80B99A07CACCE6A694542FE8AF6E339267871087A217621FA7347C3B4ED089E5AB3E8B27704B538DB9B682CDBB6453D35929C11461012B1A13A5EB73F65A2FD4D05A4D65381E106B3844AAF4D174A8B3D8BC5DFEE711F83BB7ECDB2FBC9AA6582FAAD071E52A0BCB6FFA16D54B48AEC337E7AF4FF672F56928B811DF1FF44A8DEA9B1AB567AE8FD54DA844A416EC78BC8DE2592040417CE695DB0B73CF7AB1239C4A2AC164F15B1FE67BDE6CD6A9D2F7E4D135BECC6E04E2DDB3DABFD59830EA803D2788BF1A34DB22CDBEE7EAB3F6A585DEF90F0A04FE77D1F029ADB4E62FAE4D4022ECD99C800EFBCF7BB5BD54D87AC2C411EF1B628655C38730DE8A932A6C482B6CBEB8756D21786B7DEA2880098917B293DB43ED08CCD51CF59409ED7255256CBE28FC7D3F303622A62BB0CEC3A6208F42AD0E8CCC67867C5D964E2EEA7086445108C80251DE35CC9569DBEB1DD98571CA74EFCBCAC4ABBE8196CDE2DE00201F1A9E112D8AF97FB19BC9CCBFD232101BE13B87C0A2AD340C52C68BEAE09AB6FBD9EBAC0CDB31F6182929B486D4B1896EE3B0280F230F94FA9CD1D07460E5E2D52BED1F94D38C8F0421A73F4DF31B2FED45FCA7E957847F230A6910250EA8F6B018B5CBD89AF6FAACBF5BAE5F30493AFCD60F295391C66CC2C3845D6F3602AFBE1EE99AA16DFA46B7077D3D2ACE54F46403DECD9271348ADAF5AFDA410F118C97197A9152E398993F65E0DCB01DC2D5EA4E210E2B84F61163CAE97CE856AD71E16369B58011F74EAD95887087ED9F85B378025ED18A60CE82881128E0EE65C50C0A73E482FE7735E0E893A1CE07F185A3185CE569DFB8FE98D4A5112CB5806AB1EE49F426EA310B16CFA68A14403EBE3A42DB12952206AADCC8F19321203A0A307929E6CE22ACBBD561EE9C35BA545619797EEBF506553966E1E76827968B1E80D2AAFE1B550CABBA27B58A721C8A2404B3E3B75506BE920CBACE61C60497C3FB4BE99023CE387F5746DFE67545F119B0FA3EABFE8FAE34DA709069BB8652A2C6C089106B1BBCA15678D592E6CEF41330A066E535CC1F458CAC4B24CD47D576D73A31E0BA7B804CAAB90509B7433CE17F51F3AB28F9F90C403E6AAF220A642134880DAA7916BC04640D85216D78E304381303FFA7FA3E1002106A7D067068F70D6A52DE1C8C7A3C598B288BB7B21C2499557A0BB89CC5924251DEE54965CAE8BDDAC2BB4AE0218B5EFA711551754F9247D3A9BD44C05F103C43BE3FFDD49D23CA861BDD75E766E4CD2386F6177AEB5951DE1A79F3E3068BD6F360B13850D222C8B3C14E4EAB73FC07B28D3830F978C52B70DE95D65D56C6814CFDBFD37B2CD628AE5E8B4462CF4EECECF79
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
708 CFFCF608AA1DA2A821920DBF4C40008E618375DB6E045DBBC70642D76A616C62DEA4C307CE7350278C5FF643DC0C11533BA0CB69025DAE8D6979C9FF6D92B216432FC45D9D1B9B255E2EFC139C1902A34EF9FB7921AC52373B8B542E5076
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
709 0000000000000000000000000000000000000000000000000000000000000000
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
710 0000000000000000000000000000000000000000000000000000000000000000
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
711 0000000000000000000000000000000000000000000000000000000000000000
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
712 0000000000000000000000000000000000000000000000000000000000000000
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
713 0000000000000000000000000000000000000000000000000000000000000000
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
714 0000000000000000000000000000000000000000000000000000000000000000
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
715 0000000000000000000000000000000000000000000000000000000000000000
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
716 0000000000000000000000000000000000000000000000000000000000000000
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
717 cleartomark end
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
718 %APLT1End
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
719
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
720 %RBIEndFontSubset
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
721 /Helvetica cguidfix
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
722 /F1.1/Helvetica renmfont
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
723 [ /CIEBasedA 5 dict dup begin /WhitePoint [ 0.9505 1.0000 1.0891 ] def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
724 /DecodeA { { 1.8008 exp } bind exec} bind
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
725 def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
726 /MatrixA [ 0.9642 1.0000 0.8249 ] def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
727 /RangeLMN [ 0.0 2.0000 0.0 2.0000 0.0 2.0000 ] def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
728 /DecodeLMN [ { 0.9857 mul} bind { 1.0000 mul} bind { 1.3202 mul} bind ] def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
729 end ] /Cs1 exch/ColorSpace dr pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
730 [ /CIEBasedABC 4 dict dup begin
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
731 /WhitePoint [ 0.9505 1.0000 1.0891 ] def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
732 /DecodeABC [ { 1.8008 exp } bind { 1.8008 exp } bind { 1.8008 exp } bind ] def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
733 /MatrixABC [ 0.4294 0.2332 0.0202 0.3278 0.6737 0.1105 0.1933 0.0938 0.9580 ] def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
734 /RangeLMN [ 0.0 0.9505 0.0 1.0000 0.0 1.0891 ] def
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
735 end ] /Cs2 exch/ColorSpace dr pop
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
736 %%EndPageSetup
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
737 /Cs1 SC
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
738 1 sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
739 q
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
740 0 0 237 121 rc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
741 0 121 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
742 237 121 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
743 237 0 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
744 0 0 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
745 h
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
746 f
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
747 0.60000002 i
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
748 /Cs2 SC
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
749 1 1 1 sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
750 90 110 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
751 153 110 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
752 153 80 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
753 90 80 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
754 h
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
755 90 110 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
756 f
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
757 1 J
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
758 1 j
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
759 0 0 0 sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
760 1 0 0 -1 -55 150 cm
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
761 145 40 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
762 208 40 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
763 208 70 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
764 145 70 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
765 h
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
766 145 40 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
767 S
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
768 /Cs1 SC
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
769 0 sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
770 0 i
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
771 1 0 0 -1 121.5 95 cm
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
772 /F1.1[ 12 0 0 -12 0 0]sf
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
773 -14.680664 4 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
774 (!"#$%)[ 6.673828 2.666016 6.673828 6.673828 0.000000 ] xS
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
775 0.60000002 i
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
776 /Cs2 SC
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
777 0 0 0 sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
778 1 0 0 -1 -55 150 cm
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
779 66 109 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
780 111 109 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
781 111 139 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
782 66 139 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
783 h
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
784 66 109 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
785 S
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
786 /Cs1 SC
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
787 0 sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
788 0 i
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
789 1 0 0 -1 33.5 26 cm
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
790 -15.339844 4 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
791 (&'"\(#\))[ 8.666016 2.666016 2.666016 6.673828 6.673828 0.000000 ] xS
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
792 0.60000002 i
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
793 /Cs2 SC
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
794 1 1 1 sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
795 CM
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
796 66 41 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
797 111 41 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
798 111 11 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
799 66 11 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
800 h
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
801 66 41 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
802 f
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
803 0 0 0 sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
804 1 0 0 -1 -55 150 cm
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
805 121 109 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
806 166 109 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
807 166 139 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
808 121 139 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
809 h
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
810 121 109 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
811 S
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
812 /Cs1 SC
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
813 0 sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
814 0 i
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
815 1 0 0 -1 88.5 26 cm
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
816 -15.339844 4 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
817 (&'"\(#\))[ 8.666016 2.666016 2.666016 6.673828 6.673828 0.000000 ] xS
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
818 0.60000002 i
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
819 /Cs2 SC
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
820 1 1 1 sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
821 CM
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
822 121 41 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
823 166 41 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
824 166 11 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
825 121 11 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
826 h
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
827 121 41 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
828 f
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
829 0 0 0 sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
830 1 0 0 -1 -55 150 cm
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
831 176 109 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
832 221 109 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
833 221 139 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
834 176 139 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
835 h
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
836 176 109 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
837 S
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
838 /Cs1 SC
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
839 0 sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
840 0 i
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
841 1 0 0 -1 143.5 26 cm
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
842 -15.339844 4 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
843 (&'"\(#\))[ 8.666016 2.666016 2.666016 6.673828 6.673828 0.000000 ] xS
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
844 0.60000002 i
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
845 /Cs2 SC
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
846 1 1 1 sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
847 CM
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
848 176 41 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
849 226 41 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
850 226 11 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
851 176 11 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
852 h
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
853 176 41 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
854 f
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
855 0 0 0 sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
856 1 0 0 -1 -55 150 cm
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
857 231 109 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
858 281 109 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
859 281 139 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
860 231 139 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
861 h
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
862 231 109 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
863 S
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
864 /Cs1 SC
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
865 0 sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
866 0 i
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
867 1 0 0 -1 201 26 cm
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
868 -18.234375 4 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
869 (*)s
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
870 -10.441406 4 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
871 ("\(+\(,)[ 2.666016 6.673828 8.666016 6.673828 0.000000 ] xS
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
872 0.60000002 i
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
873 /Cs2 SC
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
874 0 0 0 sc
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
875 1 0 0 -1 -55 150 cm
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
876 156.9761 70.308517 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
877 108.02391 108.69148 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
878 S
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
879 169.11035 70.451065 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
880 150.88963 108.54893 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
881 S
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
882 181.43449 70.476372 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
883 193.56551 108.52363 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
884 S
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
885 194.16022 70.327736 m
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
886 238.33978 108.67226 l
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
887 S
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
888 ep
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
889 end
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
890 %%Trailer
kazz@kazzone.st.ie.u-ryukyu.ac.jp
parents:
diff changeset
891 %%EOF