-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy patheushield.eps
1894 lines (1796 loc) · 87.5 KB
/
eushield.eps
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-3.0 EPSF-3.0
%%Creator: FreeHand (Toby Morris et al) reconstructed by John Butler
%%Title: crest 1.15
%%CreationDate: 7/11/93 11:57 am
%%BoundingBox: 109 372 477 744
%%DocumentFonts: Times-Roman
%%DocumentNeededFonts: Times-Roman
%%EndComments
0 0 translate
%* -------------------------------------------------------.
%* The University Corporate Visual Identity exercise Logo |
%* -------------------------------------------------------'
%* Bounding box is 547 * 547.
%* v1.10: Colours corrected. Additional detail added.
%* Uses separate dictionary for drawing components.
%* Dark boundaries on full-colour saltire. Bounding box not coloured in.
%* v1.11: Setcmykcolor used not setrgbcolor
%* v1.12: Tiny flashes visible at enormous scale removed (mitrelimit problem)
%* Lettering redone to remove baroque positioning.
%* v1.13: Version number added to castle base in tiny letters (commented out)
%* Suffixes dropped from version nos.
%* v1.14: Bug in font selection: GAW version tried.
%* Bounding box painted black in reversed mode
%* v1.15: Top and bottom radii corrected; Perpetua font size corrected
%* Note this requires font "Times-Roman" to be present.
/normal 0 def %* normal monochrome
/noback 1 def %* monochrome, no background lines
/reversed 2 def %* white on a black background
/twocolour 3 def %* two colour - red and black
/fullcolour 4 def %* full colour
% Size-related proportion controls e.g. Bordure Width for large logos
/normalsize {1} def
/largesize {2} def % use this for printed size > 12.5 cm (5")
%* 1.000 dup scale %* nonstandard size - 101mm (4") circle, 130mm across type
%* ---------------------------------------------------------------------------
3.863693 setmiterlimit
% Numbers in [] are RGB values (actually 1-CMY). Other nos are Pantones.
% Pantone equivalences taken from table in QMS printer manual.
%Inslate [1.00 0.69 0.00 0.55] def %* 282 Slate (uncoated)
/Inslate [1.00 0.59 0.00 0.55] def %* 289 Slate (coated)
/Inblack [0.00 0.00 0.00 1.00] def
/Inwhite [0.00 0.00 0.00 0.00] def
/Inred [0.00 1.00 0.63 0.00] def %* 199 Red (coated)
%Inred [0.00 0.84 0.63 0.00] def %* 192 Red (uncoated paper)
/Inblue [1.00 0.37 0.00 0.00] def %* 300 Mid Blue in the full colour saltire
/Ingreen [0.44 0.00 0.39 0.00] def %* 338 Green in the full colour thistle ball
/Inpurple [0.15 1.00 0.00 0.00] def %* 233 Purple in the full colour thistle seeds
/Inpages [0.00 0.15 0.44 0.00] def %* 134 Yellow/Orange in the full colour inner pages
/Inyellow [0.00 0.34 0.74 0.00] def %* 136 Yellow in the full colour book edges
%* and shield inner edge
%*
%* Define setcmykcolor in terms of rgb if not defined by current interpreter.
%*
/setcmykcolor where {pop}
{ /setcmykcolor
{ dup 10 eq {pop setrgbcolor}
{1 sub 4 1 roll 3
{ 3 index add neg dup 0 lt {pop 0} if 3 1 roll
} repeat
setrgbcolor pop
} ifelse
} bind def
} ifelse
/setcolor{aload pop setcmykcolor} def
/doline{
setlinewidth setlinecap setlinejoin Inink setcolor stroke
}def
/doBWline{
setlinewidth setlinecap setlinejoin InkOrWhite setcolor stroke
}def
/paint{
closepath
gsave
setcolor fill
grestore
}def
/crestdict 64 dict def
crestdict begin
/thistleseeds{
%* thistle seeds - painting order 1 (LH), 2, 6, 5, 3 ,4
-26.7 96.2 moveto
-27.5 95.1 -24.2 87.0 -23.7 86.4 curveto
-23.2 84.9 -17.0 79.5 -15.2 77.8 curveto
-14.6 76.2 -11.7 73.9 -11.4 73.9 curveto
-11.1 72.8 -10.7 73.2 -10.0 74.6 curveto
-20.9 88.7 lineto
-24.2 94.0 -26.5 97.1 -26.7 96.2 curveto
WhiteOrPurple paint
newpath
-18.4 90.7 moveto
-18.8 89.5 -17.2 87.8 -15.9 87.4 curveto
-15.9 86.5 -11.6 81.7 -11.0 80.8 curveto
-10.5 79.7 -8.2 76.1 -7.6 75.7 curveto
-6.8 75.2 -7.9 79.1 -8.8 80.8 curveto
-10.0 82.4 -11.1 84.9 -11.1 86.2 curveto
-12.5 89.2 lineto
-13.6 89.5 -13.6 90.8 -14.4 91.4 curveto
-14.8 91.7 -14.5 94.7 -14.8 95.2 curveto
-16.0 94.5 -17.8 92.4 -18.4 90.7 curveto
WhiteOrPurple paint
newpath
26.6 95.8 moveto
27.4 94.6 24.2 86.2 23.6 85.9 curveto
19.6 82.8 17.1 81.1 15.2 77.2 curveto
14.5 75.9 11.8 74.1 11.5 74.1 curveto
11.2 73.0 9.3 73.2 8.6 74.6 curveto
8.6 74.6 12.0 76.2 12.0 79.2 curveto
13.5 79.2 17.8 82.7 17.8 82.7 curveto
20.4 88.4 lineto
21.4 89.9 22.6 91.1 23.5 92.1 curveto
25.6 94.6 26.5 96.4 26.6 95.8 curveto
WhiteOrPurple paint
newpath
17.6 90.8 moveto
18.0 89.6 16.4 87.2 15.0 86.8 curveto
15.0 85.9 10.8 80.2 10.2 79.4 curveto
9.8 78.2 7.5 76.2 6.8 75.8 curveto
6.0 75.2 7.1 79.2 8.0 80.9 curveto
9.2 82.5 10.3 85.0 10.3 86.4 curveto
11.8 89.2 lineto
12.8 89.6 12.8 90.9 13.6 91.5 curveto
14.0 91.8 13.8 94.8 14.0 95.4 curveto
15.2 94.6 17.0 92.5 17.6 90.8 curveto
WhiteOrPurple paint
newpath
-2.2 76.2 moveto
-1.6 78.4 -2.8 81.4 -2.8 83.7 curveto
-2.8 87.6 -0.7 94.9 -4.4 94.9 curveto
-5.6 94.7 -8.4 91.6 -9.9 91.1 curveto
-10.8 89.5 -8.1 85.9 -7.6 84.2 curveto
-7.6 82.8 -6.7 82.2 -6.0 80.8 curveto
-5.5 79.5 -3.7 75.9 -2.2 76.2 curveto
WhiteOrPurple paint
newpath
2.1 75.8 moveto
1.4 78.0 1.6 82.0 1.6 84.2 curveto
1.6 88.2 -0.1 94.8 3.6 94.8 curveto
4.8 94.6 7.6 91.5 9.1 91.0 curveto
10.0 89.4 7.4 87.2 6.9 85.6 curveto
6.9 84.2 5.9 82.1 5.2 80.7 curveto
4.8 79.4 3.5 75.5 2.1 75.8 curveto
WhiteOrPurple paint
newpath
} def
/thistleball{
%* thistle ball
%* Outline sphere
-15.4 62.8 moveto
-15.4 69.1 -8.9 74.2 -0.9 74.2 curveto
7.1 74.2 13.6 69.1 13.6 62.8 curveto
13.6 56.5 7.1 51.2 -0.9 51.2 curveto
-8.9 51.2 -15.4 56.5 -15.4 62.8 curveto
WhiteOrGreen paint
0 1 2 doline
%* highlight
1.8 62.1 moveto
2.8 62.5 2.8 63.0 3.8 63.2 curveto
3.8 61.8 2.6 62.9 3.5 60.7 curveto
3.6 60.2 2.3 62.1 1.8 62.1 curveto
Inink paint
0 1 1 doline
} def
/thistlehatch{
%* hatching - 6 diagonal stripes
-10.2 71.2 moveto
-4.8 62.2 8.8 53.9 8.8 53.9 curveto
11.1 56.4 lineto
-0.6 62.2 -2.4 63.2 -10.2 71.2 curveto
Inink paint
0 1 1 doline
-1.6 74.2 moveto
-0.5 70.2 13.2 60.6 13.2 60.6 curveto
13.8 63.2 lineto
8.9 65.4 2.4 69.8 -1.6 74.2 curveto
Inink paint
0 1 1 doline
-14.8 64.2 moveto
-10.8 59.2 -0.1 51.6 -0.1 51.6 curveto
4.9 52.5 lineto
-1.2 55.2 -9.9 60.1 -14.8 64.2 curveto
Inink paint
0 1 1 doline
-12.1 55.7 moveto
-6.8 56.7 11.5 68.4 11.5 68.4 curveto
9.0 71.2 lineto
0.1 61.6 -12.1 55.7 -12.1 55.7 curveto
Inink paint
0 1 1 doline
-14.6 61.2 moveto
-7.1 64.2 3.8 73.5 3.8 73.5 curveto
0.8 73.9 lineto
-2.7 69.9 -7.9 64.9 -14.6 61.2 curveto
Inink paint
0 1 1 doline
-5.2 52.1 moveto
-1.7 52.4 13.5 61.9 13.5 61.9 curveto
13.2 65.6 lineto
8.9 60.5 -5.2 52.1 -5.2 52.1 curveto
Inink paint
0 1 1 doline
} def
/thistledetails{
%* details - 8 small patches
1.2 54.6 moveto
2.2 55.0 2.2 55.5 3.2 55.7 curveto
3.2 54.2 2.0 55.4 2.9 53.2 curveto
3.0 52.8 1.8 54.6 1.2 54.6 curveto
Inink paint
0 1 1 doline
-5.1 58.1 moveto
-4.1 58.5 -4.1 59.0 -3.1 59.2 curveto
-3.1 57.8 -4.2 58.9 -3.4 56.7 curveto
-3.2 56.2 -4.6 58.1 -5.1 58.1 curveto
Inink paint
0 1 1 doline
-5.6 66.6 moveto
-4.6 67.0 -4.6 67.5 -3.6 67.7 curveto
-3.6 66.2 -4.8 67.4 -3.9 65.2 curveto
-3.8 64.8 -5.1 66.6 -5.6 66.6 curveto
Inink paint
0 1 1 doline
-12.2 62.2 moveto
-11.2 62.7 -11.2 63.2 -10.2 63.4 curveto
-10.2 62.0 -11.5 63.1 -10.6 60.9 curveto
-10.5 60.5 -11.8 62.2 -12.2 62.2 curveto
Inink paint
0 1 1 doline
8.4 58.5 moveto
9.4 58.9 9.4 59.4 10.4 59.6 curveto
10.4 58.2 9.2 59.2 10.1 57.1 curveto
10.2 56.7 8.9 58.5 8.4 58.5 curveto
Inink paint
0 1 1 doline
8.8 66.2 moveto
9.8 66.7 9.8 67.2 10.8 67.4 curveto
10.8 66.0 9.5 67.1 10.4 64.9 curveto
10.5 64.5 9.2 66.2 8.8 66.2 curveto
Inink paint
0 1 1 doline
1.2 71.8 moveto
2.2 72.2 2.2 72.7 3.2 72.9 curveto
3.2 71.5 2.0 72.6 2.9 70.4 curveto
3.0 70.0 1.8 71.8 1.2 71.8 curveto
Inink paint
0 1 1 doline
-13.4 62.6 moveto
-14.4 63.0 -14.5 63.9 -15.5 64.1 curveto
-15.5 62.7 -14.5 63.0 -15.4 60.8 curveto
-15.5 60.4 -13.9 62.6 -13.4 62.6 curveto
Inink paint
0 1 1 doline
} def
/thistlemain{
newpath
%* thistle seed outline
-38.1 99.1 moveto
-10.5 69.2 lineto
9.0 68.1 lineto
36.8 98.8 lineto
-38.1 99.1 lineto
Inink paint
0 1 1 doline
thistleseeds
%* thistle stem
-3.4 38.2 moveto
-2.4 47.2 lineto
-7.4 50.2 -5.4 56.2 -5.4 56.2 curveto
4.6 56.2 lineto
5.6 49.2 0.6 47.2 0.6 47.2 curveto
1.6 38.2 lineto
Inink paint
0 1 2 doline
} def
/castle{
%* 1st castle outline
newpath
-21.4 -116.7 moveto
-21.4 -97.7 lineto
-12.4 -96.7 lineto
-6.4 -80.7 lineto
13.6 -80.7 lineto
17.6 -94.7 lineto
26.6 -95.7 lineto
26.6 -116.7 lineto
5.6 -117.7 lineto
3.4 -113.9 lineto
3.6 -99.7 lineto
3.6 -99.7 -2.4 -99.7 -2.4 -105.7 curveto
-2.4 -110.7 -2.4 -116.7 -2.4 -116.7 curveto
Inwhite paint
0 1 2 doline
%* 2nd castle outline
-26.9 -113.7 moveto
-26.9 -94.7 lineto
-17.9 -93.7 lineto
-11.9 -77.7 lineto
8.1 -77.7 lineto
13.1 -93.7 lineto
21.1 -94.7 lineto
21.1 -113.7 lineto
3.4 -113.7 lineto
3.1 -104.2 lineto
3.6 -98.2 -1.9 -96.7 -1.9 -96.7 curveto
-1.9 -96.7 -7.9 -96.7 -7.4 -101.7 curveto
-7.9 -105.7 -7.9 -113.7 -7.9 -113.7 curveto
Inink paint
0 0 2 doline
% Code to put a version I.D. in the base of the castle
% gsave
% -7.5 -117.15 moveto 1 setgray 0.04 0.04 scale (v1.14) show
% 260 -22 rmoveto 2.8 rotate (John Butler, 1992) show
% grestore
%* castle ramparts
-28.4 -60.7 moveto
-28.4 -75.7 lineto
-24.4 -79.7 lineto
27.6 -79.7 lineto
28.6 -60.7 lineto
11.6 -60.7 lineto
16.6 -67.7 lineto
3.6 -67.7 lineto
8.6 -60.7 lineto
-8.4 -60.7 lineto
-3.4 -67.7 lineto
-16.4 -67.7 lineto
-11.4 -60.7 lineto
Inink paint
0 0 0.3 doline
%* LH crenellation "relief"
-15.5 -61.7 moveto
-13.5 -61.7 lineto
-17.8 -67.7 lineto
-19.8 -67.7 lineto
Inwhite paint
% newpath
%* middle crenellation "relief"
4.2 -61.7 moveto
6.2 -61.7 lineto
1.8 -67.7 lineto
-0.2 -67.7 lineto
Inwhite paint
% newpath
%* crenellation overhang "relief"
-25.4 -75.7 moveto
-23.4 -77.7 lineto
25.6 -77.7 lineto
25.6 -69.7 lineto
23.6 -66.7 lineto
23.6 -75.7 lineto
Inwhite paint
newpath
} def
/saltire{
%* remodelled saltire
% left- and right-hand paths (x) of inner shield edge
/x0 -90.9 def
/x1 91.1 def
% four intersection points (y) of saltire and l and r edges
/y3 129.0 def
/y2 57.5 def
/y1 -53.5 def
/y0 -124.5 def
% four derived re-entrant vertices top,right,left,bottom of saltire
/dx {x1 x0 sub} def
/tvx {dx 2 div x0 add} def
/rvx {dx y3 y0 sub mul y2 y3 add y0 sub y1 sub div x0 add} def
/bvx {dx 2 div x0 add} def
/lvx {dx y2 y1 sub mul y2 y3 add y0 sub y1 sub div x0 add} def
/tvy {y3 y1 sub dx div tvx x0 sub mul y1 add} def
/rvy {y2 y0 sub dx div rvx x0 sub mul y0 add} def
/bvy {y2 y0 sub dx div bvx x0 sub mul y0 add} def
/lvy {y3 y1 sub dx div lvx x0 sub mul y1 add} def
x0 y3 moveto
tvx tvy lineto
x1 y3 lineto
x1 y2 lineto
rvx rvy lineto
x1 y1 lineto
x1 y0 lineto
bvx bvy lineto
x0 y0 lineto
x0 y1 lineto
lvx lvy lineto
x0 y2 lineto
InkOrBlue paint
newpath
2 setlinecap 0 setlinejoin Inink setcolor
2.5 setlinewidth
x0 y3 moveto tvx tvy lineto x1 y3 lineto stroke
x0 y1 moveto lvx lvy lineto stroke
x1 y1 moveto rvx rvy lineto stroke
6 setlinewidth
x0 y2 moveto lvx lvy lineto stroke
x1 y2 moveto rvx rvy lineto stroke
x0 y0 moveto bvx bvy lineto x1 y0 lineto stroke
} def
/book{
%* Book vertices. t/b: top/bottom, i/o: inner/outer. l/r/c: left/right/centre
/tlo {-36.4 31.5} def
/tli {-30.0 39.9} def
/tc { 0.9 27.7} def
/tri { 31.0 37.9} def
/tro { 37.1 28.0} def
/blo {-36.4 -29.5} def
/bli {-29.9 -19.5} def
/bro { 36.1 -28.9} def
/bci { 0.1 -26.8} def
/bri { 30.7 -20.4} def
gsave
0 2 translate
%* book LH shadow. The notch is to avoid overlaying the white area.
newpath
tlo moveto
tlo exch 3 sub exch lineto
% -39.4 3 lineto
% -35.4 0 lineto
% -39.4 -2 lineto
blo exch 3 sub exch 1 sub lineto
blo 1 sub lineto
Inink paint
% 0 0 1 doline
%* book RH shadow
newpath
tro moveto
tro exch 3 add exch lineto
% 40.1 3 lineto
% 36.1 0 lineto
% 40.1 -3 lineto
bro exch 3 add exch 1 sub lineto
bro 1 sub lineto
Inink paint
% 0 0 1 doline
%* book outer outline
newpath
tlo moveto
-37.4 15.5 -36.9 -30.0 blo curveto
-3.9 -30.0 lineto
-4.9 -32.6 -3.9 -36.0 0.1 -36.0 curveto
4.1 -36.0 5.1 -32.6 4.1 -30.0 curveto
bro lineto
tro lineto
36.5 28.4 31.5 37.4 tri curveto
7.9 37.2 1.1 28.5 tc curveto
1.1 28.5 -10.4 35.8 tli curveto
-31.7 39.0 -34.9 32.9 tlo curveto
WhiteOrYellow paint
0 0 2 doline
%* book RH page edges
1.0 setmiterlimit
bri moveto
bro lineto
tro lineto
36.5 28.4 31.5 37.4 tri curveto
% closepath
WhiteOrYellow paint
0 0 2 doline
3.863693 setmiterlimit
%* book inner outline
tli moveto
bli lineto
-29.9 -20.0 -6.9 -13.8 bci curveto
7.1 -13.8 30.9 -20.5 bri curveto
tri lineto
31.1 38.0 4.6 45.0 tc curveto
-9.4 46.0 -29.9 40.0 tli curveto
WhiteOrPages paint
0 0 2 doline
%* book LH corner
blo moveto
bli lineto
0 0 2.5 doline
%* book RH corner
bro moveto
bri lineto
0 0 2.5 doline
%* book flecks
/lefthand 1 def
/righthand -1 def
/fleck{
/hand exch def
gsave
newpath
translate
0 0 moveto
10.7 hand mul 0.2 17.2 hand mul -4.7 20.7 hand mul -10.0 curveto
18.2 hand mul -7.0 12.9 hand mul -6.0 8.7 hand mul -4.8 curveto
1.7 hand mul -2.8 -0.2 hand mul -5.2 -0.2 hand mul 0.1 curveto
Inink paint
0 1 0.3 doline
grestore
}def
-24.6 26.8 lefthand fleck %* LH top
-25.1 10.8 lefthand fleck %* LH middle
-25.6 -5.2 lefthand fleck %* LH bottom
24.8 26.8 righthand fleck %* RH top
25.3 10.8 righthand fleck %* RH middle
25.8 -5.2 righthand fleck %* RH bottom
%* book spine
1.4 28.0 moveto
1.4 28.0 -0.1 27.5 -0.1 27.8 curveto
-0.4 18.0 -0.7 -9.4 -2.6 -22.8 curveto
-0.9 -24.8 0.1 -26.0 0.1 -26.0 curveto
4.4 -21.5 lineto
0.6 -19.8 1.4 28.0 1.4 28.0 curveto
Inink paint
0 1 1 doline
%* book RH page edges
33.4 32.0 moveto
34.4 32.0 35.0 31.4 35.0 31.4 curveto
32.4 3.0 34.6 -25.4 34.6 -25.4 curveto
32.6 -25.4 lineto
32.6 -25.4 34.6 7.2 33.4 32.0 curveto
Inink paint
grestore
} def
/lettering{
0 0 5.7 doBWline
/Rtop 161 def % 161 def
/Rbot -185 def
/letter{
gsave
rotate
InkOrWhite setcolor
/offset exch def
0 0 moveto
dup stringwidth pop 2 div neg offset moveto show
grestore
}def
(T) Rtop 79 letter
(H) Rtop 65.5 letter
(E) Rtop 52 letter
(U) Rtop 31.75 letter
(N) Rtop 17.5 letter
(I) Rtop 6 letter
(V) Rtop -6 letter
(E) Rtop -19 letter
(R) Rtop -32 letter
(S) Rtop -44 letter
(I) Rtop -54.5 letter
(T) Rtop -65 letter
(Y) Rtop -78 letter
(O) Rbot -75.5 letter
(F) Rbot -61 letter
(E) Rbot -39 letter
(D) Rbot -25 letter
(I) Rbot -13 letter
(N) Rbot 0 letter
(B) Rbot 15 letter
(U) Rbot 30 letter
(R) Rbot 46 letter
(G) Rbot 60 letter
(H) Rbot 75.5 letter
} def
/dots{
%* LH dot
newpath
-172.4 -5.0 3 0 360 arc
InkOrWhite paint
0 0 1.4 doBWline
%* RH dot
171.6 -5.0 3 0 360 arc
InkOrWhite paint
0 0 1.4 doBWline
} def
/shield{
%* shield outer edge: Takes parameter "size", used to narow the bordure
largesize eq {
-98.4 1.0 add 100.8 1 sub moveto
-98.4 1.0 add -88.2 1 add lineto
-98.4 1.0 add -114.2 1 add -70.2 1.0 add -116.0 0.8 add -48.4 0.2 add -118.2 0.8 add curveto
-19.4 0.1 add -121.2 1 add -14.9 0.1 add -115.1 1 add -0.9 -142.2 1 add curveto
22.1 0.1 sub -111.2 1 add 25.5 0.1 sub -120.1 1 add 46.6 0.2 sub -118.2 0.8 add curveto
68.6 0.4 sub -116.2 0.8 add 97.6 1.0 sub -117.2 1 add 97.6 1.0 sub -87.2 1 add curveto
97.6 1.0 sub 100.8 1 sub lineto
WhiteOrYellow paint
2 1 5 doline
}{
-98.4 100.8 moveto
-98.4 -88.2 lineto
-98.4 -114.2 -70.2 -116.0 -48.4 -118.2 curveto
-19.4 -121.2 -14.9 -115.1 -0.9 -142.2 curveto
22.1 -111.2 25.5 -120.1 46.6 -118.2 curveto
68.6 -116.2 97.6 -117.2 97.6 -87.2 curveto
97.6 100.8 lineto
WhiteOrYellow paint
2 1 4 doline
} ifelse
%* shield inner edge
-90.9 93.9 moveto
-90.9 -83.6 lineto
-90.9 -112.3 -66.3 -110.2 -45.8 -112.3 curveto
-18.6 -115.1 -12.9 -110.2 -0.1 -130.7 curveto
16.6 -109.2 23.5 -114.1 43.3 -112.3 curveto
63.9 -110.3 91.1 -112.3 91.1 -83.6 curveto
91.1 93.9 lineto
Inwhite paint
} def
/outercircle{
%* outer circle
/x0 0 def /y0 0 def
x0 y0 143.15 0 360 arc
WhiteOrInkOrRed paint
gsave
clip newpath
/hatching{
/hatch{
newpath
-143.15 exch moveto
286.30 0 rlineto
0 0 1.4 doBWline
}def
0 1 26 {10.37 mul 134.95 sub hatch} for
% unapproved JHB 48-line experiment: 0 1 47 {5.9 mul 136 sub hatch} for
}def
normal version eq reversed version eq or {hatching} if
grestore
} def
/boundingbox{
%* Bounding Box: 20 283 567 830
%* logo centre
/x0 0 def /y0 0 def
%* Bounding Box: [xl,yb] ... [xr,yt]
/xl x0 273.35 sub def /xr x0 273.65 add def
/yb y0 274.05 sub def /yt y0 272.95 add def
xl yb moveto
xl yt lineto
xr yt lineto
xr yb lineto
WhiteOrInk paint
newpath
} def
end
/crest{
/size exch def
/version exch def
%* define colours
/Inink twocolour version eq {Inslate} {Inblack} ifelse def
/InkOrWhite reversed version eq {Inwhite} {Inink} ifelse def
/WhiteOrInk reversed version eq {Inink} {Inwhite} ifelse def
/WhiteOrRed twocolour version eq {Inred} {Inwhite} ifelse def
% Thistle seeds
/WhiteOrPurple fullcolour version eq {Inpurple}{Inwhite} ifelse def
% Circle background
/WhiteOrInkOrRed twocolour version eq fullcolour version eq or
{Inred} {WhiteOrInk} ifelse def
% Saltire
/InkOrBlue fullcolour version eq {Inblue} {Inink} ifelse def
% Shield Bordure
/WhiteOrYellow fullcolour version eq {Inyellow}{Inwhite} ifelse def
% Thistle Ball
/WhiteOrGreen fullcolour version eq {Ingreen} {Inwhite} ifelse def
% Book Pages
/WhiteOrPages fullcolour version eq {Inpages} {Inwhite} ifelse def
%%IncludeFont: Perpetua Times-Roman
% Angus version:
%* /f1 FontDirectory /Perpetua known
%* {true} {mark {(fonts/Perpetua) (r) file closefile pop true} stopped
%* {cleartomark false} if} ifelse
%* {mark {/Perpetua findfont /fontis /Perpetua def pop false} stopped
%* {cleartomark true} if} {true} ifelse
%* {/Times-Roman findfont /fontis /Times-Roman def} if def
% Graeme Wood version:
/f1 FontDirectory /Perpetua known
{true} {mark {(fonts/Perpetua) (r) file closefile pop true} stopped
{cleartomark false} if} ifelse
{{/Perpetua findfont /fontis /Perpetua def false} stopped
{true} if} {true} ifelse
{/Times-Roman findfont /fontis /Times-Roman def} if def
%* lettering
f1 [36 0 0 36 0 0] makefont setfont
293.35 557.05 translate
crestdict begin
save
version reversed eq {boundingbox} if
outercircle
lettering
restore
save
dots
size shield
gsave
clip
thistlemain
thistleball
thistlehatch
thistledetails
castle
%* debugging line: gsave 12 12 scale 0 100 translate castle grestore
saltire
book
%* debugging line: gsave 8 8 -100 -100 translate scale book grestore
grestore
0 0 1.9 doline %* shield inner outline
restore
end
-293.35 -557.05 translate
} def
% /crestversion noback def
% Pick one of normal, twocolour, reversed, fullcolour
% set up parameters for "crest" call
/crestversion where
{pop crestversion dup type /nametype eq {cvx exec} if}
{normal} ifelse
/crestsize where
{pop crestsize dup type /nametype eq {cvx exec} if}
{normalsize} ifelse
crest % create crest
% and display it
showpage
%!
%%CreationDate: Tue Dec 19 17:27:03 1989
%%VMusage: 32615 39507
%% Copyright (c) 1989 The Monotype Corporation plc
%% Monotype Perpetua is a trademark of the Monotype Corporation plc
11 dict begin
/FontInfo 10 dict dup begin
/version (1) readonly def
/Notice (Copyright (c) 1989 Adobe Systems Incorporated. All rights reserved.Monotype Perpetua is a trademark of the Monotype Corporation plc) readonly def
/Copyright (Copyright (c) 1989 The Monotype Corporation plc ) readonly def
/FullName (Perpetua) readonly def
/FamilyName (Perpetua) readonly def
/Weight (Regular) readonly def
/ItalicAngle 0 def
/isFixedPitch false def
/UnderlinePosition -175 def
/UnderlineThickness 41 def
end readonly def
/FontName /Perpetua def
/Encoding StandardEncoding def
/PaintType 0 def
/FontType 1 def
/FontMatrix [0.001 0 0 0.001 0 0] readonly def
/UniqueID 263189 def
/FontBBox{-152 -307 1006 809}readonly def
currentdict end
currentfile eexec
a12e36edd7305b8a9594643a875412101edeb966b19f9c6ba0db43f9dafbc4ec
2805dc2d6e5017c91dfbc778f07aeadba88c622c54564b62c6b913455aad6b90
4b9024048b9e8f14bd72fd77338539a6de6f89c37e7dcba9b969adf09d7442b6
aa99a9565062b49eb5c723c2debc37421ba48fc85b18978fe7f77214749f49e9
1dff7b7543041acc1a78c91bccca99926cfc4de2a00e5618154228384a3ce3a1
013982fb5b38d316840882b589dd01b7c3f4a34e1504d34273f85a50392849bf
10fb11cebe042e0614425478ee49896471c4112373c92661abe7c6bf3428c9aa
da2f6542500115c89d3f4225ac2386c5d6dd090d081d2b4b3597187beb8b76d1
8bdeb75fd97066c9bd15f74f7fd26706962803223602a4e6d5d47e009dcea8b7
bb6fc18945c50a689ecf77afe761fda55b904310d631868026ceedf6d64cd1ba
b408bd6152d598db4b717170f3967390d7c8202bec59c840327e2fb51f3530ab
5d340d2c74ecfe9dc7860034e9d29dfa3c6dc71cd6b93f2e194a059380a696f2
9d4bb9a05bc8f576d2b31647d6e89ce9ef2b32f967a4c1600ac8f132a7e9f5be
3c7c693907eae179062fd3846920c428fb54cef2873e1df4481f2117f9692bdc
ef7e8612d8cda89fe0a9634bc62bdeeb59ef944d28c5e06effa5546e46d8b000
eebcf1f6d1aded61ce63f517ebf952d469e56f318334160efe99bf264c531b01
daabe9c3f8933574db981d87535185a7844b7ef69aad171aa8e4cce1d406b5d6
9415d98763d1fc8dfe3e6d3d85bcae7b962aea416b0be684135f9f0281b8796d
196eefb5a8a5b70e7711167becdae9ebf447942b047e9bf87b4ee44ddc205340
237f3007c519c1f033cdc0128873a4023a16bdc8beb4457bfd3f8e2bfeef43e1
99706db47a1edbdc70af9a6a6bd62932abb6e161baf6f96c31db8aaf6ef55f65
61924b8660b6f3013cc2b97653ecf36a3088badd35cd188ba877ce0342e858ca
cd3b0be16a1c4e8f1092f3fb2ca7c32dc9bcfa884f90ebb7a197c8b964d8bff6
01b458ff3925453717db07acc21a9f5d5df4ab9d3497c382b1f7496686353d61
d0336b2ba89b816484762655252e4ea500c272c724bea6fef1bfa190654030b1
63a7c548c58576081840ec948e53cc23dbe27925794247e9c5eff83d869015ae
1aa20cc2172e8958faee40b3096d63762a9b14f26079461d6efe8ee623751085
36861ecf4901f14b653ca71c9bd82d057830f6bb33d7645ce1226ec9b0115c4d
d5bd0bf5cf50f72ad66cbb0a2a531e958c6296d80fbde82d118b836ff22c6051
e53d8e924777763dae21519595b51d1a2970f7c8a6404ce04d49b3e0e8d88ee2
419a6da064b8689742f09784c08ad301598c548edb3ca0cf7b455c411383b52c
20c3a1b0f6a7e5848099a17ff9938827b4a8d37038e0b9d9c7a388dec6d22ec2
6f97dfd59b602e0584a978aa5e306eb9fc7ea50f4d252518fec11b39fbd1348d
d2f0d065cf5dfbf488771b85ac446b83eb2297eab2b811eec8eaf5b6cca6f90d
80bbcdddcdc9c42046b449415d8e65b7172e3e3c8a00125fa109c80d6cc9ddda
eba46a3dc7e2c56ea5c48f6fd71800a7c368160c5ee63c0227584ec192dac736
0f9f7f3bd270342449465db3b914aca4d92bba5fcca0375bfa0da7d401c1093a
6cdde716237e7e74398142ca7c8ebf4fc67c9dad53bb18a2cb394394dcd9b8d9
5a4f6a3503958dd62ec74fd34a63601940b5992f07f5376c6ca0e8e3e94b4607
deb9fa318dcc71deae81b9b41c2663ecf21d9ad72a49555e23630c1c7b9aa0f2
e508ab127038c6cc6f967487b1b75c6fd20277030774c97200f0601accc39190
cebeaaa6d878a0e689d5a240bd5db718b036f3a5d6b2e57acf8ebea0b205e334
974124368cec3b6d67bb109efba7838ebacf5e285f62582dfb8eb145fc6c3219
64ce3511554f66f985abe280274c379867c8b8aac69c4f5fda21d1e6f53c1781
979a7c20d14961ad9b650b39fd51c2e6188f744f224da5e87ace7c136efda1fe
c8800448474176eb0d42c3137874c71904c792705fd8aa3143640c13c9d2a59b
405b86983b40fcac418d43ffb4b75ca7a63bc653a720bd5f209f41bc56485ce2
f5a4f8a40813e6f53ef9e299d348f0636ef97517ff0725699e31f51d0f42984b
e1c606937ece6d872573c86536f65e665e74983271b8060da209b7819f75828d
6fbd6ecc8c414bb864a4276e5d5b346a7b56dc796af072d547a9cd12833e98be
0142022a2e149f9c4eed7c1e74e5d54e5b3fc2d6409f81b25c87127e4db5df9e
96d7465c3b19161ffcfad9cba9f5013f7314af7ad898c5b899fc1d26c8afb7d7
14a960e9d377f7f4332fba5c0b5cb42a776407e9f63412e19eb907191571a7f2
f3ffc3e884ac73d997c4858a12f38d1069f00baa79250fd1eb3dc2052a22e7c8
22a8bbcb2e72cdf8f63251495d697c3e098f17d7e30b0736126e6b4255d45238
543ea841d7d2d3d877b0447947fbbf61fc72c6d7396ab16355d83a8962773b22
0c9cc07f342b97b3ec8e9fec2985b7a7cafe8e0bdcf4fd673c1886d808e788f6
d72ad89d87a541c17a907fbd1377bcb1d1804359faf21fa12f729acc9dd1471e
249f840140a2263e152b7a9efafeb4ac2f3f7352878bc43164e9f8d79bf65fcb
1195c608c43b83f4469aa0dede600593c27c4d33658d27c0f43329604923fc10
24dfa2e161fb6367ff024ae725b18bcba01988df6f2a56047df2cb94a75531b8
307ba186fceeacdb83fb1ed13af4f61900e9adb8b2b47c27eefa705e293bed5c
8f9907b084db22a2765ee6edd840b30c61e5680cbb401a60bd4a036728aa49ce
365bf136448b743fc5e5088e227480282f84ad770f5e8bc81dbae7ef2a892974
695606afc5b30be280953fb8f9db8318040f1427ba416d9d07308769c8c9e1c5
1f4694e0369e953222e5bf2071393ede11b8ddf78eb1ddf91543d0d66a6769d5
6b647715b88c055adae6aa38970ca46e058a2dcc6e2791c736279c438142365c
ef014308ff79985ea09f014273c13e213ce2cd963ef6d899778d195114a55305
494f6cb732a6d220f0e7a3f5f3ac25ba012e34982759c289c8ffda780d071d50
5d69d7512818a95dace578b73876ed21020404fa6d3074bbf1e0e2b35c58887b
a7231fce19b4e83f676a568f8593bf3ef9501bc05065a39959cfe42a925ad428
839d14686d636b92b7645dfd16cefcaa80f4e6aaa5be4c9967300319e7e1a053
eaf0914cfe9bbf37a7fa88fa8785045d7746c5a9315eb7149d66fc85cb6b4b33
157e37a6eb7bb45147bd6c0b35f9a307656ec84a8ace849b9f5fb861cdf9d702
50ac4587396def2603dbed8e55cf8face633be95d54632bf6b577337971648a0
b4bae0f7016f3540734091e65f8c929000f8c41db09071321c91da221a6371b9
8a7ceda694efc9d66f3e1376a19fa2ce8c1c8a1691882bfbff4a5ea592bfac75
6d164538e9760eebb836b8236e38660afd1db39b9ea4a6e53eea95a090973c1d
b12d7aefd9f1858a5f0b74b7e85215ac9158b91017eeee54b481f066d7f6d9fb
22648e6d6d5ae1b46f1548adb21cf64a617644fb8c8a0fe66ec27cbd74ff4479
017e0d49613163aff8b44975f849b8fa2e658b3e33987be2f5332f5c7ec64097
6600a5f85202de06bbc95b330726c4a36894c4120c6c7c04e9f368be421cc949
0f391a83190bcefa91ff45390fc5bdba02984250cf96986ccf6e14d85c2bc5c6
32870b731e1c2d5caa21c487c429496930a277431d2f8d1ddbb63b02411fc931
4462c769c96be599584be5d3e02209c9f41d0ee407bcd6cf66e985c617a2b707
e16c00e81d61fa4475a3d45a586f01fe26b2634165d5183612b018d0425c97a9
75b82fbff0f828d3cf9abc2827a57472f10d26edd9976c0f0ec399f5ab955605
d8f2e7f398d18fd76c832d4161af496d69d495c41b6028f06b9b8210360bdad4
1fc5e98a53948fec2ad2ac4f1853b5f108d026d5f9b0250966d1151cddbd0531
417b8d6a170f179967beea81e9115fcb1195c608c43b8618efc4830be4f9c7ef
4ef3cc592d61457f801d00e01c9c6e19dc31d08b3b506f8c851bc4e61f352f5a
c3ca4ec7714d99bad30577c4535b573788c29cfffc95f561177f16cee245b92d
3a3318f06c5401de0abaf20ef4c56d998f9dde9aa528041208d2b1a04f168efc
89bea78d37de6f009d1aa63624d77474d8c7edc221ab40c63a0d8422906eb3b4
101d3a11ac1f6ec2025a48c8df07870daa8b7ae8c432ca2a6c9ac7564b0c2f3b
5528c64e1bac394c3f31dfff4901a7a6ba6e3e9e3863eee6eba0da3938d4f612
0fd835f9065e3b3f74744e446836b8b4c2900598d990a868dcada55e1f183eb5
9340489d1535c7614009dc8d16c0e4645e58b1485ab07e93d34e70ba03dbfc42
51fb9a2010e0b21ba31add37e063b7af3a4fc2ae67c84563320d69dcdad22e1d
bf959e4f8f24f68e04c7ae89920153bc2f1af842b227f95aef8ae3431fa9fc4a
687a716e60f780925675bb087922cbc6d1d75303e0ac15c78cf6ef1d81c607dd
c244d1965ecc1aa642cab15e790e05e86c917d11d131046e77ce7c6a00090a97
3e1f21bf40914f29527a5108e80f388bd46420c4f80d148067a1f4b654dcdd5d
4eefdd6abe852ab6b74e96a237e57c97dad68d738d70268a95a5bd4753b99ae4
8e1739af3788babb313d52d350c8f9c018c3d4df91cd2b37389d3dcaa98ecdbc
9016e62d7d5ac2ab3f29618a894235d7d788bdb9c06780d0c35ff6cfdd942ba1
e4866bc71f43f4164d26bc0f5d485b95298d06efe205b5ce118eec745716664d
86e195449bcc4612d3600d2b9561842a53287f4041079fffd4fa02234c7e4071
c660682b4ddfb4f239ef59139a10ec16fef89ae1f7a68c8c2912b1aa92c7384b
d18b3817c4b7ec45764527c5d0e0edb5477d69f5f60d8dc4bdd722751edfbb3e
8b729ec1c6a6e9876880c41d6b8648a8339c5947de4b0a5b604bc6c5fc2923dd
3b2f19924127a9a231fe4a67f48eb66e3e9ae4dd8a6abeec0394064c37879a2e
2274d769c8abf9e33159924e9cb0dd0275b45fd0bf109797d33831d00e79f8e0
2e5960e6372e49d71614bb402646f1a733d00285c8fd2880ec8e722ce967caeb
4fcb7e1e23c1459e378a68b51c7be4c33494a1727ffa0f194dfbdb795efb51b9
fc9e798d02102f63cc6eae4e5d93a16daf43ea71942ecf0036b75e822477e53c
7eb181c2e4c11086ce7a3873eb370942299b48561de7f23d67c3447bd94b209e
c895a80c3ef673ba9473d24f0b4a8233cd25885515335436936bbd8bb412be86
d917cb54f9a22c37b922f94edc99de551d51e3b02f04984788c20eecb2a31ab0
abae3a58398a960b44bd11d2e03c71e686b96b4d42b0c4a727012a6ea1d607e9
00293c3d89b9708dd6acff2983e52ae87a2855f8a1b169b1729da75fbd68289a
485680372e63a252d2e8a829d6572b0b35cab84ad4542b07158caa3ab1b6c573
607a7616dc490c29ffc9096af80c1bf55d6d2a7a62cf91246fc75de3d8a2b777
624d0adec289376528636957b3b6efd13fb09fb7fe950bc177a79116b9b8183d
33b860f9ebd507e7bd11aa842a4c2f90cbac21c9507357b0cb80d6fbf72d0174
2e417cf57e1009baa85a9a03cd5de5372f54b764a8dec1a91bc02cc9bfb9ff48
1724775ef40ae2763cc4a2885f691af8518c645058f81e717c069303dd687f5b
80315bcb1a520ba59ec6d7a9db698abd603c8e0fc735a9aa1873edf615493e68
c7b9aeb724e15ad48cf39bbbcedc1852686cb041e54591d92312c2a291a87fe6
ca476107dd5ac99d87db02fd01d97bf158a67240ab277df3b370647c702426cd
b8149b45e86432687f787ab97cd4154bd644837246bf243399d4bac0c57bbd85
6a6c7a6f702bd21cfbf03323228b622e30137bd62c09d510beb9c0cf9931137b
27860b4b77bec061b5e51c16c76f26f49ea992b3fb79991e6500b2967dcb4e8f
53cbe8c32b67a1ea8f0f2940eccd4c98ad8134e3c94fe80aa5a471a1e4c46bc8
da4cfdc878898c9aafcf461064be02bc3335345f7579f6adc82c6b6134319ae8
17f70041b9eb121f5331b0f5abf2a25e1af809b3550977aae80fea3557fc29e9
8b3b25af0559123bf4c32240b7f81f34d097b0bd1bdeb0b34200e5ddeca543a7
9678fd9001a9f33f5c2917f9bc2a649283416d3718749ab8b4347343f3987fbf
1bfb971bd26d05d431919883d4e5eb6c28de55c50162fb62daafb5f56ae3616b
871ca187fd40db4299af2df64064bdfa0ce085c7cfd4c2009d551d432bf54c5b
b44c315e5f87d5e241448641620eb4d1619b380a6c2d824d1f9eab7ecb002a60
82dca5ed7a19c8121a8642bda68f6859dbaf6e4391680584c4a4c899511965ee
c30fb7cd6392ded2ff976024ba90631557257ba1b86d33f66bd839c18c6d9804
80f39c53ec13936bb66510a2ec593b475f961e1ac05213c1d116dee8cf7f01f1
72850a09392f48679c7d1a3d592c795528dad167b45c8c17c4cea5309f6b63a4
e73df00a1d06a836c1af4f2e921d2557fba9faee2805b1c12498758e7b53e05b
6d2607054c0e0018e4f64a28a14cb434190417bdc0a95dc16b946a314aa268e7
92e87764088286917b3beac1431179e4f5ad99925459b26b502aa328e27f771c
1367453505de3ce8996f42ac9ad65b0d8603ede4a1c15153c78e97517ef7fb7c
03bc445583b1ddf9159492182b19e7b00966666c9bb13eb8c9179b63c702200f
7775848959812efb41e9925d320ba8ba3ca104beb7bb8742a53cc1feda4e030c
60685bca2bebc76ad16695c49105ef02feae300ddde3fe2151c1c9dc5726a218
88e25b6e2b5f38c665e8af585966d8a0c30e69f69cc1dc66cf7c1b47c067bed8
655873a59294880ccf77fd56143ac0e1691728ee1ef40474c1ed4d6924fc84e9
a3362fbc02f1967f0570ae159f13d35f873d2027625b69a6aac3b9b061ebcbd6
38796bab9535bcec15cd9ab7ee28d140c8e1375c2ec3c025a456a843339cb4af
a8212982831575417a295da0b17b276fe56a446434ba541ad8757cf4e1b6fee1
faba80324dc9b2b6c25a3bec7cfa4b1e486e4a31cd070fb996efb6059be5995b
f2d55683dbdca47b01496d78cf8881ac4740be2763dea0170cc14ea7b190872c
82a65e9052139a6f39deae8d919c8304d46c694e9e44c539d0c5d221c08887a8
84c5a22079a66d239e46c4938760a4a5ef6871cc7ff4a8dd423fe4165901cd57
151d8616d16cb5088e68c90d08a552b01736288515ce437135700ae3c412ff0e
ebc12d76e43e4bfcb9fe7e0a25d97d763090baf08ff13a5a6b6d6126bb80fe59
b54151e77c67379010c5aa14dfa45f7b29bbac2f9adad44a2dbb0299a22351cd
13d000af9bc1a3761dc78721f18be2c1ab5194ffdea121647c09131af2054308
c69a6bd24c393a6315d916821368c34863ff985e1dfabd5837a3b800c67cbc5d