%% LaTeX2e file `eps/cslurs2k.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: cslurs2k.dvi %%CreationDate: Wed Jan 21 13:55:16 2004 %%Pages: 1 %%PageOrder: Ascend %%BoundingBox: 28 718 312 801 %%DocumentFonts: TeXMUSIX16-Regular CMR10 %%EndComments %DVIPSWebPage: (www.radicaleye.com) %DVIPSCommandLine: C:\MIKTEX\TEXMF\MIKTEX\BIN\DVIPS.EXE cslurs2k.dvi %DVIPSParameters: dpi=600, compressed %DVIPSSource: TeX output 2004.01.21:1355 %%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: CMR10 %!PS-AdobeFont-1.1: CMR10 1.00B %%CreationDate: 1992 Feb 19 19:54:52 % Copyright (C) 1997 American Mathematical Society. All Rights Reserved. 11 dict begin /FontInfo 7 dict dup begin /version (1.00B) readonly def /Notice (Copyright (C) 1997 American Mathematical Society. All Rights Reserved) readonly def /FullName (CMR10) readonly def /FamilyName (Computer Modern) readonly def /Weight (Medium) readonly def /ItalicAngle 0 def /isFixedPitch false def end readonly def /FontName /CMR10 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 75 /K put dup 84 /T put dup 101 /e put dup 108 /l put dup 112 /p put dup 114 /r put dup 115 /s put dup 117 /u put dup 121 /y put readonly def /FontBBox{-251 -250 1009 969}readonly def /UniqueID 5000793 def currentdict end currentfile eexec D9D66F633B846A97B686A97E45A3D0AA052A014267B7904EB3C0D3BD0B83D891 016CA6CA4B712ADEB258FAAB9A130EE605E61F77FC1B738ABC7C51CD46EF8171 9098D5FEE67660E69A7AB91B58F29A4D79E57022F783EB0FBBB6D4F4EC35014F D2DECBA99459A4C59DF0C6EBA150284454E707DC2100C15B76B4C19B84363758 469A6C558785B226332152109871A9883487DD7710949204DDCF837E6A8708B8 2BDBF16FBC7512FAA308A093FE5CF7158F1163BC1F3352E22A1452E73FECA8A4 87100FB1FFC4C8AF409B2067537220E605DA0852CA49839E1386AF9D7A1A455F D1F017CE45884D76EF2CB9BC5821FD25365DDEA6E45F332B5F68A44AD8A530F0 92A36FAC8D27F9087AFEEA2096F839A2BC4B937F24E080EF7C0F9374A18D565C 295A05210DB96A23175AC59A9BD0147A310EF49C551A417E0A22703F94FF7B75 409A5D417DA6730A69E310FA6A4229FC7E4F620B0FC4C63C50E99E179EB51E4C 4BC45217722F1E8E40F1E1428E792EAFE05C5A50D38C52114DFCD24D54027CBF 2512DD116F0463DE4052A7AD53B641A27E81E481947884CE35661B49153FA19E 0A2A860C7B61558671303DE6AE06A80E4E450E17067676E6BBB42A9A24ACBC3E B0CA7B7A3BFEA84FED39CCFB6D545BB2BCC49E5E16976407AB9D94556CD4F008 24EF579B6800B6DC3AAF840B3FC6822872368E3B4274DD06CA36AF8F6346C11B 43C772CC242F3B212C4BD7018D71A1A74C9A94ED0093A5FB6557F4E0751047AF D72098ECA301B8AE68110F983796E581F106144951DF5B750432A230FDA3B575 5A38B5E7972AABC12306A01A99FCF8189D71B8DBF49550BAEA9CF1B97CBFC7CC 96498ECC938B1A1710B670657DE923A659DB8757147B140A48067328E7E3F9C3 7D1888B284904301450CE0BC15EEEA00E48CCD6388F3FC3BEFD8D9C400015B65 0F2F536D035626B1FF0A69D732C7A1836D635C30C06BED4327737029E5BA5830 B9E88A4024C3326AD2F34F47B54739B48825AD6699F7D117EA4C4AEC4440BF6D AA0099DEFD326235965C63647921828BF269ECC87A2B1C8CAD6C78B6E561B007 97BE2BC7CA32B4534075F6491BE959D1F635463E71679E527F4F456F774B2AF8 FEF3D8C63B283796A9AD847424B4E6508546C36223A3B17EB82A56592F27FC27 F1D49D5FF4BBC0E16231807AF7E195AA7D0D01C7566243448B222D57B811EAE6 DE9370F84E207DC9BEC731AD6040FD9B804FA14CA264B73136F9AF34390319F6 A543D5D4D7FDDDF2F76651E557683614521110DEC1CCAC426117DDA7D6CF1B8B 7879B21FDC78BAB3C944BCDCD6A65B67F3692F0A8D5E36FB783A63D4FBC9842E 2CBC2720A7206F42A99AEC79FBBA92A27965AF40A71E05E4BA8D7FC58C828491 84A8EBDB90B1167333987F7D42A76E9C5C5A842EF91A19C55CCA6ADEB88B59E2 4FE4A96A8CFF51A1BEC1F1A6A1A5A5BFB54A1BE8C704194D72A79D33F099107F 153E3FFC70BED6D04DB4820FDAC002428C6741B91D8206296D827D3171351E85 39BB0DF1C2457E876D3A2E7E499D9D4104762FD19BA0526D38D2BF751EC56EB5 C80EE2A7AAF2CA12D1EB4548266CE8C0D2F93158A6728EB552FA09202865142F E8D1300D637E64C338DCAE28398846CB3752FA92F87103C231C0D072E20D0E00 0DBE4A0656BE7F021DB863F63DE612622FCCA2C5462EA92B205DD2FB6D547ED3 D559010FF2C4113755D38F0B959DD34D98A0D0401AD3156A3B3D69983F4BD650 23FF7C9FA7821E5C552F14CEBF2096F8F409DFF33F62508230EAE1281A7B8642 1440EF343DA01E1383BA6D010A596CBDCF5A96FA3215DA350D852582BDB1EB69 71F2EBCC0C538B9F4747E6F3641A2F1E372A88C843252610FF37D6B41BD23386 0D026B627687D3EE4AB64AA66E7C7B7FE2E7C825292AEAC46FC8BCA434A5264E 6403BBE783360B955226858F01800155AE380DEC3842751B0C9CD72E6375527B 426E260BDA0D4DEDC4AE4C9FC1D4DD9772BE8AE5D4C3F126F1601CD38D322CCD 369719297616419E32154D9B94338BC8126131A6A4306EB0CE8E5ED39772E29F 7CEC0ED49AD116928B6248749E62127D8F41F5F570BD05EF7B7A44683D07E37F E4EBE9DDE4E9B9CDC1D56BBCC7A6BD417546CF184224B7643F08A5D27F93A555 0CD9DE28422A1E86AE600D360886FCE8D99F75A4F1F517FBEFDE6597A5B6387D 1CB050CEF00BFF5DB6253D9A28A424E6A672ACDE857F40C9EF1BC5A56C7185B3 ABE41BB2203FED7C530904AE298B4A61D9D59C95FABBA2C4C316D1BC7393767F B9694C4A64BAC5BC6AD22B742C08182D657CC63722909468F3E70646666CD073 2143B43C9CB2402E2A5FD958D2D5A9DF6B417F55A29213F7D1FF0294FDA09A29 AA7B38C4DCD0FBAC1D8FBD296D6882B5ED7CEF3C5F69FAC9CF6394A659B0B93E 417E2E5D6B659E37E608B7CE700D3CBCF8A4DCF77226AEC012CD41F40CD8C728 26FFD9A5BC421A7F5438E113AD35885F3543F17F823114087EEBFF5C1CDBD8E4 00062E1F59B31F66B44902396C84282C4E5157EB40369FAD0AA2CFF83092128E F2DE00C0679F895764C229F74199DC791A71883AE49987BC98301DEEE888A419 099D14079EF60B11D6CBA1DE86435E1EB3CA6B239F2BB988AAA48533FF5E9EA2 C520945E9325FB010E5085CD9256937A89DCAD53AB7E3DCACF57826A6B8E8289 183AA5782E9A66C3CC41378138FC72B9B3C7A88964B618D6C8ECD6DA7C149BE8 5D8C36E444554DCCBBE565F4B534D79485A4EAA72BD1D9CFD815B84E1EC2B4B6 C56363C5143F3AE1E8B11F23A08761642F7DC523C827FD81DDF902755A2802DA 340E411DFBA9B479F551C4826A6D38E19EAE979CFA91284E2D0F9E801991CE9A 0CE49883EFA9D3FA61D20CB398E414F28F3360FFF1612230A28EE9D9F57A70F4 62C6028C5352832014FDC25A875489A14547CE056F43F1C7A1135CE4F706D724 303EA8A7AE1CDFC1C5A2249FE4757A32F22280BE951ABFD948505C246D6FB273 87C55CE82E42B139FAD0F633FF7AD1E6BEB226CC787D29A7A80A11CA41A6DB39 3CDAA82710D87619CCABAFCAC2EB10C4159CFD21CB5A95364CB3957EB2105E76 AB808FB507848CF3D663B62E943E7A4DD8E421B93AAA680DE0DC9A4785B4BB6F 3AF27B29537ABE88D95B5EAC2192A7DF18C943BB86F489649306570855B6631E 5A5AD58D32EE1321683BAF3C60E752F2F46F04FE2CD6A813E15A03A65E562013 37535751E12718F18E0EFF89631DA7406CEF4C0C98CA0D016A1F7E56F54315E6 E39574BEAC73B5937BF99EC3F527B1C34E6B620C38D55CF64A2082EA0986E181 27A25084340CB140AA303BCFA86475B081F1DD86AA6282148A2D52ECD1920618 948890B1C25B3AAA16A4AC244ABF706227E9F320D3F925A1A72159CF7683836B EF7990DB78ABD51482791640488FF38E8B9B68C785C9E7FF89EC876663E83D9C A25F7F532EBD3171AB48EB9BD72E1B4C0B574FA15D53AEC9297BDE3B8317037C 9B12E82BFF59E7BE0A06EFA8AA09293D086B437251B12B8789C65324ECF36B39 BA91BC7B841FD1751A83B29C754139C46C68094506A07699B711761C4A2EC02C 6D5888621687FA99CC9F929F73F544FD05F85CE1D07A7F9B2561E63B60CA33E9 32BE0968022833E51644992C8D13B8A053F91832D491A03AFD2730B8056BBCDB 32775804416B6B977CC35CD7E17F9F0A2948612E5D1DA0E9A721D5C66CE4B87D 9287A264BFD830A400F1E1F1A5F1EFC95C5239EC7D0B8205F50E83FC793F090C 1E674F3447DB517D62748AF2F957C1B02B81BE612E398CFAFFAABBCD50D453B7 B030C357C54B4435CC7390AFEB000DCCE5D9C9E9E4274B60E55B866E41291701 2318E8D7DF722EF55712AA64B98FFB856499B790146AF3159F1339117C0935B2 4856A16B652F321E3FFC88D311AEB6B527A7B0A989279063DA76CF96DAB08B23 6069C893F421DAFC514CDA6343EE5E9F97A58474014594B0AAA1074CB92DEAB0 F38C0AC50C885BEC1B29748B8AE7FB7E08E225E189940793A439C3EA28AD2EC8 5E1E67230EB9042B1AF5CB463609FE7C4B9A461A4803E285C3C4681A0E3D426A F21B270A59B8AFD0EEE0D1693AB375DDFC3FFE3B5BF4622E2ACFF8BC3E2E94B5 4BA37012472FB26A6580BBA5F4F5F7F2DD1692670918DD3B18298B84BACD8998 B93604AB1B3748A75BA62E4740AB7BDE1A864438F7867083370AE01524F7D8B4 2ACCD4B5AB5CFF3CF7B6697BA0D9673B80C66D9E70E564AA75A07167F6A07AD4 D13FF579C81665E3FFB4CE3C731A20DD46AF0B32D67E909C4869FEB4C4ED352F 535434116B1ADA40B98FDDE8B6A229A4D300CB56A5DD6F9F9FDEFEA3EEC98559 D9EE1E31FE6A6540424B2600AE26E639C825843C71FC1CCC9C1A14548351A331 772DECB17E479FCB62FCECDBE1C361E2CAE6B995E916021B0CD198 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 7 /caron put dup 71 /G 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 4205FDFF84F6B1279B7674E8DE6DCE1063C9E4118FF05C936431122E61073092 C7AB9D34C66D72A19D11C4EB4BD4C9FD60F8F43521251AA3CA90AD4517664D23 9AC96DF4437EF5A80E21CB1FB19864CB2192C1B81BDD87430EA6CC8D6FE62BE6 F8E20537303758CCE2376A77730BDBAB081CD511D6D06F5E742B2927C4EA5BB6 0391730CCC3278B317A8CB5D0CD45BC04BCB150B362E881CEE82E2CFD4947AE7 3A5BAF3E12C8A8DA92F59FFFD620DE6C6B87B0245356A739F625850F79AB4AF5 555250A4E5A4891292D123DFFE3400DF051A52DC6F27D806BA9F2882486E1A9B B5615D339AFEAB59F2B5B04AD39BFE9962113C997AE10D24AA640488D296E8F3 EE0A0C61579ED6AA1D1CBF98B697C08E13C2B3955C331313703D188FD8B4EE58 D2196051B0CBA1B8A71EA5512C7609DDA22B40B82FC8E3201A934BBA2139681C 494C7F2FD7EAD77E93527E9F9FA3F65BF20C30DEE4E79FA76722407C90124C4B CB4403FCBA22C2EEA16BAA1DC19C5BD97B5B1DC5D5D56F30739893BFE0D40A2C C1BDDFC6EC833B9AD95DB241A59D9726CCEFF77072DA19B7B02BF40F24B2A86A 357A5C439130895AD4E535BE21C7BB7740E3CA522A9DFB02F73771484A59F9F1 E7591CED1AF1591FEE7BCBC86F516C7BA141441FF79A7CEF77F49C5C4D17ED6D F3ADC427AFB049BF60AD6788ED2C786ED2275AEE20A36EE4C77CA3B2AF407D8B B4651DC2DCC0528275D4500AED080D85E17CC9E05EF487D6F378B58AE53D96D5 5930BFEA7766A734C7082ED09958E703F74607D7819AE8AD9C35E0199E997C41 8759B0DC00D855A46B4836C488EA54DE8957686649506D0FF3885716963404F3 16ECC18897582CDBDAED6F81220C52D028CB3185A5FFAF3EE4B5514355FE060E AC14244C421456BB3E06591DEEB9DCDC135C6D 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 cleartomark{restore}if %%EndFont TeXDict begin 39158280 55380996 1000 600 600 (cslurs2k.dvi) @start /Fa 134[44 3[46 1[33 33 1[46 3[23 6[37 16[60 8[65 75[{}9 83.022 /CMR10 rf /Fb 184[106 63[0 7[{}2 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 -364 -2 2350 4 v -364 31 V -364 64 V -364 98 V -364 131 V -364 96 a Fb(G)109 136 y slur@Dict begin CP /S0y1 ED /S0x1 ED /S0hgt (-0.79999pt) 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 109 136 a 76 164 60 4 v 86 247 4 85 v 87 162 a Fb(\007)292 46 y slur@Dict begin (2.0pt) GD S0hgt (10.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 292 46 a 292 46 a end 292 46 a 272 162 4 117 v -19 w Fb(\007)p 459 131 4 135 v 552 136 a slur@Dict begin CP /S0y1 ED /S0x1 ED /S0hgt (-0.79999pt) 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 552 136 a 509 411 a Fa(T)n(yp)r(e)27 b(K)g(slurs)p 519 164 60 4 v 529 247 4 85 v 530 162 a Fb(\007)735 -20 y slur@Dict begin (2.0pt) GD S0hgt (18.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 735 -20 a 735 -20 a end 735 -20 a 715 96 4 117 v -19 w Fb(\007)925 136 y slur@Dict begin CP /S0y1 ED /S0x1 ED /S0hgt (-0.79999pt) 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 925 136 a 892 164 60 4 v 902 247 4 85 v 903 162 a Fb(\007)1109 -103 y slur@Dict begin (2.0pt) GD S0hgt (28.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 1109 -103 a 1109 -103 a end 1109 -103 a 1079 -35 60 4 v 1079 -69 V 1079 -102 V 1089 63 4 167 v -19 w Fb(\007)p 1276 131 4 135 v 1368 136 a slur@Dict begin CP /S0y1 ED /S0x1 ED /S0hgt (-0.79999pt) 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 1368 136 a 1335 164 60 4 v 1345 247 4 85 v 1346 162 a Fb(\007)1552 -220 y slur@Dict begin (2.0pt) GD S0hgt (42.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 1552 -220 a 1552 -220 a end 1552 -220 a 1522 -35 60 4 v 1522 -69 V 1522 -102 V 1522 -135 V 1522 -168 V 1522 -201 V 1532 63 4 283 v -19 w Fb(\007)p 1982 131 4 135 v 1986 295 a slur@Dict begin /pss@rega 0 N /psc@rega 0 N /pst@rega 0 N end 1986 295 a eop end %%Trailer userdict /end-hook known{end-hook}if %%EOF