Register
Login
Resources
Docs Blog Datasets Glossary Case Studies Tutorials & Webinars
Product
Data Engine LLMs Platform Enterprise
Pricing Explore
Connect to our Discord channel

plot_symbols.ps 22 KB

You have to be logged in to leave a comment. Sign In
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
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
  1. %!PS-Adobe-3.0
  2. %%BoundingBox: 0 0 612 792
  3. %%HiResBoundingBox: 0 0 612 792
  4. %%Title: GMT v5.0.0_r9611M [64-bit] Document from GMT_psxyz
  5. %%Creator: GMT
  6. %%For: pwessel
  7. %%DocumentNeededResources: font Helvetica
  8. %%CreationDate: Tue Jan 3 16:58:28 2012
  9. %%LanguageLevel: 2
  10. %%DocumentData: Clean7Bit
  11. %%Orientation: Portrait
  12. %%Pages: 1
  13. %%EndComments
  14. %%BeginProlog
  15. 250 dict begin
  16. /! {bind def} bind def
  17. /# {load def}!
  18. /A /setgray #
  19. /B /setdash #
  20. /C /setrgbcolor #
  21. /D /rlineto #
  22. /E {dup stringwidth pop}!
  23. /F /fill #
  24. /G /rmoveto #
  25. /H /sethsbcolor #
  26. /I /setpattern #
  27. /K /setcmykcolor #
  28. /L /lineto #
  29. /M /moveto #
  30. /N /newpath #
  31. /P /closepath #
  32. /R /rotate #
  33. /S /stroke #
  34. /T /translate #
  35. /U /grestore #
  36. /V /gsave #
  37. /W /setlinewidth #
  38. /Y {findfont exch scalefont setfont}!
  39. /Z /show #
  40. /FP {true charpath flattenpath}!
  41. /MU {matrix setmatrix}!
  42. /MS {/SMat matrix currentmatrix def}!
  43. /MR {SMat setmatrix}!
  44. /edef {exch def}!
  45. /FS {/fc edef /fs {V fc F U} def}!
  46. /FQ {/fs {} def}!
  47. /O0 {/os {N} def}!
  48. /O1 {/os {P S} def}!
  49. /FO {fs os}!
  50. /Sa {M MS dup 0 exch G 0.726542528 mul -72 R dup 0 D 4 {72 R dup 0 D -144 R dup 0 D} repeat pop MR FO}!
  51. /Sb {M dup 0 D exch 0 exch D neg 0 D FO}!
  52. /SB {MS T /BoxR edef /BoxW edef /BoxH edef BoxR 0 M
  53. BoxW 0 BoxW BoxH BoxR arct BoxW BoxH 0 BoxH BoxR arct 0 BoxH 0 0 BoxR arct 0 0 BoxW 0 BoxR arct MR FO}!
  54. /Sc {N 3 -1 roll 0 360 arc FO}!
  55. /Sd {M 4 {dup} repeat 0 G neg dup dup D exch D D FO}!
  56. /Se {N MS T R scale 0 0 1 0 360 arc MR FO}!
  57. /Sg {M MS 22.5 R dup 0 exch G -22.5 R 0.765366865 mul dup 0 D 6 {-45 R dup 0 D} repeat pop MR FO}!
  58. /Sh {M MS dup 0 G -120 R dup 0 D 4 {-60 R dup 0 D} repeat pop MR FO}!
  59. /Si {M MS dup neg 0 exch G 60 R 1.732050808 mul dup 0 D 120 R 0 D MR FO}!
  60. /Sj {M MS R dup -2 div 2 index -2 div G dup 0 D exch 0 exch D neg 0 D MR FO}!
  61. /Sn {M MS dup 0 exch G -36 R 1.175570505 mul dup 0 D 3 {-72 R dup 0 D} repeat pop MR FO}!
  62. /Sp {N 3 -1 roll 0 360 arc F}!
  63. /SP {M {D} repeat FO}!
  64. /Sr {M dup -2 div 2 index -2 div G dup 0 D exch 0 exch D neg 0 D FO}!
  65. /SR {MS T /BoxR edef /BoxW edef /BoxH edef BoxR BoxW -2 div BoxH -2 div T BoxR 0 M
  66. BoxW 0 BoxW BoxH BoxR arct BoxW BoxH 0 BoxH BoxR arct 0 BoxH 0 0 BoxR arct 0 0 BoxW 0 BoxR arct MR FO}!
  67. /Ss {M 1.414213562 mul dup dup dup -2 div dup G 0 D 0 exch D neg 0 D FO}!
  68. /St {M MS dup 0 exch G -60 R 1.732050808 mul dup 0 D -120 R 0 D MR FO}!
  69. /SV {0 exch M 0 D D D D D 0 D FO}!
  70. /Sv {0 0 M D D 0 D D D D D 0 D D FO}!
  71. /Sw {2 copy M 5 2 roll arc FO}!
  72. /Sx {M 1.414213562 mul 5 {dup} repeat -2 div dup G D neg 0 G neg D S}!
  73. /Sy {M dup 0 exch G dup -2 mul dup 0 exch D S}!
  74. /S+ {M dup 0 G dup -2 mul dup 0 D exch dup G 0 exch D S}!
  75. /S- {M dup 0 G dup -2 mul dup 0 D S}!
  76. /sw {stringwidth pop}!
  77. /sh {V MU 0 0 M FP pathbbox N 4 1 roll pop pop pop U}!
  78. /sd {V MU 0 0 M FP pathbbox N pop pop exch pop U}!
  79. /sH {V MU 0 0 M FP pathbbox N exch pop exch sub exch pop U}!
  80. /sb {E exch sh}!
  81. /bl {}!
  82. /bc {E -2 div 0 G}!
  83. /br {E neg 0 G}!
  84. /ml {dup 0 exch sh -2 div G}!
  85. /mc {dup E -2 div exch sh -2 div G}!
  86. /mr {dup E neg exch sh -2 div G}!
  87. /tl {dup 0 exch sh neg G}!
  88. /tc {dup E -2 div exch sh neg G}!
  89. /tr {dup E neg exch sh neg G}!
  90. /mx {2 copy lt {exch} if pop}!
  91. /PSL_xorig 0 def /PSL_yorig 0 def
  92. /TM {2 copy T PSL_yorig add /PSL_yorig edef PSL_xorig add /PSL_xorig edef}!
  93. /PSL_reencode {findfont dup length dict begin
  94. {1 index /FID ne {def}{pop pop} ifelse} forall
  95. exch /Encoding edef currentdict end definefont pop
  96. }!
  97. /PSL_eps_begin {
  98. /PSL_eps_state save def
  99. /PSL_dict_count countdictstack def
  100. /PSL_op_count count 1 sub def
  101. userdict begin
  102. /showpage {} def
  103. 0 setgray 0 setlinecap 1 setlinewidth
  104. 0 setlinejoin 10 setmiterlimit [] 0 setdash newpath
  105. /languagelevel where
  106. {pop languagelevel 1 ne {false setstrokeadjust false setoverprint} if} if
  107. }!
  108. /PSL_eps_end {
  109. count PSL_op_count sub {pop} repeat
  110. countdictstack PSL_dict_count sub {end} repeat
  111. PSL_eps_state restore
  112. }!
  113. /PSL_transp {
  114. /.setopacityalpha where {pop .setblendmode .setopacityalpha}{
  115. /pdfmark where {pop [ /BM exch /CA exch dup /ca exch /SetTransparency pdfmark}
  116. {pop pop} ifelse} ifelse
  117. }!
  118. /Standard+_Encoding [
  119. /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
  120. /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
  121. /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
  122. /.notdef /threequarters /threesuperior /trademark /twosuperior /yacute /ydieresis /zcaron
  123. /space /exclam /quotedbl /numbersign /dollar /percent /ampersand /quoteright
  124. /parenleft /parenright /asterisk /plus /comma /hyphen /period /slash
  125. /zero /one /two /three /four /five /six /seven
  126. /eight /nine /colon /semicolon /less /equal /greater /question
  127. /at /A /B /C /D /E /F /G
  128. /H /I /J /K /L /M /N /O
  129. /P /Q /R /S /T /U /V /W
  130. /X /Y /Z /bracketleft /backslash /bracketright /asciicircum /underscore
  131. /quoteleft /a /b /c /d /e /f /g
  132. /h /i /j /k /l /m /n /o
  133. /p /q /r /s /t /u /v /w
  134. /x /y /z /braceleft /bar /braceright /asciitilde /florin
  135. /Atilde /Ccedilla /Eth /Lslash /Ntilde /Otilde /Scaron /Thorn
  136. /Yacute /Ydieresis /Zcaron /atilde /brokenbar /ccedilla /copyright /degree
  137. /divide /eth /logicalnot /lslash /minus /mu /multiply /ntilde
  138. /onehalf /onequarter /onesuperior /otilde /plusminus /registered /scaron /thorn
  139. /.notdef /exclamdown /cent /sterling /fraction /yen /florin /section
  140. /currency /quotesingle /quotedblleft /guillemotleft /guilsinglleft /guilsinglright /fi /fl
  141. /Aacute /endash /dagger /daggerdbl /periodcentered /Acircumflex /paragraph /bullet
  142. /quotesinglbase /quotedblbase /quotedblright /guillemotright /ellipsis /perthousand /Adieresis /questiondown
  143. /Agrave /grave /acute /circumflex /tilde /macron /breve /dotaccent
  144. /dieresis /Eacute /ring /cedilla /Ecircumflex /hungarumlaut /ogonek /caron
  145. /emdash /Edieresis /Egrave /Iacute /Icircumflex /Idieresis /Igrave /Oacute
  146. /Ocircumflex /Odieresis /Ograve /Uacute /Ucircumflex /Udieresis /Ugrave /aacute
  147. /acircumflex /AE /adieresis /ordfeminine /agrave /eacute /ecircumflex /edieresis
  148. /egrave /Oslash /OE /ordmasculine /iacute /icircumflex /idieresis /igrave
  149. /oacute /ae /ocircumflex /odieresis /ograve /dotlessi /uacute /ucircumflex
  150. /udieresis /oslash /oe /germandbls /ugrave /Aring /aring /ydieresis
  151. ] def
  152. /PSL_font_encode 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 40 array astore def
  153. /F0 {/Helvetica Y}!
  154. /F1 {/Helvetica-Bold Y}!
  155. /F2 {/Helvetica-Oblique Y}!
  156. /F3 {/Helvetica-BoldOblique Y}!
  157. /F4 {/Times-Roman Y}!
  158. /F5 {/Times-Bold Y}!
  159. /F6 {/Times-Italic Y}!
  160. /F7 {/Times-BoldItalic Y}!
  161. /F8 {/Courier Y}!
  162. /F9 {/Courier-Bold Y}!
  163. /F10 {/Courier-Oblique Y}!
  164. /F11 {/Courier-BoldOblique Y}!
  165. /F12 {/Symbol Y}!
  166. /F13 {/AvantGarde-Book Y}!
  167. /F14 {/AvantGarde-BookOblique Y}!
  168. /F15 {/AvantGarde-Demi Y}!
  169. /F16 {/AvantGarde-DemiOblique Y}!
  170. /F17 {/Bookman-Demi Y}!
  171. /F18 {/Bookman-DemiItalic Y}!
  172. /F19 {/Bookman-Light Y}!
  173. /F20 {/Bookman-LightItalic Y}!
  174. /F21 {/Helvetica-Narrow Y}!
  175. /F22 {/Helvetica-Narrow-Bold Y}!
  176. /F23 {/Helvetica-Narrow-Oblique Y}!
  177. /F24 {/Helvetica-Narrow-BoldOblique Y}!
  178. /F25 {/NewCenturySchlbk-Roman Y}!
  179. /F26 {/NewCenturySchlbk-Italic Y}!
  180. /F27 {/NewCenturySchlbk-Bold Y}!
  181. /F28 {/NewCenturySchlbk-BoldItalic Y}!
  182. /F29 {/Palatino-Roman Y}!
  183. /F30 {/Palatino-Italic Y}!
  184. /F31 {/Palatino-Bold Y}!
  185. /F32 {/Palatino-BoldItalic Y}!
  186. /F33 {/ZapfChancery-MediumItalic Y}!
  187. /F34 {/ZapfDingbats Y}!
  188. /F35 {/Ryumin-Light-EUC-H Y}!
  189. /F36 {/Ryumin-Light-EUC-V Y}!
  190. /F37 {/GothicBBB-Medium-EUC-H Y}!
  191. /F38 {/GothicBBB-Medium-EUC-V Y}!
  192. /F39 {/LinBiolinumO Y}!
  193. /PSL_pathtextdict 26 dict def
  194. /PSL_pathtext
  195. {PSL_pathtextdict begin
  196. /textheight exch def
  197. /just exch def
  198. /offset exch def
  199. /str exch def
  200. /pathdist 0 def
  201. /setdist offset def
  202. /charcount 0 def
  203. /justy just 4 idiv textheight mul 2 div neg def
  204. V flattenpath
  205. {movetoproc} {linetoproc}
  206. {curvetoproc} {closepathproc}
  207. pathforall
  208. U N
  209. end
  210. } def
  211. PSL_pathtextdict begin
  212. /movetoproc
  213. { /newy exch def /newx exch def
  214. /firstx newx def /firsty newy def
  215. /ovr 0 def
  216. newx newy transform
  217. /cpy exch def /cpx exch def
  218. } def
  219. /linetoproc
  220. { /oldx newx def /oldy newy def
  221. /newy exch def /newx exch def
  222. /dx newx oldx sub def
  223. /dy newy oldy sub def
  224. /dist dx dup mul dy dup mul add sqrt def
  225. dist 0 ne
  226. { /dsx dx dist div ovr mul def
  227. /dsy dy dist div ovr mul def
  228. oldx dsx add oldy dsy add transform
  229. /cpy exch def /cpx exch def
  230. /pathdist pathdist dist add def
  231. {setdist pathdist le
  232. {charcount str length lt
  233. {setchar} {exit} ifelse}
  234. { /ovr setdist pathdist sub def
  235. exit}
  236. ifelse
  237. } loop
  238. } if
  239. } def
  240. /curvetoproc
  241. { (ERROR: No curveto's after flattenpath!)
  242. print
  243. } def
  244. /closepathproc
  245. {firstx firsty linetoproc
  246. firstx firsty movetoproc
  247. } def
  248. /setchar
  249. { /char str charcount 1 getinterval def
  250. /charcount charcount 1 add def
  251. /charwidth char stringwidth pop def
  252. V cpx cpy itransform T
  253. dy dx atan R
  254. 0 justy M
  255. char show
  256. 0 justy neg G
  257. currentpoint transform
  258. /cpy exch def /cpx exch def
  259. U /setdist setdist charwidth add def
  260. } def
  261. end
  262. /PSL_curved_text_labels
  263. { /bits exch def
  264. /PSL_clippath bits 1 and 1 eq def
  265. /PSL_placetext bits 2 and 0 eq def
  266. /PSL_strokeline bits 4 and 4 eq def
  267. /PSL_firstcall bits 32 and 32 eq def
  268. /PSL_lastcall bits 64 and 64 eq def
  269. /PSL_fillbox bits 128 and 128 eq def
  270. /PSL_drawbox bits 256 and 256 eq def
  271. /PSL_n1 PSL_n 1 sub def
  272. /PSL_m1 PSL_m 1 sub def
  273. /PSL_usebox PSL_fillbox PSL_drawbox or def
  274. PSL_CT_calcstringwidth
  275. PSL_CT_calclinedist
  276. PSL_CT_addcutpoints
  277. PSL_clippath PSL_firstcall and
  278. {clipsave N clippath} if
  279. PSL_setlinepen
  280. /PSL_nn1 PSL_nn 1 sub def
  281. /n 0 def
  282. /k 0 def
  283. /j 0 def
  284. /PSL_seg 0 def
  285. /PSL_xp PSL_nn array def
  286. /PSL_yp PSL_nn array def
  287. PSL_xp 0 PSL_xx 0 get put
  288. PSL_yp 0 PSL_yy 0 get put
  289. 1 1 PSL_nn1
  290. { /i exch def
  291. /node_type PSL_kind i get def
  292. /j j 1 add def
  293. PSL_xp j PSL_xx i get put
  294. PSL_yp j PSL_yy i get put
  295. node_type 1 eq
  296. {n 0 eq
  297. {PSL_CT_drawline}
  298. { PSL_CT_reversepath
  299. PSL_CT_textline} ifelse
  300. /j 0 def
  301. PSL_xp j PSL_xx i get put
  302. PSL_yp j PSL_yy i get put
  303. } if
  304. } for
  305. n 0 eq {PSL_CT_drawline} if
  306. PSL_lastcall
  307. {PSL_clippath
  308. {PSL_clip} if N
  309. } if
  310. } def
  311. /PSL_CT_textline
  312. {PSL_placetext
  313. {PSL_clippath
  314. {PSL_CT_clippath} {PSL_CT_placelabel} ifelse
  315. } if
  316. /n 0 def /k k 1 add def PSL_setlinepen
  317. } def
  318. /PSL_CT_calcstringwidth
  319. { /PSL_width PSL_m array def
  320. 0 1 PSL_m1
  321. { /i exch def
  322. PSL_width i PSL_str i get stringwidth pop put
  323. } for
  324. } def
  325. /PSL_CT_calclinedist
  326. { /PSL_newx PSL_x 0 get def
  327. /PSL_newy PSL_y 0 get def
  328. /dist 0.0 def
  329. /PSL_dist PSL_n array def
  330. PSL_dist 0 0.0 put
  331. 1 1 PSL_n1
  332. { /i exch def
  333. /PSL_oldx PSL_newx def
  334. /PSL_oldy PSL_newy def
  335. /PSL_newx PSL_x i get def
  336. /PSL_newy PSL_y i get def
  337. /dx PSL_newx PSL_oldx sub def
  338. /dy PSL_newy PSL_oldy sub def
  339. /dist dist dx dx mul dy dy mul add sqrt add def
  340. PSL_dist i dist put
  341. } for
  342. } def
  343. /PSL_CT_addcutpoints
  344. { /k 0 def
  345. /PSL_nc PSL_m 2 mul 1 add def
  346. /PSL_cuts PSL_nc array def
  347. /PSL_nc1 PSL_nc 1 sub def
  348. 0 1 PSL_m1
  349. { /i exch def
  350. /dist PSL_dist PSL_node i get get def
  351. /halfwidth PSL_width i get 2 div PSL_gap_x add def
  352. PSL_cuts k dist halfwidth sub put
  353. /k k 1 add def
  354. PSL_cuts k dist halfwidth add put
  355. /k k 1 add def
  356. } for
  357. PSL_cuts k 100000.0 put
  358. /PSL_nn PSL_n PSL_m 2 mul add def
  359. /PSL_xx PSL_nn array def
  360. /PSL_yy PSL_nn array def
  361. /PSL_kind PSL_nn array def
  362. /j 0 def
  363. /k 0 def
  364. /dist 0.0 def
  365. 0 1 PSL_n1
  366. { /i exch def
  367. /last_dist dist def
  368. /dist PSL_dist i get def
  369. k 1 PSL_nc1
  370. { /kk exch def
  371. /this_cut PSL_cuts kk get def
  372. dist this_cut gt
  373. { /ds dist last_dist sub def
  374. /f ds 0.0 eq {0.0} {dist this_cut sub ds div} ifelse def
  375. /i1 i 0 eq {0} {i 1 sub} ifelse def
  376. PSL_xx j PSL_x i get dup PSL_x i1 get sub f mul sub put
  377. PSL_yy j PSL_y i get dup PSL_y i1 get sub f mul sub put
  378. PSL_kind j 1 put
  379. /j j 1 add def
  380. /k k 1 add def
  381. } if
  382. } for
  383. dist PSL_cuts k get le
  384. {PSL_xx j PSL_x i get put PSL_yy j PSL_y i get put
  385. PSL_kind j 0 put
  386. /j j 1 add def
  387. } if
  388. } for
  389. } def
  390. /PSL_CT_reversepath
  391. {PSL_xp j get PSL_xp 0 get lt
  392. {0 1 j 2 idiv
  393. { /left exch def
  394. /right j left sub def
  395. /tmp PSL_xp left get def
  396. PSL_xp left PSL_xp right get put
  397. PSL_xp right tmp put
  398. /tmp PSL_yp left get def
  399. PSL_yp left PSL_yp right get put
  400. PSL_yp right tmp put
  401. } for
  402. } if
  403. } def
  404. /PSL_CT_placelabel
  405. {
  406. PSL_usebox
  407. {PSL_CT_clippath
  408. PSL_fillbox
  409. {V PSL_setboxrgb fill U} if
  410. PSL_drawbox
  411. {PSL_setboxpen S} if N
  412. } if
  413. PSL_settxtrgb PSL_CT_placeline PSL_str k get PSL_gap_x PSL_just PSL_height PSL_pathtext
  414. } def
  415. /PSL_CT_clippath
  416. {
  417. /H PSL_height 2 div PSL_gap_y add def
  418. /xoff j 1 add array def
  419. /yoff j 1 add array def
  420. /angle 0 def
  421. 0 1 j {
  422. /ii exch def
  423. /x PSL_xp ii get def
  424. /y PSL_yp ii get def
  425. ii 0 eq {
  426. /x1 PSL_xp 1 get def
  427. /y1 PSL_yp 1 get def
  428. /dx x1 x sub def
  429. /dy y1 y sub def
  430. }
  431. { /i1 ii 1 sub def
  432. /x1 PSL_xp i1 get def
  433. /y1 PSL_yp i1 get def
  434. /dx x x1 sub def
  435. /dy y y1 sub def
  436. } ifelse
  437. dx 0.0 ne dy 0.0 ne and
  438. { /angle dy dx atan 90 add def} if
  439. /sina angle sin def
  440. /cosa angle cos def
  441. xoff ii H cosa mul put
  442. yoff ii H sina mul put
  443. } for
  444. PSL_xp 0 get xoff 0 get add PSL_yp 0 get yoff 0 get add M
  445. 1 1 j {
  446. /ii exch def
  447. PSL_xp ii get xoff ii get add PSL_yp ii get yoff ii get add L
  448. } for
  449. j -1 0 {
  450. /ii exch def
  451. PSL_xp ii get xoff ii get sub PSL_yp ii get yoff ii get sub L
  452. } for P
  453. } def
  454. /PSL_CT_drawline
  455. {
  456. /str 20 string def
  457. PSL_strokeline
  458. {PSL_CT_placeline PSL_setlinepen S} if
  459. /PSL_seg PSL_seg 1 add def
  460. /n 1 def
  461. } def
  462. /PSL_CT_placeline
  463. {PSL_xp 0 get PSL_yp 0 get M
  464. 1 1 j { /ii exch def PSL_xp ii get PSL_yp ii get L} for
  465. } def
  466. /PSL_straight_text_labels
  467. {
  468. /bits exch def
  469. /PSL_clippath bits 1 and 0 eq def
  470. /PSL_rounded bits 16 and 16 eq def
  471. /PSL_fillbox bits 128 and 128 eq def
  472. /PSL_drawbox bits 256 and 256 eq def
  473. /PSL_m1 PSL_m 1 sub def
  474. /PSL_justx PSL_just 4 mod 1 sub 2 div neg def
  475. /PSL_justy PSL_just 4 idiv PSL_height mul 2 div neg def
  476. /PSL_usebox PSL_fillbox PSL_drawbox or def
  477. PSL_clippath
  478. {PSL_ST_clippath}
  479. {PSL_usebox {PSL_ST_clippath} if
  480. PSL_ST_placelabel
  481. } ifelse
  482. } def
  483. /PSL_ST_placelabel
  484. {PSL_settxtrgb
  485. 0 1 PSL_m1
  486. { /k exch def
  487. /xp PSL_txt_x k get def
  488. /yp PSL_txt_y k get def
  489. V PSL_txt_x k get PSL_txt_y k get T
  490. PSL_angle k get R
  491. /BoxW PSL_str k get stringwidth pop def
  492. BoxW PSL_justx mul PSL_justy M
  493. PSL_str k get show
  494. U
  495. } for
  496. } def
  497. /PSL_ST_clippath
  498. {N
  499. PSL_usebox not {clipsave clippath} if
  500. PSL_rounded {PSL_ST_clippath_round} {PSL_ST_clippath_rect} ifelse
  501. PSL_usebox
  502. {PSL_fillbox
  503. {V PSL_setboxrgb fill U} if
  504. PSL_drawbox
  505. {PSL_setboxpen S} if N
  506. }
  507. {PSL_clip
  508. } ifelse
  509. N
  510. } def
  511. /PSL_ST_clippath_rect
  512. {
  513. /BoxH PSL_height PSL_gap_y 2 mul add def
  514. /DelY BoxH BoxH 0 3 array astore def
  515. 0 1 PSL_m1
  516. { /k exch def
  517. /xp PSL_txt_x k get def
  518. /yp PSL_txt_y k get def
  519. /MAT PSL_angle k get matrix R def
  520. /BoxW PSL_str k get stringwidth pop PSL_gap_x 2 mul add def
  521. /x0 0 BoxW PSL_justx mul add def
  522. /y0 0 PSL_justy add PSL_gap_y sub def
  523. /DelX 0 BoxW BoxW 3 array astore def
  524. x0 y0 MAT transform
  525. /dy exch def /dx exch def
  526. xp dx add yp dy add M
  527. 0 1 2
  528. {
  529. /ii exch def
  530. x0 DelX ii get add y0 DelY ii get add MAT transform
  531. /dy exch def /dx exch def
  532. xp dx add yp dy add L
  533. } for P
  534. } for
  535. } def
  536. /PSL_ST_clippath_round
  537. {
  538. /PSL_justy2 PSL_just 4 idiv 2 div neg def
  539. /BoxR PSL_gap_x PSL_gap_y lt {PSL_gap_x} {PSL_gap_y} ifelse def
  540. /BoxH PSL_height PSL_gap_y 2 mul add def
  541. /y0 PSL_height PSL_gap_y 2 mul add PSL_justy2 mul def
  542. 0 1 PSL_m1
  543. { /k exch def
  544. /xp PSL_txt_x k get def
  545. /yp PSL_txt_y k get def
  546. /BoxW PSL_str k get stringwidth pop PSL_gap_x 2 mul add def
  547. /x0 BoxW PSL_justx mul def
  548. xp yp T PSL_angle k get R x0 y0 T
  549. BoxR 0 M
  550. BoxW 0 BoxW BoxH BoxR arct BoxW BoxH 0 BoxH BoxR arct 0 BoxH 0 0 BoxR arct 0 0 BoxW 0 BoxR arct P
  551. x0 neg y0 neg T PSL_angle k get neg R xp neg yp neg T
  552. } for
  553. } def
  554. /PSL_nclip 0 def
  555. /PSL_clip {clip /PSL_nclip PSL_nclip 1 add def} def
  556. /PSL_eoclip {eoclip /PSL_nclip PSL_nclip 1 add def} def
  557. /PSL_cliprestore {cliprestore /PSL_nclip PSL_nclip 1 sub def} def
  558. %%EndProlog
  559. %%BeginSetup
  560. /PSLevel /languagelevel where {pop languagelevel} {1} ifelse def
  561. PSLevel 1 gt { << /PageSize [612 792] /ImagingBBox null >> setpagedevice } if
  562. %%EndSetup
  563. %%Page: 1 1
  564. %%BeginPageSetup
  565. V 0.06 0.06 scale
  566. %%EndPageSetup
  567. /PSL_page_xsize 10200 def
  568. /PSL_page_ysize 13200 def
  569. 0 A
  570. FQ
  571. O0
  572. 1200 1200 TM
  573. % PostScript produced by:
  574. %%GMT: psxyz -R0/4/1/6 -Jx1i -P -Bg1 -Gred -W0.25p -p155/35 -S1i -X1i -Y1i -K
  575. %%PROJ: xy 0.00000000 4.00000000 1.00000000 6.00000000 0.000 4.000 1.000 6.000 +xy +a=6378137.000 +b=6356752.314245
  576. 0 setlinecap
  577. 0 setlinejoin
  578. 3.32551 setmiterlimit
  579. /PSL_GPP matrix currentmatrix def [0.906308 -0.242404 0.422618 0.519837 -0 1163.54] concat
  580. 4 W
  581. 0 0 M
  582. 0 6000 D
  583. S
  584. 1200 0 M
  585. 0 6000 D
  586. S
  587. 2400 0 M
  588. 0 6000 D
  589. S
  590. 3600 0 M
  591. 0 6000 D
  592. S
  593. 4800 0 M
  594. 0 6000 D
  595. S
  596. 0 0 M
  597. 4800 0 D
  598. S
  599. 0 1200 M
  600. 4800 0 D
  601. S
  602. 0 2400 M
  603. 4800 0 D
  604. S
  605. 0 3600 M
  606. 4800 0 D
  607. S
  608. 0 4800 M
  609. 4800 0 D
  610. S
  611. 0 6000 M
  612. 4800 0 D
  613. S
  614. 2 setlinecap
  615. /MM {neg exch M} def
  616. /PSL_A0_y 0 def
  617. /PSL_A1_y 0 def
  618. 25 W
  619. 0 6000 M 0 -6000 D S
  620. 8 W
  621. /PSL_LH 0 def /PSL_L_y PSL_A0_y PSL_A1_y mx def
  622. 4800 0 T
  623. /MM {exch M} def
  624. /PSL_A0_y 0 def
  625. /PSL_A1_y 0 def
  626. 25 W
  627. 0 6000 M 0 -6000 D S
  628. 8 W
  629. /PSL_LH 0 def /PSL_L_y PSL_A0_y PSL_A1_y mx def
  630. -4800 0 T
  631. /MM {neg M} def
  632. /PSL_A0_y 0 def
  633. /PSL_A1_y 0 def
  634. 25 W
  635. 0 0 M 4800 0 D S
  636. 8 W
  637. /PSL_LH 0 def /PSL_L_y PSL_A0_y PSL_A1_y mx def
  638. 0 6000 T
  639. /MM {M} def
  640. /PSL_A0_y 0 def
  641. /PSL_A1_y 0 def
  642. 25 W
  643. 0 0 M 4800 0 D S
  644. 8 W
  645. /PSL_LH 0 def /PSL_L_y PSL_A0_y PSL_A1_y mx def
  646. 0 -6000 T
  647. 0 setlinecap
  648. clipsave
  649. 0 0 M
  650. 4800 0 D
  651. 0 6000 D
  652. -4800 0 D
  653. PSL_eoclip N
  654. 4 W
  655. {1 0 0 C} FS
  656. O1
  657. 33 W
  658. PSL_GPP setmatrix [0.906308 -0.242404 0.422618 0.519837 -0 1163.54] concat
  659. 600 600 5400 S-
  660. O0
  661. 4 W
  662. -600 1200 1200 5400 Sb
  663. 1200 -600 3000 4800 Sb
  664. {0 1 0 C} FS
  665. O1
  666. 17 W
  667. 600 600 4200 Sd
  668. {1 0 0 C} FS
  669. O0
  670. 4 W
  671. 600 4200 5400 Sc
  672. {0 1 0 C} FS
  673. O1
  674. 17 W
  675. 600 300 90 1800 4200 Se
  676. 600 3000 4200 Sg
  677. /image7 {<~
  678. J085r3"QQ/#D3&N:q0=W*=mo0,#L=]_CZR^(aDnfdfMZSO$OnMLdX!9&;Wb!Obgqr3?XDSTQ3RcRMRB-b+`pt]Xg$UO3F9'5
  679. TJJs3!N-PZb_=k4$[1MO>KQ])NdUf;^o*=KgpbqUB.CeTZ(Z9@'8"\'l$1#c!72NW0SACAsm;7^d%~>
  680. /LZWDecode filter} def
  681. /pattern7 {V 768 768 scale
  682. << /PaintType 1 /PatternType 1 /TilingType 1 /BBox [0 0 1 1] /XStep 1 /YStep 1 /PaintProc
  683. {begin [/Indexed /DeviceGray 1 <FF00>] setcolorspace
  684. << /ImageType 1 /Decode [0 1] /Width 64 /Height 64 /BitsPerComponent 1
  685. /ImageMatrix [64 0 0 -64 0 64] /DataSource image7
  686. >> image end}
  687. >> matrix makepattern U} def
  688. {pattern7 I} FS
  689. 600 600 3000 Si
  690. {0 1 0 C} FS
  691. 600 4200 4200 Sh
  692. {pattern7 I} FS
  693. 600 1200 90 1800 3000 Sj
  694. {1 0.647 0 C} FS
  695. 3000 3000 M PSL_font_encode 0 get 0 eq {Standard+_Encoding /Helvetica /Helvetica PSL_reencode PSL_font_encode 0 1 put} if
  696. 1200 F0
  697. (M) mc false charpath fs S
  698. /image20 {<~
  699. J3Vsg3"c2k!!'j/&?&8D)[hEg,#K2Q67i_,7,ma8bZ6eEO$P$h2uJ8%+-]8A;<_>W>:Gk,,a11b^25Tk:*pXBjR,l%P##]^.
  700. FeoV7[qW[+9~>
  701. /LZWDecode filter} def
  702. /pattern20 {V 768 768 scale
  703. << /PaintType 1 /PatternType 1 /TilingType 1 /BBox [0 0 1 1] /XStep 1 /YStep 1 /PaintProc
  704. {begin [/Indexed /DeviceRGB 1 <FFFFFFFFFF00>] setcolorspace
  705. << /ImageType 1 /Decode [0 1] /Width 64 /Height 64 /BitsPerComponent 1
  706. /ImageMatrix [64 0 0 -64 0 64] /DataSource image20
  707. >> image end}
  708. >> matrix makepattern U} def
  709. {pattern20 I} FS
  710. 600 1200 600 1800 Sr
  711. {1 0.647 0 C} FS
  712. 600 4200 3000 Sn
  713. {pattern20 I} FS
  714. 600 1800 1800 Ss
  715. 600 3000 1800 St
  716. {0 0 1 C} FS
  717. 600 30 80 600 600 Sw
  718. 600 80 30 4200 1800 Sw
  719. 33 W
  720. 1 0 0 C
  721. 600 1800 600 Sx
  722. 0 A
  723. 600 1800 600 S+
  724. 600 3000 600 Sy
  725. /image12 {<~
  726. J,is'-mSKes+A0qkQC`<*.M?,i\<1bJ3Og.#MoIUgiOV4"3;`QGMis(-NV$E:e4!_'+L<rU/O%A?>UO>:1LRIjGHYrPJLY2W
  727. )Pr&'T,@i1$J7i7jsToj`9U-`a^io:$2&HeFn5STMVIa8SoAS8=@o'eB,rrGu1-_V3X@M>%MAT<i6_RKmJ/dITW7E86spm=G
  728. Y\*f?!pe8RR_:TQNhSR/r,#?D@,7h7<';P<_A~>
  729. /LZWDecode filter} def
  730. /pattern12 {V 768 768 scale
  731. << /PaintType 1 /PatternType 1 /TilingType 1 /BBox [0 0 1 1] /XStep 1 /YStep 1 /PaintProc
  732. {begin [/Indexed /DeviceRGB 1 <00FF00FF0000>] setcolorspace
  733. << /ImageType 1 /Decode [0 1] /Width 64 /Height 64 /BitsPerComponent 1
  734. /ImageMatrix [64 0 0 -64 0 64] /DataSource image12
  735. >> image end}
  736. >> matrix makepattern U} def
  737. {pattern12 I} FS
  738. 50 W
  739. 1 0.647 0 C
  740. 600 4200 600 Sa
  741. PSL_cliprestore
  742. PSL_GPP setmatrix
  743. currentdict /image7 undef
  744. currentdict /pattern7 undef
  745. currentdict /image12 undef
  746. currentdict /pattern12 undef
  747. currentdict /image20 undef
  748. currentdict /pattern20 undef
  749. 0 A
  750. FQ
  751. O0
  752. 0 4800 TM
  753. % PostScript produced by:
  754. %%GMT: psxyz -R0/4/1/6/0/3 -Jx1i -Jz1i -O -Bg1/g1/g1 -G0 -W0.25p -p155/35 -S1i -Y4i
  755. %%PROJ: xy 0.00000000 4.00000000 1.00000000 6.00000000 0.000 4.000 1.000 6.000 +xy +a=6378137.000 +b=6356752.314245
  756. 0 setlinecap
  757. 0 setlinejoin
  758. 3.32551 setmiterlimit
  759. /PSL_GPP matrix currentmatrix def [0.906308 -0.242404 0.422618 0.519837 -0 1163.54] concat
  760. 4 W
  761. 0 0 M
  762. 0 6000 D
  763. S
  764. 1200 0 M
  765. 0 6000 D
  766. S
  767. 2400 0 M
  768. 0 6000 D
  769. S
  770. 3600 0 M
  771. 0 6000 D
  772. S
  773. 4800 0 M
  774. 0 6000 D
  775. S
  776. 0 0 M
  777. 4800 0 D
  778. S
  779. 0 1200 M
  780. 4800 0 D
  781. S
  782. 0 2400 M
  783. 4800 0 D
  784. S
  785. 0 3600 M
  786. 4800 0 D
  787. S
  788. 0 4800 M
  789. 4800 0 D
  790. S
  791. 0 6000 M
  792. 4800 0 D
  793. S
  794. 2 setlinecap
  795. /MM {neg exch M} def
  796. /PSL_A0_y 0 def
  797. /PSL_A1_y 0 def
  798. 25 W
  799. 0 6000 M 0 -6000 D S
  800. 8 W
  801. /PSL_LH 0 def /PSL_L_y PSL_A0_y PSL_A1_y mx def
  802. 4800 0 T
  803. /MM {exch M} def
  804. /PSL_A0_y 0 def
  805. /PSL_A1_y 0 def
  806. 25 W
  807. 0 6000 M 0 -6000 D S
  808. 8 W
  809. /PSL_LH 0 def /PSL_L_y PSL_A0_y PSL_A1_y mx def
  810. -4800 0 T
  811. /MM {neg M} def
  812. /PSL_A0_y 0 def
  813. /PSL_A1_y 0 def
  814. 25 W
  815. 0 0 M 4800 0 D S
  816. 8 W
  817. /PSL_LH 0 def /PSL_L_y PSL_A0_y PSL_A1_y mx def
  818. 0 6000 T
  819. /MM {M} def
  820. /PSL_A0_y 0 def
  821. /PSL_A1_y 0 def
  822. 25 W
  823. 0 0 M 4800 0 D S
  824. 8 W
  825. /PSL_LH 0 def /PSL_L_y PSL_A0_y PSL_A1_y mx def
  826. 0 -6000 T
  827. 0 setlinecap
  828. 4 W
  829. {0 0 1 C} FS
  830. O1
  831. {0 0 0.976 C} FS
  832. PSL_GPP setmatrix [0.422618 0.519837 0 0.819152 3262.71 290.885] concat
  833. 2400 1200 1200 0 Sb
  834. {0.45 0.45 1 C} FS
  835. PSL_GPP setmatrix [0.906308 -0.242404 0 0.819152 507.142 1787.34] concat
  836. 2400 1200 2400 0 Sb
  837. {0.245 0.245 1 C} FS
  838. PSL_GPP setmatrix [0.906308 -0.242404 0.422618 0.519837 -0 3129.5] concat
  839. 1200 1200 2400 1200 Sb
  840. {1 0 0 C} FS
  841. {0.976 0 0 C} FS
  842. PSL_GPP setmatrix [0.422618 0.519837 0 0.819152 3262.71 290.885] concat
  843. 1200 1200 1200 3000 Sb
  844. {1 0.45 0.45 C} FS
  845. PSL_GPP setmatrix [0.906308 -0.242404 0 0.819152 507.142 1787.34] concat
  846. 1200 1200 2400 3000 Sb
  847. {1 0.245 0.245 C} FS
  848. PSL_GPP setmatrix [0.906308 -0.242404 0.422618 0.519837 -0 4603.98] concat
  849. 1200 1200 2400 1200 Sb
  850. PSL_GPP setmatrix
  851. %%PageTrailer
  852. U
  853. showpage
  854. %%Trailer
  855. end
  856. %%EOF
Tip!

Press p or to see the previous file or, n or to see the next file

Comments

Loading...