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
|
%% LaTeX2e file `eps/bloch.eps'
%% generated by the `filecontents' environment
%% from source `pmxccn' on 2011/07/14.
%%
%!PS-Adobe-3.0 EPSF-3.0
%%Creator: dvips(k) 5.90a Copyright 2002 Radical Eye Software
%%Title: bloch.dvi
%%CreationDate: Wed Jan 21 13:52:01 2004
%%Pages: 1
%%PageOrder: Ascend
%%BoundingBox: 20 700 496 801
%%DocumentFonts: TeXMUSIXSPX-Regular TeXMUSIX16-Regular CMBX12
%%EndComments
%DVIPSWebPage: (www.radicaleye.com)
%DVIPSCommandLine: C:\MIKTEX\TEXMF\MIKTEX\BIN\DVIPS.EXE bloch.dvi
%DVIPSParameters: dpi=600, compressed
%DVIPSSource: TeX output 2004.01.21:1352
%%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/IE 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 IE 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/IE 256 array N 2 string 0 1 255{IE 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{/Ry X
/Rx X V}B/V{}B/RV 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: psslurs.pro
% This file can be used instead of psslurs.pro, it is only commented
% and indented.
%
% VERSION: 1.0
%
% WARNING! This is a heavy magic! If you want something more understandable,
% you will have to write it yourself (if it is possible in a stack-oriented
% language that PostScript is). There are some constants you can
% change and see what happens, but I think the slurs should be almost
% always satisfiable. When not, let me know at:
% standa@hiero.cz
% Also any bug reports and comments are welcomed.
%
% Stanislav Kneifl.
/slur@Dict 200 dict def
% this dictionary is for \setslurtext, overriding some dvips's definitions
/temp@xx@dict 4 dict def temp@xx@dict begin
/a { moveto ax1 ay1 rmoveto } def
/V {gsave newpath transform round exch round exch itransform
exch ax1 add exch ay1 add moveto rulex 0 rlineto 0 ruley neg
rlineto rulex neg 0 rlineto fill grestore} def
end
TeXDict begin
% get dimen from TeX's string ("125pt" -> 125 PS points)
/GD { dup length 2 sub 0 exch getinterval cvr 1.045 mul} def
% get dimen adjusted to Resolution
/GDAR { dup length 2 sub 0 exch getinterval cvr 4 AR mul 1.045 mul} def
% Adjust to Resolution
/AR { Resolution mul 300 div } def
% the distances in dvips's PostScript are resolution dependant!
end
slur@Dict begin
/CP /currentpoint load def
/ED { exch def } bind def
/AR { Resolution mul 300 div } def % stands for Adjust to Resolution,
/VS { dup /ay1 exch ay1 exch linew mul 4 mul add def /ay2 exch ay2 exch linew mul 4 mul add def } def
/y { 3 2 roll ax1 ay1 rmoveto show moveto } def
/M { mul } def
/A { add } def
/SB { sub } def
/P { pop } def
/DP { dup } def
/R { roll } def
/drawseg { 0 0 moveto
ax1 ay1
ax1 0.6 mul ax2 0.4 mul add ay1 0.6 mul ay2 0.4 mul add
ax1 ax2 add 2 div ay1 ay2 add 2 div curveto
ax1 0.4 mul ax2 0.6 mul add ay1 0.4 mul ay2 0.6 mul add
ax2 ay2
x2 0 curveto } def
/DS {
AR /maxe ED
/ifadjust ED
/ifdash ED
AR /m ED % max height of the slur
/e ED % "angularity" of the slur; 0.1 = very angular,
% 0.3 = very round
/aa exch neg def % what to multiply the height with
% AFTER the max height checking
/y2 ED % y coordinate of the end of the slur
/x2 ED % x coordinate of the end of the slur
/y1 ED % y coordinate of the beginning of the slur
/x1 ED % x coordinate of the beginning of the slur
/yr2 ED
/yr1 ED
/internote ED
/x2 x2 x1 sub def % x2=x2-x1
/y2 y2 y1 sub def % y2=y2-y1
/sx y2 x2 div def
/b x2 300 mul Resolution div abs sqrt AR 2 mul def % b=2*sqrt(x2)
b 3 AR lt {/b 3 AR def} if % b=max(b,3)
b m gt {/b m def} if % b=min(b,m)
/aa b aa mul def % aa=aa*b
/s 90 x2 y2 atan sub def % s=90-arctan(x2,y2) slope of the slur
/aa aa s cos div def % aa=aa/cos(s) height of the slur
/x2 s neg cos x2 mul s neg sin y2 mul sub def % x2 = x2*cos(-s) - y2*sin(-s)
% is the length of the slur
e x2 mul maxe gt { /e maxe x2 div def } if
/beta e x2 mul aa neg atan def
beta 90 gt {/beta 180 beta sub def} if
/ax1 e x2 mul def % control points
/ay1 aa def
/ax2 1 e sub x2 mul def
/ay2 aa def
% check if the starting and endin vector stay in desired quadrants
% => beta < abs(s)
beta s abs lt {
/b aa abs s abs 2 add sin mul s abs 2 add cos div def
s aa mul 0 lt {
s cos 0.75 lt { /ax1 ax1 b 1 s cos sub mul 0.5 mul sub def /ay1 ay1 s cos mul 0.8 mul def } if
% ^^^^ ^^^ ^^^
% (values to play with)
/ax2 x2 b sub def
}
{
/ax1 b def
s cos 0.75 lt { /ax2 b 1 s cos sub mul 0.5 mul ax2 add def /ay2 ay2 s cos mul 0.8 mul def } if
% ^^^^ ^^^ ^^^
} ifelse
} if
% align the slur to the staff lines
gsave
x1 y1 translate
s rotate
% [1 0 sx 1 0 0] concat
drawseg
gsave
initmatrix
flattenpath
pathbbox
exch pop
sub
/slh ED % in slh we have the height of the whole slur
pop
grestore
/yr s aa mul 0 ge { yr1 } { yr2 } ifelse internote div def
/slh yr slh internote div aa 0 gt { add } { sub } ifelse 2 div def
% check if the slur gets too close to staff line
/shift 0 def
slh 4.45 lt slh -0.5 gt and {
/slh slh dup truncate sub def
slh 0 lt { /slh 1 slh add def } if
aa 0 gt { /slh 1 slh sub def } if
% slh now contains the position ot the slur top/bottom in the space
% between the nearest staff lines (from <0,1>), regardless direction
% slur is too low:
slh 0.45 lt { /shift 0.45 slh sub def } if
% slur is too high, but we can be shift it down:
slh 0.7 gt slh 0.85 lt and { /shift 0.7 slh sub def } if
% slur is too high, must be shifted up:
slh 0.85 ge { /shift 1.45 slh sub def } if
} if
aa 0 gt { /shift shift neg def } if
ifadjust 0 eq {
/shift 0 def
} if
% and finally draw it...
grestore
gsave
/linew internote 0.06 mul AR def
linew 4 mul setlinewidth
1 setlinecap
0 setlinejoin
ifdash 1 eq
{ [internote 8 mul AR internote 5 mul AR] 0 setdash } if
x1 y1 shift neg 2 mul internote mul 4 AR mul add translate
s rotate
% [1 sx 0 1 0 0] concat
% uncomment this to see the control points
% 5 AR setlinewidth ax1 ay1 moveto 0.1 0 rlineto stroke
% ax2 ay2 moveto 0.1 0 rlineto stroke linew setlinewidth
drawseg
1 VS
drawseg
-2 VS
drawseg
x2 20 AR gt {
3 VS
drawseg
} if
x2 50 AR gt {
-4 VS
drawseg
} if
x2 80 AR gt {
5 VS
drawseg
} if
stroke
grestore
% now some \slurtext code...
/x1 ax1 ax2 add 2 div def % middle of the slur
/y1 ay1 ay2 add 2 div def
x1 s cos mul y1 s sin mul add neg
y1 s cos mul x1 s sin mul sub
aa 0 lt {1} {0} ifelse
end
% this is a hack to place the slurtext in the middle of the slur.
% From unknown reasons simple 'ax1 ay1 translate' did not work,
% so we have to overlay some definitions with our own, namely
% 'a', which is originally 'moveto' and 'V' for drawing rules.
% maybe there are some other operations that should be redefined,
% but for almost all cases this will be sufficient. If you find
% anything that won't be typeset at the correct position, let me know...
temp@xx@dict begin
/dir exch def
/ay1 exch def
/ax1 exch def
} def
% crescendos
/DC {
/y2 ED
/x2 ED
/y1 ED
/x1 ED
gsave
1 AR ceiling setlinewidth % line thickness: this results
1 setlinecap % to exactly 2 pixels in 300 dpi
1 setlinejoin
x2 y2 10 AR add moveto % the 10's specify wideness of the
x1 y1 lineto % open end of the crescendo,
x2 y2 10 AR sub lineto % similarly the 11's below
stroke
grestore
} def
% half crescendos
/DHC {
/y2 ED
/x2 ED
/y1 ED
/x1 ED
gsave
1 AR ceiling setlinewidth
1 setlinecap
1 setlinejoin
x2 y2 11 AR add moveto
x1 y1 4 AR add lineto stroke
x1 y1 4 AR sub moveto
x2 y2 11 AR sub lineto
stroke
grestore
} def
% differenced line
/DLN {
gsave
GDAR ceiling setlinewidth
GDAR exch GDAR neg rlineto
stroke
grestore
} def
% sloped line
/DSLN {
gsave
GDAR ceiling setlinewidth
GDAR exch 1.125 mul neg rotate 0 rlineto
stroke
grestore
} def
% free line (init & terminate)
/DFLN {
gsave
GDAR ceiling setlinewidth
CP moveto
lineto
stroke
grestore
} def
end
%%EndProcSet
%%BeginProcSet: texps.pro
%!
TeXDict begin/rf{findfont dup length 1 add dict begin{1 index/FID ne 2
index/UniqueID ne and{def}{pop pop}ifelse}forall[1 index 0 6 -1 roll
exec 0 exch 5 -1 roll VResolution Resolution div mul neg 0 0]/Metrics
exch def dict begin Encoding{exch dup type/integertype ne{pop pop 1 sub
dup 0 le{pop}{[}ifelse}{FontMatrix 0 get div Metrics 0 get div def}
ifelse}forall Metrics/Metrics currentdict end def[2 index currentdict
end definefont 3 -1 roll makefont/setfont cvx]cvx def}def/ObliqueSlant{
dup sin S cos div neg}B/SlantFont{4 index mul add}def/ExtendFont{3 -1
roll mul exch}def/ReEncodeFont{CharStrings rcheck{/Encoding false def
dup[exch{dup CharStrings exch known not{pop/.notdef/Encoding true def}
if}forall Encoding{]exch pop}{cleartomark}ifelse}if/Encoding exch def}
def 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
%%BeginFont: CMBX12
%!PS-AdobeFont-1.1: CMBX12 1.0
%%CreationDate: 1991 Aug 20 16:34:54
% Copyright (C) 1997 American Mathematical Society. All Rights Reserved.
11 dict begin
/FontInfo 7 dict dup begin
/version (1.0) readonly def
/Notice (Copyright (C) 1997 American Mathematical Society. All Rights Reserved) readonly def
/FullName (CMBX12) readonly def
/FamilyName (Computer Modern) readonly def
/Weight (Bold) readonly def
/ItalicAngle 0 def
/isFixedPitch false def
end readonly def
/FontName /CMBX12 def
/PaintType 0 def
/FontType 1 def
/FontMatrix [0.001 0 0 0.001 0 0] readonly def
/Encoding 256 array
0 1 255 {1 index exch /.notdef put} for
dup 51 /three put
dup 52 /four put
readonly def
/FontBBox{-53 -251 1139 750}readonly def
/UniqueID 5000769 def
currentdict end
currentfile eexec
D9D66F633B846A97B686A97E45A3D0AA052A014267B7904EB3C0D3BD0B83D891
016CA6CA4B712ADEB258FAAB9A130EE605E61F77FC1B738ABC7C51CD46EF8171
9098D5FEE67660E69A7AB91B58F29A4D79E57022F783EB0FBBB6D4F4EC35014F
D2DECBA99459A4C59DF0C6EBA150284454E707DC2100C15B76B4C19B84363758
469A6C558785B226332152109871A9883487DD7710949204DDCF837E6A8708B8
2BDBF16FBC7512FAA308A093FE5F0364CD5660F74BEE96790DE35AFA90CCF712
B1805DA88AE375A04D99598EADFC625BDC1F9C315B6CF28C9BD427F32C745C99
AEBE70DAAED49EA45AF94F081934AA47894A370D698ABABDA4215500B190AF26
7FCFB7DDA2BC68605A4EF61ECCA3D61C684B47FFB5887A3BEDE0B4D30E8EBABF
20980C23312618EB0EAF289B2924FF4A334B85D98FD68545FDADB47F991E7390
B10EE86A46A5AF8866C010225024D5E5862D49DEB5D8ECCB95D94283C50A363D
68A49071445610F03CE3600945118A6BC0B3AA4593104E727261C68C4A47F809
D77E4CF27B3681F6B6F3AC498E45361BF9E01FAF5527F5E3CC790D3084674B3E
26296F3E03321B5C555D2458578A89E72D3166A3C5D740B3ABB127CF420C316D
F957873DA04CF0DB25A73574A4DE2E4F2D5D4E8E0B430654CF7F341A1BDB3E26
77C194764EAD58C585F49EF10843FE020F9FDFD9008D660DE50B9BD7A2A87299
BC319E66D781101BB956E30643A19B93C8967E1AE4719F300BFE5866F0D6DA5E
C55E171A24D3B707EFA325D47F473764E99BC8B1108D815CF2ACADFA6C4663E8
30855D673CE98AB78F5F829F7FA226AB57F07B3E7D4E7CE30ED3B7EB0D3035C5
148DA8D9FA34483414FDA8E3DC9E6C479E3EEE9A11A0547FC9085FA4631AD19C
E936E0598E3197207FA7BB6E55CFD5EF72AEC12D9A9675241C7B00AD58FAF645
1297991B5D01701E82228D0313FC7C66B263BC79ACDDF9AAC48A3CBF42B96E38
583E1D059953076D68148DC8B6C9527B3A74CE7DEF788A11531F44120BDF0F61
0B2F3ED94EEBCDE4ACD23834C242AA4314B9EF98E4BE72DB76EBDD0A028CEA9D
B4C38C1F2D24B8FDE686832FE96204552C820E45B6BAF0C3308742AE290D69BA
D6C478E571C9E7625F22D7236D13C1F9ED3B0523E3F30C411CDA75CE31E5A820
E14B9B5D38A8C28183DF0A031F0630849F90BBB32F27F9493EB4C387F177DD84
32ED6BDC93B40722AD0D407156A8FA0AD08DC3466DD8B70C2005A5367DC8DF07
27BCCEFA73F56BA70D13A937205A389F4799674CB84D1DFC3581FCEFB6869C1B
2EE1BC8AEF1BBD5237A695D9D1DCC31B8D1255B6D6123075D9EAEC37344C7D2A
CD1A5524A45C6805D003EACB28A75740C45A06B0DC58AE5097C87944632C7AAA
2C0C2388BD7996E7D035DB5890183311071464212AAD28F9A48CFB68D9BDBBE7
543C91905FC3D38CEE89E1C1ABA2DB1A9B51B409B99600A15F13481BD7C92CC1
8FD67B95E43F20B716A97BCA8EE79248973E175941441393F86D428F2F26DF91
41933793DBF8873D1091B7582708A77B194905AB97A3F4578FB10C2564E4E138
48AC7463E64924E1559D27811FB307913209E647DE73D18DF120533FB7BA460F
0AA80E9BF624D194859EB4A2511779A22ABC439C0456BE66483B88075E427FB9
E8D21431035638AD76CFE9E46DBAF380638F8B2BAC8C5D0687769F13C4EA868B
23C2FBD892636686461F269AB9B7270F8AD666F200C907D2F8CFCD2A103B3F46
BDD5073EE7DA2E3207794F6A
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
cleartomark
%%EndFont
%%BeginFont: TeXMUSIX16-Regular
%!PS-AdobeFont-1.0: TeXMUSIX16-Regular 001.000
%%CreationDate: 01-07-25 at 04.07
%%VMusage: 1024 36138
% Generated by Fontographer 4.1.4
% converted using TeXtrace 0.45 and modified by T. Uchiyama
% ADL: 701 299 0
%%EndComments
FontDirectory/TeXMUSIX16-Regular known{/TeXMUSIX16-Regular findfont dup/UniqueID known{dup
/UniqueID get 0 eq exch/FontType get 1 eq and}{pop false}ifelse
{save true}{false}ifelse}{false}ifelse
20 dict begin
/FontInfo 16 dict dup begin
/version (001.000) readonly def
/FullName (TeXMUSIX16-Regular) readonly def
/FamilyName (TeXMUSIX16) readonly def
/Weight (Regular) readonly def
/ItalicAngle 0 def
/isFixedPitch false def
/UnderlinePosition -100 def
/UnderlineThickness 50 def
/Notice (converted using TeXtrace 0.45 and modified by T. Uchiyama) readonly def
/em 1000 def
/ascent 701 def
/descent 299 def
end readonly def
/FontName /TeXMUSIX16-Regular def
/Encoding 256 array
0 1 255 {1 index exch /.notdef put} for
dup 0 /grave put
dup 5 /hungarumlaut put
dup 7 /caron put
dup 26 /dotlessj put
dup 45 /hyphen put
dup 50 /two put
dup 51 /three put
dup 54 /six put
dup 71 /G put
dup 94 /asciicircum put
dup 138 /Lslash put
dup 196 /Adieresis put
readonly def
/PaintType 0 def
/FontType 1 def
/StrokeWidth 0 def
/FontMatrix[0.001 0 0 0.001 0 0]readonly def
%/UniqueID 0 def
/FontBBox{-620 -2059 4000 2062}readonly def
currentdict end
currentfile eexec
D9D66F633B846AB28EDC112EE8CE6C6736001234F4C7DFDC8C8014E32702D436
0A505E30AFE960AA59313499738A089E6AEAEFDC84AEBA57A1F9AD647CCB7BE5
B03F5F4993FB2566BC918B0AB23DB4629AC0D00174ECD9F3286839BBEA5DD0D6
84E25152E241F0D923ADCB347B5635EE25CE26F509B8F400F2C9CFB67D676ACF
9D516193DA983A07AC65A99BDDE6D09C93F522AF18F5462F7C2C3A7CD58FB034
810D4645AE7525C1BDF2E062C4D0BB1A115E406B09C9014323678B1FF15AC494
A82AC85A09051539D2EBF8D4910447B1C8875854670342B6D13D727DDBA5C2FD
52AFE2107B72A73D3A8F8B0516B5D141AA315F37523CA19009A6CEAB11C23A80
20B8C46718DBF2DBEAB3320A596C8992531F6E70A725359BD09EF9FF2C0E58DD
9EE54192A355EDB81FB6E2391CD91A9BBD4E6637ECE457AD4294FDF137DF3CF8
2A268AA6A26AC11CE99D5C1346290B6858A05C80699EA47DA7EC1256A161ABB5
E1F5110BF11EB22B883A7642AD41BD614AC33327503EF4CDF29ECBF52E2AE341
C5B1ACBE202DA6B5251FC2B7285AAA3035DAA61FDF68905D1A2BD55C4F9757C8
577AEE888E92ACD515DE60A4EA2EA395F9763401BCC6E169CEE5A51A11E11AF1
AE7B20319472690FF356A308F9FCC098A42EF3831CDDAC5F57D2C2AD90DD52D8
696CBF55852192941AFDBD4D3D3D7155EABCF5657BC3BB8B324E318F9CAFC95A
F2E22078C4327781B443A4C37D0D60DFBD242921196B956F8B74CFAE2B6F87C0
1828EB6FEB36F8EBE3D934746CFEF1ABE31A8DAED4DB5BB506C05DB836132B1D
DA0218A6BFF476ACC9678E9D3E42780B8102B160541093CC375B1064FAD0A341
CF768ABDC43E007DD86CC1DCA6C78B003A6B311D40A5CECFBF6FCB87ACE53B03
2B9C0B4749E37D20F20DC8ADF66FE2CB47B5D467D56929A551B8808935F08F64
7E809B6529752460DA6B95BBDE9D3B27F0D3D6459B5D9116FAF8DA634266EA8C
8D4ADAC936719165AC1FF8F441690E196B992B70F6BA09781F4BC06848F7FAD1
79A2BF9BA6CB5818D72CDD90E52DD0A4463AF471D22E778978C89FDC6665E5C7
CE1B0AEC997C573FE481576046A12414B50E34A2A2E3C788ED4CDB3D1AAC8ABB
4205FDFF86406847FAB69F1D8D85500BE6911AD86986F4C2473B79D1EA97ADC4
A297E4782B90376CA61BFBD4C9AAD24086E689B6D841D88D18F19B0444A64247
FE7A944576A88FF2B06579F2C7D190E27CA9ADAC96E22F1B1B05B1551FA95CC8
18F3FA54EDDE17A157456349A48ECE7DCC4A4F2B99B3D5BBCECAA7DCEF90EA10
8FD087CFA2B674EF4110E2CD07CEBF9C10385F50DCB41C31DF25804854742EEE
429C762D4EBF42E4BCEC08145966CA058EF1547E0A63CCCF22CF3B8FCC21E294
27B795F704B433E7F16CA402557CADCA9FA4CFF4760609AEAFC2FA33F1DCA467
1D5D31756BCE2BCBFAF2C67A9966AC1F127FC85209B98F6B6B6547299492F48D
36A2C145FAACCFC80D56FDCB2C8B29A3231D61FCF11832AC295BB1D4EC543CE8
5648A3DCA4C2EE635667AE1CB1D6B34E1B3E2D5223C2981891C1E2A1F149E849
E4CEFD6AF00CB38E64331C2231FAAF9199A3E780252185938BA3F031B638BEC8
6C4DF51F43B26B595DA7B1942ADE7E2C13C98ECDC9BC76FDFDA335010827F502
FE40BF444BF9E8F505D5DBD7BB629727F91D83983E2218110704CF12A13780F9
EF38DE6FF32F2616307B785A5F62003F1DBC63B812560164DD2DDCBE54FF6471
34DE89E9DC087C8B248CC15BF3CB5EDADE84B1A940DB1F6103A57C298E5767D6
881C64BEBA3CD92510D333B1464F6EAAED82C6528E5FB3757BDEE9996E676FDB
097DFBBC4E4E9613091C2721A3E38C679550A7ED643E7CC57515C33D0D5F24C4
4EBABEA6CCB85B0071D8A621822230F7986AC155E3A5A745D0E33FD560F1E3D3
28078F37F6022D698727E76872017A60247F4EAB22E5A847F937D102D9A19877
A80ECBC4EA8D5ABE7B4441A866A34B6B2A63A2300264FC97C8AC04B353EA8FD6
D201F4ADA5447364086F148D56FDCACE26E90759BCC7978BC11120ECF68C7B06
E1BF042A2630F6D74E4042DF71789DDC55AF2CE64BF4462F75346DC383DCA670
4FE2A78938AD64368BAF43EA3C4C91DF2E74ADAC0893C86A704001A06C0067A6
AC24E2F598AD0BCD1EFE6F341D3CD2731A9D32F5AD84D4B2DD4513C1F1A45F3C
6E22E7ED89C0F71DF41D3D8BB145F94F4F0CF62D4E0CD4AC62C394C47C32EDA1
F26857E348B08A73B195DEDEE752A74124B0C9C3D1AD21C1E8AD0A1CA7E52816
3448504710D3C4B71B7D030360ABF98A92C3AB7BC4FA3D455D4534E2AC2BB45F
00D75CD251701B242F7E2745BF2441E5E65E02024738F76038296F4AA8E37F9D
7C57A1E176E1B4761CAC27B855F2BC838E12D39B2FE5B0CD222593C5D3B73094
B152C9335B60AF87CA394B4916DA025E88F08B6AD36F4D94273D0A60668ED24E
6B41DF3E14A4D4AC7B8A9F166EF21FA9B3981359BA36F83617ECF635707D0F08
F9F4ADE7F71796E44FD68D38006FFC2E700C5A8CE5A2568BC0529485A4175E53
462EB97C6A4957E1E6519CE45E195FA33D6C94057901DC14F4E276188C79D944
D7FCB69DCBAFD6DF3B86A85806E13957C2C6B3A5E977E0F098579D690ED754F0
785559E5B40F60426C61B407C35AB087128D6034114D47D7C41FCD59F73E513A
CCFD500B39E09BCAEE77EBF6B5A730E66F7DBDAA837141E8CAF155692394200A
4F83489291B00DEB23B84598BC4BB0A5BBEC05108ED76797280CD9C1CA8A6076
D48AE36174ABF9D522D032B3528A9C0ACA376CD451AEB8DF06A0909F846CED2B
D80121F9C96E28D5C92B6C913053B67D2CA99477C71F740D3AF7FBBB3AD26CCF
B95E23303FCAC248F631E539B44EA1C3A8DB3B75A6A0B435073F589063C36112
CEDB202CFA9D2D7B897A7A088395E09F3131AF3B6FDF09D85F8E59EBC99B443B
103F3C0C681A46CC9D22B525A91DC158B669A79BBD2DAFDD4D8B87CFB4AA3E92
A323AC3192194C42171046265C2BF442EE9D7E50CA7BDD78CA89595059DBDB3A
5562FB7CFE653EA82CCBE476DFF84393FF121A0C41E23AF1331790233A7CD6FB
BF8D18C6DD9499734F164D771FE45FDE1E90DF000F113E0F593B966A1FCB87A2
944E966FFD641DC4C987BDCEC9737A39F495AC07199FA852E773C85074FA0C46
3FFF18DBBA8F06A931D68A2C05D73B4162E8F822BF74B1C2240BF5E960962DF2
7C6A3661584CED0AC7AFC3232FAC90F9C00F7E720947950F2A7E77405D0F4DE4
C14C336A1CF4AC53E9CEB9B518E581391B7DD8EDD44E82CC74DDA29602EEEBAD
6A1D7699D66239284104B7A56E12A9C1B94B2EAC6162C89610943E0B49AEC18A
4D917A0AA7837644435519F21A862138EDEC6AE314C8EA0D60F8676BDCAC5A10
4F03B1EF1CCCB456C4160665C16BE74997348602B302F6F0A44123E762AEA071
E73644EF2F1B7649D09A107578BA9732F9D896298E5D6448
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
cleartomark{restore}if
%%EndFont
%%BeginFont: TeXMUSIXSPX-Regular
%!PS-AdobeFont-1.0: TeXMUSIXSPX-Regular 001.000
%%CreationDate: 01-07-22 at 22.39
%%VMusage: 1024 69400
% Generated by Fontographer 4.1.4
% converted using TeXtrace 0.45 and modified by T. Uchiyama
% ADL: 502 498 0
%%EndComments
FontDirectory/TeXMUSIXSPX-Regular known{/TeXMUSIXSPX-Regular findfont dup/UniqueID known{dup
/UniqueID get 0 eq exch/FontType get 1 eq and}{pop false}ifelse
{save true}{false}ifelse}{false}ifelse
20 dict begin
/FontInfo 16 dict dup begin
/version (001.000) readonly def
/FullName (TeXMUSIXSPX-Regular) readonly def
/FamilyName (TeXMUSIXSPX) readonly def
/Weight (Regular) readonly def
/ItalicAngle 0 def
/isFixedPitch false def
/UnderlinePosition -300.3 def
/UnderlineThickness 150.15 def
/Notice (converted using TeXtrace 0.45 and modified by T. Uchiyama) readonly def
/em 1000 def
/ascent 502 def
/descent 498 def
end readonly def
/FontName /TeXMUSIXSPX-Regular def
/Encoding 256 array
0 1 255 {1 index exch /.notdef put} for
dup 156 /IJ put
readonly def
/PaintType 0 def
/FontType 1 def
/StrokeWidth 0 def
/FontMatrix[0.001 0 0 0.001 0 0]readonly def
%/UniqueID 0 def
/FontBBox{-810 -5754 9613 5760}readonly def
currentdict end
currentfile eexec
D9D66F633B846AB28EDC112EE8CE6C6736001234F4C7DFDC8C8014E32702D436
0A505E30AFE960AA59313499738A089E6AEAEFDC84AEBA57A1F9AD647CCB7BE5
B03F5F4993FB2566BC918B0AB23DB4629AC0D00174ECD9F3286839BBEA5DD0D6
84E25152E241F0D923ADCB347B5635EE25CE26F509B8F400F2C9CFB67D676ACF
9D516193DA983A07AC65A99BDDE6D09C93F522AF18F5462F7C2C3A7CD58FB034
810D4645AE7525C1BDF2E062C4D0BB1A115E406B09C9014323678B1FF15AC494
A82AC85A09051539D2EBF8D4910447B1C8875854670342B6D13D727DDBA5C2FD
52AFE2107B72A73D3A8F8B0516B5D141AA315F37523CA19009A6CEAB11C23A80
20B8C46718DBF2DBEAB3320A596C8992531F6E70A725359BD09EF9FF2C0E58DD
9EE54192A355EDB81FB6E2391CD91A9BBD4E6637ECE455D5521EFD88CCE1386F
E8D48F5606EBD4D022398AA55DBFD3FAB451145AE45A9253E619BA949342B84F
84BD47EC98CDC296A7E2B4E87EAD0B1A6BD1ACAFA79EF1F4A452EE8A57B40167
81461C6603C0824B10F8D2F842C6A41B3ECF50F5EE3D2D0291A7037CA41C519E
758E4CF0C26800B402E2390DB84BDE63ED4DCE76E536FD3498D26C0C294B633F
CBC6B23DCFE3398FF0AB8221466C645B943DF5EF81057D1F1EA8859EA97DB16C
F0FA4DEDD2485D24AF441D59298B52565C859B457D0748A5E86B8EDD3E890764
13026367C68BDF2CBF79A49E48CFC4B516DB1DEAF67DC23E838C438EB6150937
BFB2ECF6892415AE14817AF3592D8B0173C5CB41F224F9E3302E40E12F6FAF8F
1452239E36DAFE964572A4995036387E93AC6E41812A143B802D395133479ABB
DF095148465533FD237E818F856FFD85515C73C3B6353A0004D9CEC8C95DD5A6
84547B6F5E170EBFA3FB64626BEBF9362E25526EB6440F799F3D710DBB5880CB
5D80B4B11525BD2B8C3F6F760C82458B5EFCA2692C44857A6A338F84F82E6236
912F5AE9878F7E4B430627FC4D8D0B79BDFB5EE52618C9DEDC32BBC5D4AAA9E1
F9F218F54C1F84D48DFFB451A709EEF61D29E39883433D64CCB667EC883665B5
19CDB7E2377F72A2667B9520B5DE6EE482A180F2A583CB51686EBB655321249D
F21ED88379740A9919696632ECBB21D94D62216722D0065942B20A53BE6326D1
78F361DB3F9B6D0D63E2B69AF898AAB2210472C907A1F29D0BEB20484209B513
3BC0264EC258A35B5E7AD6A79910DDF9BB185A3633C9079AC73752191D16B1E7
ED7450987320959FFD242C4DF467557FA9D612F8D17316508489EF833FF01888
E886AD08890E4576F8BA32BCE39FFC7B5250B87C85FE147099327339CD62C747
51890DC3EEA5012B2B95E5584C7430FB4E0665D720E69848A4AF017FF6930225
906127EBBE7284E79D7F91FD5E57B9B666B2E8B1CAC9DB35BED0615EBBBE9A13
30FE6403C2560F401C36C3DAFCE42DBDDEF687BFE03D557EAA9CA2DA724B2080
C625DC1890F4CFB678ABD690EF6CFC29C2B186FB6A8E9F33B10F5FFF53680BEB
CF6FF708F7024031
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
cleartomark{restore}if
%%EndFont
TeXDict begin 39158280 55380996 1000 600 600 (bloch.dvi)
@start /Fa 203[56 56 51[{}2 99.6264 /CMBX12 rf /Fb 59[266
57[266 43[30 22[106 16[40 2[68 40 4[0 18[0 18[0 1[0 4[0{}12
132.835 /TeXMUSIX16-Regular rf /Fc 99[0 156[{}1 166.044
/TeXMUSIXSPX-Regular rf end
%%EndProlog
%%BeginSetup
%%Feature: *Resolution 600dpi
TeXDict begin
%%PaperSize: A4
end
%%EndSetup
%%Page: 1 1
TeXDict begin 1 0 bop -364 195 a Fc(\234)p -364 297 3886
4 v -364 330 V -364 363 V -364 396 V -364 430 V -364
-35 V -364 -2 V -364 31 V -364 64 V -364 98 V -364 430
4 467 v 200 x Fb(G)-364 63 y(G)-254 362 y(2)-221 312
y(2)-188 378 y(2)-155 328 y(2)-121 395 y(2)-254 29 y(2)-221
-20 y(2)-188 46 y(2)-155 -4 y(2)-121 63 y(2)-64 360 y
Fa(3)-64 427 y(4)-64 28 y(3)-64 95 y(4)160 455 y
slur@Dict begin CP /S0y1 ED /S0x1 ED /S0hgt (-3.20001pt) GD N /S0brk
S0hgt (2.0pt) GD 1 -1 M M A N /S0lift 0 N /S0alt (20.0pt) GDAR N /S0dir
-1 N /S0dash 0 N /S0adj 0 N end
160
455 a 175 428 4 125 v 137 428 a Fb(\007)160 -180 y
slur@Dict begin CP /S1y1 ED /S1x1 ED /S1hgt (33.20001pt) GD N /S1brk
S1hgt (2.0pt) GD 1 1 M M A N /S1lift 0 N /S1alt (60.0pt) GDAR N /S1dir
1 N /S1dash 0 N /S1adj 0 N end
160
-180 a 127 -69 60 4 v 127 -102 V 127 -135 V 137 -153
a Fb(\007)p 137 71 4 225 v 138 -37 a(\007)p 356 395 4
110 v 318 395 a(\007)p 399 -69 60 4 v 399 -102 V 399
-135 V 409 -137 a(\007)137 71 y(\304)-256 b(\304)p 409
85 4 222 v 410 -20 a(\007)433 362 y(3)175 303 y(\212)275
293 y(\212)p 539 362 4 95 v 501 362 a(\007)642 345 y(2)p
720 345 4 92 v(\007)p 902 362 4 99 v 864 362 a(\007)1065
395 y
slur@Dict begin (2.0pt) GD S0hgt (4.0pt) GD 1.6 (2.0pt) GD M S0dir
M A S0x1 S0y1 CP (3.20001pt) GDAR S0dir M SB 1 S0dir M 0.17 40 S0dash
S0adj 90 DS /ay1 ay1 (0.0pt) GDAR -10 AR add dir mul add def
1065 395 a 1065 395 a
end
1065 395 a 720 254 a Fb(\304)820
259 y(\304)p 1083 395 4 123 v 1045 395 a(\007)1249 455
y
slur@Dict begin CP /S0y1 ED /S0x1 ED /S0hgt (-3.20001pt) GD N /S0brk
S0hgt (2.0pt) GD 1 -1 M M A N /S0lift 0 N /S0alt (20.0pt) GDAR N /S0dir
-1 N /S0dash 0 N /S0adj 0 N end
1249 455 a 1264 428 4 92 v 1226 428 a Fb(\007)1368
478 y(2)p 1398 463 60 4 v 1446 478 4 142 v(\007)p 1264
345 365 16 v 1627 428 4 92 v 1589 428 a(\007)640 -103
y(\005^)p 672 -69 60 4 v 672 -102 V 682 -104 a(\007)640
13 y(\005^)p 682 129 4 233 v 13 w(\007)1269 51 y
slur@Dict begin /S-1alt (60.0pt) GDAR N CP /T2y1 ED /T2x1 ED /T2hgt
(5.4pt) GD N /T2dir -1 N /T2dash 0 N /T2adj 0 N end
1269
51 a 1269 -108 a
slur@Dict begin /S1alt (60.0pt) GDAR N CP /T3y1 ED /T3x1 ED /T3hgt
(24.6pt) GD N /T3dir 1 N /T3dash 0 N /T3adj 0 N end
1269 -108 a 1226 195 a
slur@Dict begin CP /C2y1 ED /C2x1 ED /C2alt (48.0pt) GD N /C2dir 0
N end
1226 195 a 1216
-69 60 4 v -282 x Fb(\007)p 1226 146 4 233 v 1227 29
a(\007)p 1770 430 4 467 v 1923 395 4 108 v 1885 395 a(\007)2026
378 y(6)p 2104 378 4 92 v(\007)p 1923 295 365 16 v 2286
395 4 108 v 2248 395 a(\007)p 2467 428 4 92 v 2429 428
a(\007)p 2600 463 60 4 v 2648 478 4 142 v 2610 478 a(\007)p
2467 345 365 16 v 2830 428 4 92 v 2792 428 a(\007)p 3011
395 4 108 v 2973 395 a(\007)1878 96 y
slur@Dict begin (2.0pt) GD T2hgt DP T2x1 T2y1 CP P T2y1 0.7 T2dir
M 0.14 30 T2dash T2adj 40 DS end
1878 96 a 1890
96 a
slur@Dict begin (2.0pt) GD T3hgt DP T3x1 T3y1 CP P T3y1 0.7 T3dir
M 0.14 30 T3dash T3adj 40 DS end
1890 96 a 1905 -87 a
slur@Dict begin (2.0pt) GD S1hgt (22.0pt) GD 1.6 (2.0pt) GD M S1dir
M A S1x1 S1y1 CP (3.20001pt) GDAR S1dir M SB 1 S1dir M 0.17 40 S1dash
S1adj 90 DS /ay1 ay1 (0.0pt) GDAR -10 AR add dir mul add def
1905 -87 a 1905 -87 a
end
1905
-87 a 1885 195 a
slur@Dict begin C2x1 C2y1 CP 4 C2dir R DC end
1885 195 a 1875 -69 60 4 v -282 x Fb(\007)p
1885 146 4 233 v 1886 29 a(\007)2452 -163 y
slur@Dict begin CP /S1y1 ED /S1x1 ED /S1hgt (31.20001pt) GD N /S1brk
S1hgt (2.0pt) GD 1 1 M M A N /S1lift 0 N /S1alt (60.0pt) GDAR N /S1dir
1 N /S1dash 0 N /S1adj 0 N end
2452 -163
a 2429 162 a
slur@Dict begin CP /C2y1 ED /C2x1 ED /C2alt (52.0pt) GD N /C2dir 0
N end
2429 162 a -282 x Fb(\032)p 2419 -69 60
4 v 2419 -102 V(\007\000)p 2429 112 4 233 v 2430 -4 a(\007)2430
-20 y(\000)p 3193 378 4 92 v 3155 378 a(\007)3266 -137
y
slur@Dict begin (2.0pt) GD S1hgt (28.0pt) GD 1.6 (2.0pt) GD M S1dir
M A S1x1 S1y1 CP (3.20001pt) GDAR S1dir M SB 1 S1dir M 0.17 40 S1dash
S1adj 90 DS /ay1 ay1 (0.0pt) GDAR -10 AR add dir mul add def
3266 -137 a 3266 -137 a
end
3266 -137 a 3246 162 a
slur@Dict begin C2x1 C2y1 CP 4 C2dir R DC end
3246
162 a 3236 -69 60 4 v 3236 -102 V 3236 -135 V -299 x
Fb(\007)p 3246 88 4 225 v 3247 88 a(-)3247 -20 y(\007)3357
395 y
slur@Dict begin (2.0pt) GD S0hgt (4.0pt) GD 1.6 (2.0pt) GD M S0dir
M A S0x1 S0y1 CP (3.20001pt) GDAR S0dir M SB 1.6 S0dir M 0.17 40 S0dash
S0adj 90 DS /ay1 ay1 (0.0pt) GDAR -10 AR add dir mul add def
3357 395 a 3357 395 a
end
3357 395 a 3011 295 366 16
v 3375 395 4 108 v -20 w Fb(\007)p 3518 430 4 467 v 3522
594 a
slur@Dict begin /pss@rega 0 N /psc@rega 0 N /pst@rega 0 N end
3522 594 a eop end
%%Trailer
userdict /end-hook known{end-hook}if
%%EOF
|