forked from jrincayc/ucblogo-code
-
Notifications
You must be signed in to change notification settings - Fork 0
/
evaluator.ps
5846 lines (5584 loc) · 126 KB
/
evaluator.ps
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
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
%!PS-Adobe-2.0
%%Creator: dvips(k) 5.86 Copyright 1999 Radical Eye Software
%%Title: eva.dvi
%%Pages: 1
%%PageOrder: Ascend
%%BoundingBox: 0 0 596 842
%%EndComments
%DVIPSWebPage: (www.radicaleye.com)
%DVIPSCommandLine: dvips eva.dvi -o eva.ps
%DVIPSParameters: dpi=600, compressed
%DVIPSSource: TeX output 2002.08.20:1238
%%BeginProcSet: texc.pro
%!
/TeXDict 300 dict def TeXDict begin/N{def}def/B{bind def}N/S{exch}N/X{S
N}B/A{dup}B/TR{translate}N/isls false N/vsize 11 72 mul N/hsize 8.5 72
mul N/landplus90{false}def/@rigin{isls{[0 landplus90{1 -1}{-1 1}ifelse 0
0 0]concat}if 72 Resolution div 72 VResolution div neg scale isls{
landplus90{VResolution 72 div vsize mul 0 exch}{Resolution -72 div hsize
mul 0}ifelse TR}if Resolution VResolution vsize -72 div 1 add mul TR[
matrix currentmatrix{A A round sub abs 0.00001 lt{round}if}forall round
exch round exch]setmatrix}N/@landscape{/isls true N}B/@manualfeed{
statusdict/manualfeed true put}B/@copies{/#copies X}B/FMat[1 0 0 -1 0 0]
N/FBB[0 0 0 0]N/nn 0 N/IEn 0 N/ctr 0 N/df-tail{/nn 8 dict N nn begin
/FontType 3 N/FontMatrix fntrx N/FontBBox FBB N string/base X array
/BitMaps X/BuildChar{CharBuilder}N/Encoding IEn N end A{/foo setfont}2
array copy cvx N load 0 nn put/ctr 0 N[}B/sf 0 N/df{/sf 1 N/fntrx FMat N
df-tail}B/dfs{div/sf X/fntrx[sf 0 0 sf neg 0 0]N df-tail}B/E{pop nn A
definefont setfont}B/Cw{Cd A length 5 sub get}B/Ch{Cd A length 4 sub get
}B/Cx{128 Cd A length 3 sub get sub}B/Cy{Cd A length 2 sub get 127 sub}
B/Cdx{Cd A length 1 sub get}B/Ci{Cd A type/stringtype ne{ctr get/ctr ctr
1 add N}if}B/id 0 N/rw 0 N/rc 0 N/gp 0 N/cp 0 N/G 0 N/CharBuilder{save 3
1 roll S A/base get 2 index get S/BitMaps get S get/Cd X pop/ctr 0 N Cdx
0 Cx Cy Ch sub Cx Cw add Cy setcachedevice Cw Ch true[1 0 0 -1 -.1 Cx
sub Cy .1 sub]/id Ci N/rw Cw 7 add 8 idiv string N/rc 0 N/gp 0 N/cp 0 N{
rc 0 ne{rc 1 sub/rc X rw}{G}ifelse}imagemask restore}B/G{{id gp get/gp
gp 1 add N A 18 mod S 18 idiv pl S get exec}loop}B/adv{cp add/cp X}B
/chg{rw cp id gp 4 index getinterval putinterval A gp add/gp X adv}B/nd{
/cp 0 N rw exit}B/lsh{rw cp 2 copy get A 0 eq{pop 1}{A 255 eq{pop 254}{
A A add 255 and S 1 and or}ifelse}ifelse put 1 adv}B/rsh{rw cp 2 copy
get A 0 eq{pop 128}{A 255 eq{pop 127}{A 2 idiv S 128 and or}ifelse}
ifelse put 1 adv}B/clr{rw cp 2 index string putinterval adv}B/set{rw cp
fillstr 0 4 index getinterval putinterval adv}B/fillstr 18 string 0 1 17
{2 copy 255 put pop}for N/pl[{adv 1 chg}{adv 1 chg nd}{1 add chg}{1 add
chg nd}{adv lsh}{adv lsh nd}{adv rsh}{adv rsh nd}{1 add adv}{/rc X nd}{
1 add set}{1 add clr}{adv 2 chg}{adv 2 chg nd}{pop nd}]A{bind pop}
forall N/D{/cc X A type/stringtype ne{]}if nn/base get cc ctr put nn
/BitMaps get S ctr S sf 1 ne{A A length 1 sub A 2 index S get sf div put
}if put/ctr ctr 1 add N}B/I{cc 1 add D}B/bop{userdict/bop-hook known{
bop-hook}if/SI save N @rigin 0 0 moveto/V matrix currentmatrix A 1 get A
mul exch 0 get A mul add .99 lt{/QV}{/RV}ifelse load def pop pop}N/eop{
SI restore userdict/eop-hook known{eop-hook}if showpage}N/@start{
userdict/start-hook known{start-hook}if pop/VResolution X/Resolution X
1000 div/DVImag X/IEn 256 array N 2 string 0 1 255{IEn S A 360 add 36 4
index cvrs cvn put}for pop 65781.76 div/vsize X 65781.76 div/hsize X}N
/p{show}N/RMat[1 0 0 -1 0 0]N/BDot 260 string N/Rx 0 N/Ry 0 N/V{}B/RV/v{
/Ry X/Rx X V}B statusdict begin/product where{pop false[(Display)(NeXT)
(LaserWriter 16/600)]{A length product length le{A length product exch 0
exch getinterval eq{pop true exit}if}{pop}ifelse}forall}{false}ifelse
end{{gsave TR -.1 .1 TR 1 1 scale Rx Ry false RMat{BDot}imagemask
grestore}}{{gsave TR -.1 .1 TR Rx Ry scale 1 1 false RMat{BDot}
imagemask grestore}}ifelse B/QV{gsave newpath transform round exch round
exch itransform moveto Rx 0 rlineto 0 Ry neg rlineto Rx neg 0 rlineto
fill grestore}B/a{moveto}B/delta 0 N/tail{A/delta X 0 rmoveto}B/M{S p
delta add tail}B/b{S p tail}B/c{-4 M}B/d{-3 M}B/e{-2 M}B/f{-1 M}B/g{0 M}
B/h{1 M}B/i{2 M}B/j{3 M}B/k{4 M}B/w{0 rmoveto}B/l{p -4 w}B/m{p -3 w}B/n{
p -2 w}B/o{p -1 w}B/q{p 1 w}B/r{p 2 w}B/s{p 3 w}B/t{p 4 w}B/x{0 S
rmoveto}B/y{3 2 roll p a}B/bos{/SS save N}B/eos{SS restore}B end
%%EndProcSet
%%BeginProcSet: special.pro
%!
TeXDict begin/SDict 200 dict N SDict begin/@SpecialDefaults{/hs 612 N
/vs 792 N/ho 0 N/vo 0 N/hsc 1 N/vsc 1 N/ang 0 N/CLIP 0 N/rwiSeen false N
/rhiSeen false N/letter{}N/note{}N/a4{}N/legal{}N}B/@scaleunit 100 N
/@hscale{@scaleunit div/hsc X}B/@vscale{@scaleunit div/vsc X}B/@hsize{
/hs X/CLIP 1 N}B/@vsize{/vs X/CLIP 1 N}B/@clip{/CLIP 2 N}B/@hoffset{/ho
X}B/@voffset{/vo X}B/@angle{/ang X}B/@rwi{10 div/rwi X/rwiSeen true N}B
/@rhi{10 div/rhi X/rhiSeen true N}B/@llx{/llx X}B/@lly{/lly X}B/@urx{
/urx X}B/@ury{/ury X}B/magscale true def end/@MacSetUp{userdict/md known
{userdict/md get type/dicttype eq{userdict begin md length 10 add md
maxlength ge{/md md dup length 20 add dict copy def}if end md begin
/letter{}N/note{}N/legal{}N/od{txpose 1 0 mtx defaultmatrix dtransform S
atan/pa X newpath clippath mark{transform{itransform moveto}}{transform{
itransform lineto}}{6 -2 roll transform 6 -2 roll transform 6 -2 roll
transform{itransform 6 2 roll itransform 6 2 roll itransform 6 2 roll
curveto}}{{closepath}}pathforall newpath counttomark array astore/gc xdf
pop ct 39 0 put 10 fz 0 fs 2 F/|______Courier fnt invertflag{PaintBlack}
if}N/txpose{pxs pys scale ppr aload pop por{noflips{pop S neg S TR pop 1
-1 scale}if xflip yflip and{pop S neg S TR 180 rotate 1 -1 scale ppr 3
get ppr 1 get neg sub neg ppr 2 get ppr 0 get neg sub neg TR}if xflip
yflip not and{pop S neg S TR pop 180 rotate ppr 3 get ppr 1 get neg sub
neg 0 TR}if yflip xflip not and{ppr 1 get neg ppr 0 get neg TR}if}{
noflips{TR pop pop 270 rotate 1 -1 scale}if xflip yflip and{TR pop pop
90 rotate 1 -1 scale ppr 3 get ppr 1 get neg sub neg ppr 2 get ppr 0 get
neg sub neg TR}if xflip yflip not and{TR pop pop 90 rotate ppr 3 get ppr
1 get neg sub neg 0 TR}if yflip xflip not and{TR pop pop 270 rotate ppr
2 get ppr 0 get neg sub neg 0 S TR}if}ifelse scaleby96{ppr aload pop 4
-1 roll add 2 div 3 1 roll add 2 div 2 copy TR .96 dup scale neg S neg S
TR}if}N/cp{pop pop showpage pm restore}N end}if}if}N/normalscale{
Resolution 72 div VResolution 72 div neg scale magscale{DVImag dup scale
}if 0 setgray}N/psfts{S 65781.76 div N}N/startTexFig{/psf$SavedState
save N userdict maxlength dict begin/magscale true def normalscale
currentpoint TR/psf$ury psfts/psf$urx psfts/psf$lly psfts/psf$llx psfts
/psf$y psfts/psf$x psfts currentpoint/psf$cy X/psf$cx X/psf$sx psf$x
psf$urx psf$llx sub div N/psf$sy psf$y psf$ury psf$lly sub div N psf$sx
psf$sy scale psf$cx psf$sx div psf$llx sub psf$cy psf$sy div psf$ury sub
TR/showpage{}N/erasepage{}N/copypage{}N/p 3 def @MacSetUp}N/doclip{
psf$llx psf$lly psf$urx psf$ury currentpoint 6 2 roll newpath 4 copy 4 2
roll moveto 6 -1 roll S lineto S lineto S lineto closepath clip newpath
moveto}N/endTexFig{end psf$SavedState restore}N/@beginspecial{SDict
begin/SpecialSave save N gsave normalscale currentpoint TR
@SpecialDefaults count/ocount X/dcount countdictstack N}N/@setspecial{
CLIP 1 eq{newpath 0 0 moveto hs 0 rlineto 0 vs rlineto hs neg 0 rlineto
closepath clip}if ho vo TR hsc vsc scale ang rotate rwiSeen{rwi urx llx
sub div rhiSeen{rhi ury lly sub div}{dup}ifelse scale llx neg lly neg TR
}{rhiSeen{rhi ury lly sub div dup scale llx neg lly neg TR}if}ifelse
CLIP 2 eq{newpath llx lly moveto urx lly lineto urx ury lineto llx ury
lineto closepath clip}if/showpage{}N/erasepage{}N/copypage{}N newpath}N
/@endspecial{count ocount sub{pop}repeat countdictstack dcount sub{end}
repeat grestore SpecialSave restore end}N/@defspecial{SDict begin}N
/@fedspecial{end}B/li{lineto}B/rl{rlineto}B/rc{rcurveto}B/np{/SaveX
currentpoint/SaveY X N 1 setlinecap newpath}N/st{stroke SaveX SaveY
moveto}N/fil{fill SaveX SaveY moveto}N/ellipse{/endangle X/startangle X
/yrad X/xrad X/savematrix matrix currentmatrix N TR xrad yrad scale 0 0
1 startangle endangle arc savematrix setmatrix}N end
%%EndProcSet
TeXDict begin 39158280 55380996 1000 600 600 (eva.dvi)
@start
%DVIPSBitmapFont: Fa cmr10 10 1
/Fa 1 50 df<EB01C013031307131F13FFB5FCA2131F1200B3B3A8497E007FB512F0A31C
3879B72A>49 D E
%EndDVIPSBitmapFont
end
%%EndProlog
%%BeginSetup
%%Feature: *Resolution 600dpi
TeXDict begin
%%PaperSize: A4
%%EndSetup
%%Page: 1 1
1 0 bop -630 6302 a @beginspecial 0 @llx 0 @lly 604 @urx
767 @ury 6040 @rwi @setspecial
%%BeginDocument: evaluator.eps
%!PS-Adobe-2.0 EPSF-2.0
%%DocumentFonts: Times-Roman
%%+ Times-Bold
%%+ Symbol
%%BoundingBox: 0 0 604 767
%%Title:evaluator.eps
%%Creator:
%%CreationDate:
%%EndComments
%%BeginProcSet: BeachHead 2 3
%%BeachHead - v2.3 Copyright 1991-1993 Silicon Beach Software, inc.
userdict /BeachHead known userdict begin /BeachHead 140 dict def BeachHead end begin /ta exch def /BeachHead_version 2 def /isWinPS false def /c 75 string def /sa 75 string def /f false def /g false def /h false def /i false def
/n true def /k 0.015 def /oldmatrix 6 array def
/newmatrix 6 array def /_doTexturePat false def /_strtxtmatrix null def /nulld { counttomark {null def} repeat pop } bind def mark
/l /m /o /q /r /u /v /w /_cwidths /wa
/x /y /z /A /B /D /E/F /G /H /I /J /K /M /N /O /P /Q /R /S /T /V /W /X /Y /ba /ca /da /ea /fa /ga
/ha /ia /ja /ka ta not{/la /ma}if /_strtxtmatrix nulld /ra 256 array def
ra dup dup 0 /Times-Roman findfont /Encoding get 0 128 getinterval putinterval
39 /quotesingle put 96 /grave put /Adieresis/Aring/Ccedilla/Eacute/Ntilde/Odieresis
/Udieresis/aacute/agrave/acircumflex/adieresis/atilde/aring/ccedilla/eacute/egrave
/ecircumflex/edieresis/iacute/igrave/icircumflex/idieresis/ntilde/oacute/ograve
/ocircumflex/odieresis/otilde/uacute/ugrave/ucircumflex/udieresis/dagger/degree/cent
/sterling/section/bullet/paragraph/germandbls/registered/copyright/trademark/acute
/dieresis/notequal/AE/Oslash/infinity/plusminus/lessequal/greaterequal/yen/mu/partialdiff
/summation/product/pi/integral/ordfeminine/ordmasculine/Omega/ae/oslash/questiondown
/exclamdown/logicalnot/radical/florin/approxequal/Delta/guillemotleft/guillemotright
/ellipsis/blank/Agrave/Atilde/Otilde/OE/oe/endash/emdash/quotedblleft/quotedblright
/quoteleft/quoteright/divide/lozenge/ydieresis/Ydieresis/fraction/currency/guilsinglleft
/guilsinglright/fi/fl/daggerdbl/periodcentered/quotesinglbase/quotedblbase/perthousand
/Acircumflex/Ecircumflex/Aacute/Edieresis/Egrave/Iacute/Icircumflex/Idieresis/Igrave
/Oacute/Ocircumflex/apple/Ograve/Uacute/Ucircumflex/Ugrave/dotlessi/circumflex/tilde
/macron/breve/dotaccent/ring/cedilla/hungarumlaut/ogonek/caron
ra 128 128 getinterval astore pop /va 256 array def ra va copy pop va 15{dup}repeat 161 /ring put 178 /Scaron put 182 /eth put 184 /Thorn put 185 /thorn put 195 /scaron put 198 /Eth put 222 /hyphen put 223 /twosuperior put 225 /threesuperior put 240 /onequarter put 249 /onehalf put 250 /periodcentered put 252 /cedilla put 253 /multiply put 254 /Yacute put version cvr 51 ge { va 245 /onesuperior put va 251 /threequarters put va 255 /yacute put } if /d { 0 1 74 { c exch 0 put } for dup c cvs pop c } bind def /qa { 0 1 74 { sa exch 0 put } for dup sa cvs pop sa 74 1 put } bind def /e { d 74 2 put } bind def /addoblique { /g true def } bind def /addheavy { /f true def } bind def /adduline { /h true def } bind def /findshadowfont { findoutlinefont BeachHead /i true put BeachHead /n true put } bind def /findoutlinefont { findbeachheadfont gof /n true def } bind def /findbeachheadfont { /f false def /g false def
/h false def /i false def dup findfont dup /FontType get 0 ne { /Encoding get dup 161 get exch 162 get /cent eq exch /exclamdown eq and { userdict /BeachHead get begin qa FontDirectory sa known { pop sa findfont } { findfont dup length 1 add dict /o exch def { 1 index /FID ne 2 index /UniqueID ne and { o 3 1 roll put } { pop pop } ifelse
} forall /FontName sa dup length string copy def
o /Encoding isWinPS {va}{ra} ifelse put sa o definefont } ifelse end }{ findfont } ifelse }{ exch pop } ifelse } bind def /gof { userdict /BeachHead get begin dup /FontName get e FontDirectory c known { pop pop c findfont } { exch dup /FontType get 0 eq { dup maxlength 2 add dict begin { 1 index /FID ne 2 index /UniqueID ne and {def} {pop pop} ifelse }forall currentdict end dup dup /FDepVector get [ exch {gof} forall ] /FDepVector exch put exch e pop c exch definefont } { 12 dict begin dup /l exch def /FontType 3 def /FontMatrix [1 0 0 1 0 0] def /FontBBox [0 0 1 1] def /Encoding 256 array def
0 1 255 {Encoding exch /.notdef put} for dup exch maxlength 2 add dict begin { 1 index /FID ne 2 index /UniqueID ne and {def} {pop pop} ifelse }forall /PaintType 2 def /StrokeWidth 1 0 FontMatrix dtransform dup mul exch dup mul add sqrt .012 exch div def currentdict end /_dummy exch definefont /r exch def /m 1 string def /FontType 3 def /BuildChar { exch begin m 0 3 -1 roll put r setfont m stringwidth setcharwidth l setfont i { .05 -.05 moveto m show } if n { reversecolor 0 0 moveto m show reversecolor } if r setfont 0 0 moveto m show end } bind def currentdict end exch e pop c exch definefont } ifelse } ifelse end } bind def /EPSBegin { save userdict /BeachHead get begin /la exch def count /ma exch def end userdict /showpage {} put 0 setgray 0 setlinecap 1 setlinewidth
0 setlinejoin 10 setmiterlimit [] 0 setdash newpath } bind def /EPSEnd { userdict /BeachHead get begin count ma sub dup 0 gt {{pop}repeat} {pop}ifelse la end restore } bind def /cimage { userdict /BeachHead get begin { {readstring} } { {readhexstring} } ifelse /u exch def /colorimage where { pop 4 index dup string /v exch def dup string /w exch def dup string /x exch def dup string /y exch def string /z exch def { currentfile v u pop } { currentfile w u pop } { currentfile x u pop } { currentfile y u pop currentfile z u pop pop } 5 -1 roll { true 4 A } { true 4 /colorimage load exec } ifelse } { 4 index dup string /z exch def 4 mul string /B exch def { currentfile B u pop pop currentfile z u pop } exch { transimage } { /image load exec } ifelse } ifelse end } bind def /bhshow { userdict /BeachHead get begin h { gsave dup stringwidth pop (_) stringwidth pop div 1 scale currentpoint (_) show moveto grestore } if gsave
g { [1 0 .17 1 0 0] concat } if f { /_x1 12 k mul def /_y1 12 k mul def currentpoint 3 copy _y1 add exch _x1 add exch moveto show 3 copy _y1 add exch _x1 sub exch moveto show 3 copy _y1 sub exch _x1 add exch moveto show 3 copy _y1 sub exch _x1 sub exch moveto show moveto } if show grestore end } bind def /C { D { gsave E F 3 index idtransform translate G 1 4 index 4 index {H} /image load exec grestore /I 0 def /G 0 def /D false def } if } bind def /transimage { userdict /BeachHead get begin 2 index 8 ne { /image load exec } { 4 index cvi string /H exch def /J 0 string def /K 0 def /D false def /I 0 def /G 0 def 0 1 5 index 1 sub { /F exch def 0 1 6 index 1 sub { K J length ge { 1 index dup type /stringtype ne { exec } if /J exch def /K 0 def } if J K get /K K 1 add def dup 255 eq { pop pop C } { H I 3 -1 roll put /I I 1 add def /G G 1 add def D not { /E exch def /G 1 def /D true def } { pop } ifelse } ifelse } for C } for 5{pop}repeat } ifelse end } bind def
/L { D { gsave E F 8 index idtransform translate I 1 8 9 index {M} {N} {O} {P} true 4 /colorimage load exec grestore /I 0 def /D false def } if } bind def /A { 9 index cvi dup string /M exch def dup string /N exch def dup string /O exch def string /P exch def /Q 0 string def /K 0 def /D false def /I 0 def /G 0 def 0 1 10 index 1 sub { /F exch def 0 1 11 index 1 sub { K Q length ge { 6 index exec /R exch def 5 index exec /S exch def 4 index exec /T exch def 3 index exec /Q exch def /K 0 def } if R K get S K get T K get Q K get /K K 1 add def dup 0 eq 2 index 0 eq and 3 index 0 eq and 4 index 0 eq and { 5{pop}repeat L } { M I 6 -1 roll put N I 5 -1 roll put O I 4 -1 roll put P I 3 -1 roll put /I I 1 add def D not { /E exch def /D true def } { pop } ifelse } ifelse } for L } for
10{pop}repeat } bind def /bps 8 string def /bpm [8 0 0 8 0 0] def /bpp { bps } def /overlaybackpat { userdict /BeachHead get begin gsave setrgbcolor bps copy pop dup 0 get 8 div floor cvi 8 mul 1 index 2 get 8 div floor cvi 8 mul 2 index 1 get 8 div floor cvi 8 mul 8 4 index 3 get 8 div floor cvi 8 mul { 2 index 8 3 index { 1 index gsave translate 8 8 scale 8 8 false bpm /bpp load imagemask grestore } for pop } for pop pop pop grestore end } bind def /U { userdict /BeachHead get begin /V exch def /W exch def countdictstack save V 2 add 2 roll count V sub /X exch def /W load end { exec } stopped userdict /BeachHead get begin
/Y exch def count X sub { pop } repeat Y 3 1 roll restore countdictstack exch sub { end } repeat end } bind def /Z ( ) def /aa { moveto { ba setfont Z end gsave 0 setgray stringwidth grestore userdict /BeachHead get begin rmoveto /ca load null ne { /da da 1 add def da ea length 1 sub le { fa ea da get ca } if } { ax ay rmoveto fa ga eq { cx cy rmoveto } if } ifelse } stopped
currentdict userdict /BeachHead get ne { userdict /BeachHead get begin }if } bind def /filltextpath2 { userdict /BeachHead get begin /p exch def /s exch def /ea exch def /fillProc exch def /ia exch def currentpoint ia i and { ea s p krnshow } if moveto i /i false def currentpoint /m 1 string def /ya 0 def /t 0 def /za 0 def ea { m 0 3 -1 roll put newpath t za moveto m true charpath fillProc
t s ya get add /t exch def ya 1 add /ya exch def za s ya get add /za exch def ya 1 add /ya exch def } forall moveto /i exch def ia { n i /n false def /i false def ea s p krnshow /i exch def /n exch def } if end } bind def /filltextpath { userdict /BeachHead get begin /ea exch def
dup type dup /integertype eq exch /realtype eq or { /ay exch def /ax exch def /ga exch def /cy exch def /cx exch def /ca null def } { /wa 0 def /ca exch def } ifelse /ha exch def /ia exch def ia { i get { gsave 0 setgray /ca load null ne { /ca load ea kshow /wa 0 def } { cx cy ga ax ay ea awidthshow } ifelse grestore } if } if gsave currentfont ia { begin r FontMatrix makefont l FontMatrix makefont end } { null exch } ifelse /ja exch def /ka exch def /ba currentfont def _doTexturePat { systemdict /makepattern known } { false }ifelse { matrix currentmatrix _strtxtmatrix null ne { _strtxtmatrix setmatrix } if 1 -1 scale txTrnsX txTrnsY translate settexturepat setmatrix /da 0 def ea { /fa exch def Z 0 fa put ja setfont currentpoint Z show aa {exit} if } forall } { 10 setlinewidth /da 0 def currentpoint newpath 0 dup dup dup moveto lineto closepath moveto ea { /fa exch def Z 0 fa put currentpoint ja setfont count 1 add dup 1 roll Z true { charpath } stopped count count -1 roll sub { pop } repeat currentpoint {ha} 0 U pop
newpath 0 dup dup dup moveto lineto closepath moveto aa {exit} if } forall } ifelse grestore ka null ne { /wa 0 def gsave 0 setgray /da 0 def ea { /fa exch def Z 0 fa put ka setfont currentpoint Z show aa {exit} if } forall grestore } if /_doTexturePat false def /_strtxtmatrix null def end } bind def /reversecolor { 1 currentrgbcolor 1 index eq 3 1 roll eq and { currentgray sub } if setgray } bind def /ftpkproc { pop Z 0 3 -1 roll put Z stringwidth neg exch neg exch rmoveto userdict /BeachHead get begin _cwidths wa get /wa wa 1 add def _cwidths wa get /wa wa 1 add def rmoveto end } bind def /xa { userdict /BeachHead get begin pop pop Z 0 3 -1 roll put currentpoint Z bhshow moveto _cwidths pa get /pa pa 1 add def _cwidths pa get /pa pa 1 add def rmoveto end } bind def /na[256{0}repeat]def mark 161 176 173 185 176 165 177 177 178 163 179 179 181 109 182 182 183 229 184 213 185 112 186 242 189 87 195 214 197 187 198 68 214 184 215 224 240 240
counttomark 2 div cvi {na 3 1 roll put} repeat pop /krnshow
{ dup type dup /integertype ne exch /realtype ne and {12} if /Symbol findfont exch scalefont /oa exch def /ua currentfont def /pa 0 def systemdict /cshow known currentfont /FontType get 0 eq and { /_cwidths exch def /xa load cshow } { exch userdict /BeachHead get begin h { /h false def gsave dup stringwidth pop (_) stringwidth pop div 1 scale currentpoint (_) show moveto grestore } if end { dup na exch get dup 0 eq isWinPS or { pop Z 0 3 -1 roll put currentpoint Z userdict begin bhshow end moveto } { oa setfont Z 0 3 -1 roll put currentpoint Z bhshow moveto ua setfont pop } ifelse dup pa get /pa pa 1 add def 1 index pa get /pa pa 1 add def rmoveto } forall pop } ifelse } bind def /setcmykcolor where { pop /bhsetcmykcolor/setcmykcolor load def } { /bhsetcmykcolor { 4 1 roll 3{ 3 index add neg 1 add dup 0 lt {pop 0}if 3 1 roll }repeat setrgbcolor pop }bind def }ifelse end
%%EndProcSet
%%BeginProcSet: gr_id 2 0
% gr_id - v2 - Copyright 1993 Silicon Beach Software, Inc.
userdict /gr_id known not { userdict begin /gr_id 100 dict def /gr_idb {gr_id begin} bind def /gr_e {end end} bind def gr_idb
/nulld { counttomark {null def} repeat pop } bind def mark
/a /b /c /d /e /f /g /h /i /j /k /l /m /n /o /p /q /r /s /t /u /v /w /x /y /z /A /B /C /D /E /F /G /H /I /J /K /L /M nulld
/bd {bind def} bind def /g_ea [] def /g_mg 60 def /g_xg 250 def /setcmykcolor where { pop /bhsetcmykcolor/setcmykcolor load def } { /bhsetcmykcolor { 4 1 roll 3{ 3 index add neg 1 add dup 0 lt {pop 0}if 3 1 roll }repeat setrgbcolor pop }bind def }ifelse /g_ss { currentscreen /scrnproc exch def /scrnangle exch def
/scrnfreq exch def /scrnproc load type dup /arraytype eq exch /packedarraytype eq or
{ /g_ng 72 scrnfreq div dup matrix defaultmatrix dtransform mul abs def g_ng g_mg lt {
/scrnfreq scrnfreq g_mg g_ng div sqrt div def
scrnfreq scrnangle /scrnproc load setscreen /g_ng g_mg def } if g_ng g_xg gt { /g_ng g_xg def } if } { /g_ng g_xg def
} ifelse g_ea 0 setdash } bd /g_lf { gsave /noeoclip exch def dup /y1b exch def /y2b exch def dup /x2t exch def /x2b exch def dup /y1t exch def /y2t exch def dup /x1t exch def /x1b exch def /filloff exch def /filldir exch def /colorlist exch def noeoclip { clip } { eoclip } ifelse
newpath g_ss filldir 0 eq { filloff 0 lt { x1t filloff add /x1t exch def x2b filloff sub /x2b exch def } { x1b filloff sub /x1b exch def x2t filloff add /x2t exch def } ifelse /x1start x1t def /y1start y1t def /x2start x1b def /y2start y1b def /xdist x2t x1t sub def /ydist 0 def } { filloff 0 lt { y2t filloff add /y2t exch def y1b filloff sub /y1b exch def } { y1t filloff sub /y1t exch def y2b filloff add /y2b exch def } ifelse /x1start x1t def /y1start y1t def /x2start x2t def /y2start y2t def /xdist 0 def
/ydist y1b y1t sub def } ifelse colorlist { /colorrec exch def colorrec 0 get /cmykStart exch def colorrec 1 get /cmykEnd exch def
colorrec 2 get /ramppercent exch def /cStart cmykStart 0 get def /mStart cmykStart 1 get def /yStart cmykStart 2 get def
/kStart cmykStart 3 get def /cInc cmykEnd 0 get cStart sub g_ng div def
/mInc cmykEnd 1 get mStart sub g_ng div def
/yInc cmykEnd 2 get yStart sub g_ng div def
/kInc cmykEnd 3 get kStart sub g_ng div def /xinc xdist ramppercent mul g_ng div def
/yinc ydist ramppercent mul g_ng div def xinc yinc gt {xinc}{yinc}ifelse setlinewidth
newpath 0 1 g_ng { pop cStart mStart yStart kStart bhsetcmykcolor newpath x1start y1start moveto x2start y2start lineto stroke cStart cInc add /cStart exch def mStart mInc add /mStart exch def yStart yInc add /yStart exch def
kStart kInc add /kStart exch def x1start xinc add /x1start exch def y1start yinc add /y1start exch def x2start xinc add /x2start exch def
y2start yinc add /y2start exch def } for } forall grestore } bd /g_bf { true g_f } bd /g_cf { false g_f } bd /g_f { gsave /doBoxFill exch def /noeoclip exch def /y2 exch def /x2 exch def /y1 exch def /x1 exch def /yoff exch def /xoff exch def /colorlist exch def noeoclip { clip } { eoclip } ifelse
newpath g_ss /centerX x2 x1 add 2 div xoff add def
/centerY y2 y1 add 2 div yoff add def /boxRadX centerX dup x1 exch sub abs exch x2 exch sub abs
2 copy lt {exch} if pop def /boxRadY centerY dup y1 exch sub abs exch y2 exch sub abs
2 copy lt {exch} if pop def centerX dup boxRadX sub /x1 exch def boxRadX add /x2 exch def centerY dup boxRadY sub /y1 exch def
boxRadY add /y2 exch def colorlist { /colorrec exch def colorrec 0 get /cmykStart exch def colorrec 1 get /cmykEnd exch def
colorrec 2 get /ramppercent exch def /cStart cmykStart 0 get def /mStart cmykStart 1 get def /yStart cmykStart 2 get def
/kStart cmykStart 3 get def /cInc cmykEnd 0 get cStart sub g_ng div def
/mInc cmykEnd 1 get mStart sub g_ng div def
/yInc cmykEnd 2 get yStart sub g_ng div def
/kInc cmykEnd 3 get kStart sub g_ng div def /brwidthY boxRadY ramppercent mul g_ng div def
/brwidthX boxRadX ramppercent mul g_ng div def 0 1 g_ng { pop cStart mStart yStart kStart bhsetcmykcolor doBoxFill { newpath x1 y1 moveto x2 y1 lineto x2 y2 lineto x1 y2 lineto closepath fill } { gsave newpath centerX centerY translate x2 centerX sub y2 centerY sub
scale 0 0 1.4142 0 360 arc fill grestore } ifelse cStart cInc add /cStart exch def mStart mInc add /mStart exch def yStart yInc add /yStart exch def
kStart kInc add /kStart exch def x1 brwidthX add /x1 exch def y1 brwidthY add /y1 exch def x2 brwidthX sub /x2 exch def
y2 brwidthY sub /y2 exch def } for } forall grestore } bd /g_cvf { gsave /noeoclip exch def pop pop pop pop pop /dist exch def /colorlist exch def noeoclip { clip } { eoclip
} ifelse g_ss g_c dist mul 72 div dup g_ng gt {pop}{/g_ng exch def} ifelse
/g_ng g_ng round def /lwidth dist 2 mul def colorlist length 1 sub -1 0 { colorlist exch get /colorrec exch def colorrec 0 get /cmykEnd exch def colorrec 1 get /cmykStart exch def
colorrec 2 get /ramppercent exch def /cStart cmykStart 0 get def /mStart cmykStart 1 get def /yStart cmykStart 2 get def
/kStart cmykStart 3 get def /cInc cmykEnd 0 get cStart sub g_ng div def
/mInc cmykEnd 1 get mStart sub g_ng div def
/yInc cmykEnd 2 get yStart sub g_ng div def
/kInc cmykEnd 3 get kStart sub g_ng div def /ldec dist ramppercent mul g_ng div 2 mul def 0 1 g_ng { pop cStart mStart yStart kStart bhsetcmykcolor lwidth setlinewidth gsave
firstfill {fill /firstfill false def}{stroke} ifelse
grestore cStart cInc add /cStart exch def mStart mInc add /mStart exch def yStart yInc add /yStart exch def
kStart kInc add /kStart exch def /lwidth lwidth ldec sub def
lwidth 0.001 le { /lwidth 0.001 def } if } for } for grestore } bd gr_e } if
%%EndProcSet
BeachHead begin/isWinPS false def end
1 setflat
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-100.864 -50.7439 moveto
-100.864 -61.9913 lineto
-130.865 -61.9913 lineto
-130.865 -76.9656 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-100.864 -47.1078 moveto
-97.7741 -54.8347 lineto
-99.1074 -55.1982 -100.138 -55.3799 -100.864 -55.3799 curveto
-101.591 -55.3799 -102.621 -55.1982 -103.955 -54.8347 curveto
-100.864 -47.1078 lineto
-100.864 -47.1078 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-178.38 -365.522 moveto
-188.679 -365.522 lineto
-188.679 48.4929 lineto
-202.706 48.4929 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-174.743 -365.522 moveto
-182.47 -368.612 lineto
-182.834 -367.279 -183.016 -366.249 -183.016 -365.522 curveto
-183.016 -364.795 -182.834 -363.765 -182.47 -362.432 curveto
-174.743 -365.522 lineto
-174.743 -365.522 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-266.48 -321.804 moveto
-216.373 -321.804 lineto
-216.373 -303.225 lineto
-266.48 -303.225 lineto
-266.48 -321.804 lineto
closepath
grestore
gsave
gsave
%IncludeFont: Times-Roman
userdict begin BeachHead end begin
[1 0 0 -1 49.251 700.106] concat
/Times-Roman findbeachheadfont 10.00 scalefont setfont
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0 8.13782 moveto
[1 0 0 -1 0 0] concat
(Begin-Seq)
[6.66 0
4.43 0
4.99 0
2.77 0
4.99 0
3.32 0
5.55 0
4.43 0
4.99 0
]
10.00 krnshow
end
grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-201.425 -335.015 moveto
-201.425 -290.014 lineto
-281.427 -290.014 lineto
-281.427 -319.015 lineto
-266.427 -335.015 lineto
-201.425 -335.015 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.25 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-241.426 -274.741 moveto
-241.426 -290.014 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-241.426 -271.104 moveto
-238.336 -278.831 lineto
-239.669 -279.195 -240.699 -279.377 -241.426 -279.377 curveto
-242.153 -279.377 -243.183 -279.195 -244.516 -278.831 curveto
-241.426 -271.104 lineto
-241.426 -271.104 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-241.426 -338.742 moveto
-241.426 -354.022 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-241.426 -335.106 moveto
-238.336 -342.833 lineto
-239.669 -343.197 -240.699 -343.378 -241.426 -343.378 curveto
-242.153 -343.378 -243.183 -343.197 -244.516 -342.833 curveto
-241.426 -335.106 lineto
-241.426 -335.106 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-264.81 -376.811 moveto
-218.042 -376.811 lineto
-218.042 -358.232 lineto
-264.81 -358.232 lineto
-264.81 -376.811 lineto
closepath
grestore
gsave
gsave
%IncludeFont: Times-Roman
userdict begin BeachHead end begin
[1 0 0 -1 50.92 755.113] concat
/Times-Roman findbeachheadfont 10.00 scalefont setfont
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0 8.13782 moveto
[1 0 0 -1 0 0] concat
(Evaluator)
[6.10 0
4.99 0
4.43 0
2.77 0
4.99 0
4.43 0
2.77 0
4.99 0
3.32 0
]
10.00 krnshow
end
grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-241.426 -354.022 moveto
-229.966 -354.022 -220.184 -355.34 -212.081 -357.976 curveto
-203.977 -360.612 -199.926 -363.794 -199.926 -367.522 curveto
-199.926 -371.25 -203.977 -374.432 -212.081 -377.068 curveto
-220.184 -379.704 -229.966 -381.022 -241.426 -381.022 curveto
-252.886 -381.022 -262.668 -379.704 -270.772 -377.068 curveto
-278.875 -374.432 -282.927 -371.25 -282.927 -367.522 curveto
-282.927 -363.794 -278.875 -360.612 -270.772 -357.976 curveto
-262.668 -355.34 -252.886 -354.022 -241.426 -354.022 curveto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.25 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-280.427 -271.013 moveto
-240.426 -232.012 lineto
-202.425 -271.013 lineto
-280.427 -271.013 lineto
closepath
userdict begin BeachHead end begin
0 0 0 0 bhsetcmykcolor
end
gsave eofill grestore
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.25 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-241.328 -93.9026 moveto
-240.926 -109.017 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-241.423 -90.3153 moveto
-238.128 -97.9574 lineto
-239.452 -98.3562 -240.476 -98.5652 -241.203 -98.5845 curveto
-241.93 -98.6039 -242.964 -98.4496 -244.307 -98.1217 curveto
-241.423 -90.3153 lineto
-241.423 -90.3153 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-240.926 -157.745 moveto
-240.926 -167.227 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-240.926 -154.108 moveto
-237.835 -161.835 lineto
-239.169 -162.199 -240.199 -162.381 -240.926 -162.381 curveto
-241.652 -162.381 -242.682 -162.199 -244.016 -161.835 curveto
-240.926 -154.108 lineto
-240.926 -154.108 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-42.4263 251.414 moveto
-42.5183 240.997 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-42.3943 255.034 moveto
-39.3723 247.28 lineto
-40.7087 246.928 -41.7404 246.756 -42.4673 246.762 curveto
-43.1942 246.768 -44.2226 246.959 -45.5527 247.334 curveto
-42.3943 255.034 lineto
-42.3943 255.034 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-24.7214 -271.027 moveto
-24.5183 -282.219 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-24.7868 -267.425 moveto
-21.5568 -275.094 lineto
-22.8833 -275.482 -23.9099 -275.682 -24.6367 -275.695 curveto
-25.3634 -275.709 -26.3967 -275.546 -27.7364 -275.206 curveto
-24.7868 -267.425 lineto
-24.7868 -267.425 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
11.1391 -294.879 moveto
20.7152 -294.514 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
7.57266 -295.015 moveto
15.1762 -291.633 lineto
15.5902 -292.951 15.8111 -293.974 15.8388 -294.7 curveto
15.8665 -295.426 15.7242 -296.463 15.4118 -297.809 curveto
7.57266 -295.015 lineto
7.57266 -295.015 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
243.44 -42.5109 moveto
252.994 -42.5109 lineto
252.994 -98.0081 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
239.804 -42.5109 moveto
247.531 -39.4205 lineto
247.894 -40.7539 248.076 -41.784 248.076 -42.5109 curveto
248.076 -43.2377 247.894 -44.2678 247.531 -45.6012 curveto
239.804 -42.5109 lineto
239.804 -42.5109 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
253.715 -147.736 moveto
253.715 -208.511 lineto
238.213 -208.511 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
253.715 -144.1 moveto
256.805 -151.827 lineto
255.472 -152.191 254.442 -152.372 253.715 -152.372 curveto
252.988 -152.372 251.958 -152.191 250.625 -151.827 curveto
253.715 -144.1 lineto
253.715 -144.1 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
199.712 182.299 moveto
199.712 151.995 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
199.712 185.935 moveto
202.802 178.208 lineto
201.469 177.845 200.439 177.663 199.712 177.663 curveto
198.985 177.663 197.955 177.845 196.622 178.208 curveto
199.712 185.935 lineto
199.712 185.935 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
199.712 103.267 moveto
199.712 79.9974 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
199.712 106.903 moveto
202.802 99.176 lineto
201.469 98.8126 200.439 98.6309 199.712 98.6309 curveto
198.985 98.6309 197.955 98.8126 196.622 99.176 curveto
199.712 106.903 lineto
199.712 106.903 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
199.712 -0.731934 moveto
199.712 -20.0103 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
199.712 2.90417 moveto
202.802 -4.8228 lineto
201.469 -5.18625 200.439 -5.36798 199.712 -5.36798 curveto
198.985 -5.36798 197.955 -5.18625 196.622 -4.8228 curveto
199.712 2.90417 lineto
199.712 2.90417 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
199.712 -68.7383 moveto
199.712 -170.01 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
199.712 -65.1022 moveto
202.802 -72.8292 lineto
201.469 -73.1927 200.439 -73.3744 199.712 -73.3744 curveto
198.985 -73.3744 197.955 -73.1927 196.622 -72.8292 curveto
199.712 -65.1022 lineto
199.712 -65.1022 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
199.712 -250.74 moveto
199.712 -275.501 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
199.712 -247.103 moveto
202.802 -254.83 lineto
201.469 -255.194 200.439 -255.376 199.712 -255.376 curveto
198.985 -255.376 197.955 -255.194 196.622 -254.83 curveto
199.712 -247.103 lineto
199.712 -247.103 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
199.712 -324.229 moveto
199.712 -340.982 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
199.712 -320.592 moveto
202.802 -328.319 lineto
201.469 -328.683 200.439 -328.865 199.712 -328.865 curveto
198.985 -328.865 197.955 -328.683 196.622 -328.319 curveto
199.712 -320.592 lineto
199.712 -320.592 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
137.99 284.877 moveto
137.99 259.491 lineto
97.7176 259.491 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
137.99 288.513 moveto
141.08 280.786 lineto
139.747 280.423 138.717 280.241 137.99 280.241 curveto
137.263 280.241 136.233 280.423 134.9 280.786 curveto
137.99 288.513 lineto
137.99 288.513 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-42.5185 301.277 moveto
-42.5185 284.996 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-42.5185 304.913 moveto
-39.4282 297.186 lineto
-40.7616 296.823 -41.7916 296.641 -42.5185 296.641 curveto
-43.2454 296.641 -44.2755 296.823 -45.6089 297.186 curveto
-42.5185 304.913 lineto
-42.5185 304.913 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-42.5183 192.269 moveto
-42.5183 180.994 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-42.5183 195.905 moveto
-39.4279 188.178 lineto
-40.7613 187.815 -41.7914 187.633 -42.5183 187.633 curveto
-43.2451 187.633 -44.2752 187.815 -45.6086 188.178 curveto
-42.5183 195.905 lineto
-42.5183 195.905 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
1.13129 166.65 moveto
20.7152 167.492 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
-2.42651 166.497 moveto
5.16074 169.917 lineto
5.58109 168.6 5.80684 167.579 5.83801 166.852 curveto
5.86919 166.126 5.73183 165.089 5.42593 163.742 curveto
-2.42651 166.497 lineto
-2.42651 166.497 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
59.2164 307.802 moveto
59.2164 297.993 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
59.2164 311.438 moveto
62.3067 303.711 lineto
60.9734 303.347 59.9433 303.166 59.2164 303.166 curveto
58.4895 303.166 57.4594 303.347 56.1261 303.711 curveto
59.2164 311.438 lineto
59.2164 311.438 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
59.2164 217.263 moveto
59.2164 205.993 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
59.2164 220.899 moveto
62.3067 213.172 lineto
60.9734 212.809 59.9433 212.627 59.2164 212.627 curveto
58.4895 212.627 57.4594 212.809 56.1261 213.172 curveto
59.2164 220.899 lineto
59.2164 220.899 lineto
closepath
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
gsave eofill grestore
grestore
gsave
newpath
[1 0 0 -1 311.731 382.302] concat
59.2164 125.264 moveto
59.2164 109.035 lineto
userdict begin BeachHead end begin
0 0 0 1 bhsetcmykcolor
end
0.5 setlinewidth 0 setlinecap 0 setlinejoin
stroke
grestore
gsave