diff options
Diffstat (limited to 'Master/texmf-dist/doc/generic/pmx/pmxccn/eps/transpose2.eps')
| -rw-r--r-- | Master/texmf-dist/doc/generic/pmx/pmxccn/eps/transpose2.eps | 593 |
1 files changed, 0 insertions, 593 deletions
diff --git a/Master/texmf-dist/doc/generic/pmx/pmxccn/eps/transpose2.eps b/Master/texmf-dist/doc/generic/pmx/pmxccn/eps/transpose2.eps deleted file mode 100644 index a87d4300e23..00000000000 --- a/Master/texmf-dist/doc/generic/pmx/pmxccn/eps/transpose2.eps +++ /dev/null @@ -1,593 +0,0 @@ -%% LaTeX2e file `eps/transpose2.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: transpose2.dvi -%%CreationDate: Sun Sep 28 16:03:28 2003 -%%Pages: 1 -%%PageOrder: Ascend -%%BoundingBox: 73 751 483 785 -%%DocumentFonts: TeXMUSIX16-Regular -%%EndComments -%DVIPSWebPage: (www.radicaleye.com) -%DVIPSCommandLine: C:\MIKTEX\TEXMF\MIKTEX\BIN\DVIPS.EXE transpose2.dvi -%DVIPSParameters: dpi=600, compressed -%DVIPSSource: TeX output 2003.09.28:1603 -%%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: 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 7 /caron put -dup 9 /macron put -dup 52 /four put -dup 54 /six put -dup 71 /G put -dup 131 /Ccaron put -dup 132 /Dcaron put -dup 195 /Atilde 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 -4205FDFF864393FB340DEC53F22BBC9011D18C818CAC5CE17FDB25AA3D76B817 -D7C337833DD53BF891D64AC84C2D36CDFD11DE82728AFE21C6E7E6C2D8A2AB1E -470318F6BA4A95928FE7E588F2D807AACF0ABAB5E813271D0CE7D0E54804C34C -A97C307FB762C772440658DA9925EA43F6909318664645EA524B9A3E57246E89 -8354B199397EB6B323D95CEE756CBD8DEB4222ED6E8B0A277EB6D6D00C2838C7 -ADD5315037274AF4F376DB3A5B6C756DC27DC5AD50E986ECFA461104DF5CEA97 -60327281E533C24693E0C044EC3B1F9F297AE861D3542AA43722748E3A06E515 -77AF46466E865F05E778262E1556A7ACD4F77AD129D5303699696B9A8FC21ACC -2F1EF77D2BF58B1991EDC7FF4E073F3C56605504E99FD3F2C886A43C52BFEC46 -242B345F9A00EC93F78175DDA8C6A63E90F2CA8AE5270063AF26E5A653D50EC0 -282BFA9F93B29650DCEFC01FA61C7782DBFA33456375D87FF1A8E6C30E34C8EF -D4C0446FC6DE929A3E1F1D6394179546F07B9EEF4AD02EDB9D6D41DD5EE3EB80 -67CF9E9C3F3729EDB3BD2EA25737BD012D4F38A82E1107AC464EF9AF4D5BEF73 -338564DA29013B35842A80F3903111CF12292A4EC4D34045DAD6394624B653D6 -B7843E77B8C1627618497DC0E2FAE7DC155BA119806809C9EA5C465A2452FE0C -B454C33973FA61BD070B67B9406E685119D3987A0A9AFC3CC336D3EC3B07E5F2 -91025E114B22C82BE9E6F3F21EF626B093C9B5B50CC2D59F93458DD0CB97E342 -F78AFDC66DF6308DBFF6753815BBBF5D24400C8084704668D9FC68AFEB1A188D -D9891DA29F0F339FE246E38708A22B71CB74D6B179D68A33B56F53CF38D373BF -39887E354ED6E8CA6DB1BFF1F57FB1AAF04CC1DD218C505FA31E653EFF402DF0 -5638D7ABDD8000AD3FFEECF8B54CF607C7AC945540E4E9F08B63DCF955001189 -62219BBA86B934CC8FC2FD1D0C12772185525E863FAF191CC6DD1B193EB9A7F7 -511E8B44901386887E55686A8DC9218F694C0BAF6441A13FF32FE07F57F21642 -AFFA2888A2DA1F54E01A7AC50BE1447831A57614C7A6450B304A3F01FFFF33CF -B5B440D30CEF8B91D24824A5C6724F94DB28359FB4B0D79B5C1F76E77AA15A9C -269F40A58351920821FC597594812B321C6C7B4AE14E06FE76EC9F845B16D00C -F63930A7F59CF10FE6DCD0632B0C3B3C32EF7DFCB27941CAE32227E470B36059 -E1E8DD3B591639ADE2710561A8E784661B1309F28FCC3DA591F8629F10C6C346 -62378840CE4E953B18BD7B93C1C0BEA1BB2BA4AA7B532D2881D7A22ADE30295A -BD01FE117C648DB4C95742D2849545951194BD042811121F98F8F0D19CB84DA4 -3CF43457E041B6723CB44797624AB5BC1097B3ABD94D747D2971970AD547AEBF -4826A3E7CBFE6F4128A5A251E5E4D9771C3B3FC87234CB5D06E38200E8CAA304 -FEE0DFB1D1C0E0950942A6CE8285808AEADA16BDD1595EB69B3D984FA9D53176 -B7E4D53472C70FC6A1EF306619A4A4D02E2A9F1EA0DD0C07DF124CF60A4034D6 -16C49A0B8A624029D398DF59189F238265ABE9C3AF61C13651C565D71FA30118 -566A9B9D40ED9B72963F22A183B93BFC13B3B4C60B5D6D6B2CB2C34E4A46F818 -75DCC0E18B224E2C23ED37EB5D9C41B9BDFA30ECA3A2B2AD548B7EEBD85ECC13 -07D2DA685D0BA7ABC4E04F3BA9FE04494DD9F9854922D0811DA702B5B6816A46 -681E16C1F22DB24CF64A143AB2BF39E7C2831BD005C7294B021F01E90046D441 -5089CDE2EE9AAAD38E4797C2C051649C1BFC743EDB5B679F2F9C993BBAFF4089 -AFBB7997BA4B1BB7139B3548897130C1848CC9BCA68F386250788B7930EEDAA2 -0B31250826EBD9531F8BF948DFDF61C3315892FB60996B4FFB85 -0000000000000000000000000000000000000000000000000000000000000000 -0000000000000000000000000000000000000000000000000000000000000000 -0000000000000000000000000000000000000000000000000000000000000000 -0000000000000000000000000000000000000000000000000000000000000000 -0000000000000000000000000000000000000000000000000000000000000000 -0000000000000000000000000000000000000000000000000000000000000000 -0000000000000000000000000000000000000000000000000000000000000000 -0000000000000000000000000000000000000000000000000000000000000000 -cleartomark{restore}if -%%EndFont -TeXDict begin 39158280 55380996 1000 600 600 (transpose2.dvi) -@start /Fa 59[266 133 62[266 133 59[106 16[40 1[40 42[0 -1[0 7[{}9 132.835 /TeXMUSIX16-Regular rf end -%%EndProlog -%%BeginSetup -%%Feature: *Resolution 600dpi -TeXDict begin -%%PaperSize: a4 - end -%%EndSetup -%%Page: 1 1 -TeXDict begin 1 0 bop 10 -35 3396 4 v 10 -2 V 10 31 V -10 64 V 10 98 V 10 63 a Fa(G)119 -37 y(4)153 13 y(4)186 --54 y(4)219 -4 y(4)252 46 y(4)285 -20 y(4)p 474 112 4 -108 v 436 112 a(\007)p 689 96 4 103 v 651 96 a(\007)690 -19 y(\203)710 18 y(\203)474 5 y(\204)577 -1 y(\204)p -841 79 4 94 v 803 79 a(\007)p 992 63 4 150 v 954 63 a(\007)p -1143 46 4 141 v 1105 46 a(\007)1217 29 y(4)p 1295 29 -4 132 v(\007)1368 13 y(4)992 -62 y(\204)1183 -71 y(\204)992 --87 y(\204)1183 -96 y(\204)p 1446 13 4 123 v 1408 13 -a(\007)p 1560 104 4 108 v 1561 -4 a(\007)1735 13 y(6)p -1775 115 4 103 v 1 w(\007)1886 29 y(6)1776 90 y(\303)1798 -91 y(\303)1560 104 y(\304)1665 109 y(\304)p 1926 123 -4 94 v 1927 29 a(\007)p 2116 46 4 117 v 2078 46 a(\007)p -2267 63 4 126 v 2229 63 a(\007)p 2419 79 4 135 v 2381 -79 a(\007)2116 -45 y(\304)2307 -36 y(\304)2116 -70 y(\304)2307 --61 y(\304)p 2570 96 4 144 v 2532 96 a(\007)p 2683 98 -4 135 v 2794 112 a(\011)p 3402 98 V 3405 262 a - slur@Dict begin /pss@rega 0 N /psc@rega 0 N /pst@rega 0 N end - 3405 262 -a eop end -%%Trailer - -userdict /end-hook known{end-hook}if -%%EOF |