path: root/Master/texmf-dist/doc/generic/pmx/pmxccn/eps/grace.eps

%% LaTeX2e file `eps/grace.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: grace.dvi
%%CreationDate: Sun Sep 28 15:50:01 2003
%%Pages: 1
%%PageOrder: Ascend
%%BoundingBox: 28 742 453 792
%%DocumentFonts: TeXMUSIX16-Regular TeXMUSIX11-Regular
%%EndComments
%DVIPSWebPage: (www.radicaleye.com)
%DVIPSCommandLine: C:\MIKTEX\TEXMF\MIKTEX\BIN\DVIPS.EXE grace.dvi
%DVIPSParameters: dpi=600, compressed
%DVIPSSource:  TeX output 2003.09.28:1550
%%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: TeXMUSIX11-Regular
%!PS-AdobeFont-1.0: TeXMUSIX11-Regular 001.000
%%CreationDate: 01-07-25 at 04.06
%%VMusage: 1024 36750
% Generated by Fontographer 4.1.4
% converted using TeXtrace 0.45 and modified by T. Uchiyama
% ADL: 700 300 0
%%EndComments
FontDirectory/TeXMUSIX11-Regular known{/TeXMUSIX11-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 (TeXMUSIX11-Regular) readonly def
/FamilyName (TeXMUSIX11) readonly def
/Weight (Regular) readonly def
/ItalicAngle 0 def
/isFixedPitch false def
/UnderlinePosition -200 def
/UnderlineThickness 100 def
/Notice (converted using TeXtrace 0.45 and modified by T. Uchiyama) readonly def
/em 1000 def
/ascent 700 def
/descent 300 def
end readonly def
/FontName /TeXMUSIX11-Regular def
/Encoding 256 array
0 1 255 {1 index exch /.notdef put} for
dup 7 /caron put
dup 12 /ogonek put
dup 40 /parenleft put
dup 52 /four put
dup 154 /Zcaron put
dup 156 /IJ put
dup 217 /Ugrave 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{-619 -3182 6250 3186}readonly def
currentdict end
currentfile eexec
D9D66F633B846AB28EDC112EE8CE6C6736001234F4C7DFDC8C8014E32702D436
0A505E30AFE960AA59313499738A089E6AEAEFDC84AEBA57A1F9AD647CCB7BE5
B03F5F4993FB2566BC918B0AB23DB4629AC0D00174ECD9F3286839BBEA5DD0D6
84E25152E241F0D923ADCB347B5635EE25CE26F509B8F400F2C9CFB67D676ACF
9D516193DA983A07AC65A99BDDE6D09C93F522AF18F5462F7C2C3A7CD58FB034
810D4645AE7525C1BDF2E062C4D0BB1A115E406B09C9014323678B1FF15AC494
A82AC85A09051539D2EBF8D4910447B1C8875854670342B6D13D727DDBA5C2FD
52AFE2107B72A73D3A8F8B0516B5D141AA315F37523CA19009A6CEAB11C23A80
20B8C46718DBF2DBEAB3320A596C8992531F6E70A725359BD09EF9FF2C0E58DD
9EE54192A355EDB81FB6E2391CD91A9BBD4E6637ECE45183C178D3847B0FB289
46B756FBC5FAD23CE6463328E99E2A80937200E6A3461FBF2DBB214EE1579600
4A9B470D8843786B597FF0848602F82EF268B24C48444C4B9A0B5FB351F301DC
BE6BC9E931F91BA646527E757EA5F26869A7D18D6CE67AAF77C5E2E1E9D800D6
66DE6AC95C5DBD6168F315B796C216572D0646B5699EE61DE9D8E376A9919A8C
021117E920B3CF5F22FCE2F0C0135521CD2918E2CC1724397A5DA2F4FA4FC6EB
15FB0F97C550ECAB9072B42C64624FFBAF1DAB916980B717D891ACA289A4C82C
4B79717BCFB00CD29942100A6AE6E789E756155CA096F9852CBAC92D3B54F58A
3182CDA889F1DA0BC862298925493E267D7582D3A6008DE4305748A533EEC626
FF26D134BE2BA1C4E08EAABDE2F44BABE996BA2A9EFE7CF18BDB5E6A83187324
99A35C0D7564EDAAD95C6DCC8EA4F24A2949E598EF7A873E92B7538116F8E1B2
BF1C237B923C9E86E570C91B876A4FEC2BB1FD8647270B7E6AB6C342212E388B
1F1A376CCDC09148529FBA57A392030BCC14BCD0533218432405C73DB5BF4C51
9AE659559E928C6E06E88D274DD8EEEDA3DF54ACB30DEEF8E09DBE901FF13765
698AC821BE0D84FF77122EE2A78D05A41ACB175D7D4DA1DE8CC0FFCFD493EB72
33EE82115905B77CC0C91AFFC83BE6A2B1CF083C718A7B1B36913B032095ECC0
42377558646B7A8EE402D8B9C63B03F236BEB5FB181701A6993C4C2BD002D0E6
B37E7BAC1A3C29BEC60629602AE201EAE23C4DEC09B7767585443436C3FB1E81
D846393DA3F4581BB3CEEC31ACFD76C69688F132A1B6BBC5D0ECD97DF776BFFC
F5654F7147B8B84C545D3E5D0EAD5A168C76B2B96C6CC82A1C88BCAB20F1992F
25FA93E98B38DDC599F5B09D4265C3430DB857CCBD6A49E13FACB92F33037FBB
ACA91AA44045BA5A5A0B13A8CBC8693DC3F004BA247EB1C09D4818DA706DC06F
3BABB74CD5149D8B6F296FBB7614A807AED6CAA479F4D590F8EB2E717A0D0427
075A1B3A3ABEAC356EC120CCBEE31B848CD86131CFA88CF1AF91BD4F90A14BE2
2FCA3A0D44585E55AF59A9B3F04955D294CC69F2FBA32BBBD1FA95797443331B
3D332AE547D0D69449F294317EEB6180A89C86182D37840D3345634AC85CFD40
C1C23E24BF7708188165F237333AE6848A243C03353C04E10B84606E855B7B7E
6AC65568F00CC22CC3330BBEE50D516DC86951305859BFA76744E8B89973B55C
1F4E06F1BC4489A2B22B6A800C9C705915650E1225292E42DCD659CBCB38CD78
B48C1202E69BF0BCCBD6B04954748941D3B83F378E7241BBBE2365EF849276E0
E2D8602D627682C1162E58BA92371282FC789C86E135520DFA8EA0FAE66922B9
E42E93677C22DECAA731288F55DAA00EE2F6E55026E350B62F087D4FA4284CB9
131D4C71390462E2115DC92CF64DB7CCC36A4531B41FF04C6044FCA5A7454193
9231591CAA36FDCBC8424CF6015CD2BB5D1F9EFC1B9E050735BF2CD08C35C1DD
04B8E04BDB6694AEE7D63B322682DD9C7BB481D65326D1BD15DEA4635C14531C
099806B029B802A21FD38638A84293DA46724EE2A862A7519DA1622342E16E1E
63B6E133C5FF0C22D1E170399A40BF79D7A98A4A7F7454916CAFD0B323B2504F
5AB50BD8B9A1E00CDE0D4DE18873932EC3FD6D73C9025E1F05AD236D183C46DC
D9203F0F69638B266D7CE7E5FBE7AB32761B883E9A0ADE0C36090DD7C5C19A4C
16559CCC3B3606016477EDDB7989C1F0806C014F8B1BF2DF7C5279D14FB71130
44DD923093974C627FE44502632899AD15650A7D80E848F92986FA69D5B9D7C2
7DBC711C55C53C9CB58637C3B824D5F539997315D03BB14D74A363FF6D4D2661
AFB2F5BB102E5445DDFF984A52C83493CE3279D6755C4D
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
cleartomark{restore}if
%%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 8 /breve put
dup 71 /G put
dup 80 /P put
dup 83 /S 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
4205FDFF814B479377B71DE1E6A5A3BEDF09B94CDF51C220CC1ECAAC6AD874D3
948549355B2CEBA27FC7AFAC507098CAC9DD91E34690FC4A1B2D0D9842C74229
2211E48F88FE8DDFA41CF4AFA7B074462E8516FDA8020B22ED5E653A4636F2E5
DB8CF80BEBC9E285DD5068AC96A4A7A48A1576634E8127149625577C6E731566
1972FA7FD06E79ECBD9B339A09CC5232ACFB27DD65A6F5CA9FD7CD00333AE027
DC29F9D371C82793A3C7BB27A6A3371E4D7B95B38854E444CF016E3B3AD1A5C0
6C864CCF1F697CEF5B54E6A965F1111AFADA9CC1BEDF5E8CA62898DDA388F959
9739A265F76AF43FEF59F6DD3892A98A3550F9E3505B1A1ED8870238738137FB
4D7D5C2D9B06772817336D4621C615EFA9EBBEE5DD74AD54CEDCEAB810A0603C
C282C4654FF06CCC8A720D6F923E8733FE8DA44F206019055A7FF5C045E12037
59F32DE4EB910BE1BFEC658EDEA9D466F6AC12674D7E0956A20E75F89C66E8B7
6075CA284279062DF03AFC8DFBCAD67457C273743B0623C2621FA25F8CD5F713
6AC582592A9CA18B571F8FF94F45AC9FCBE9BF92AF41AE23EB5B40EBD0EB3AF6
44E213247694D0218E4190ABDEBA3F2C8B740FD53E52617A88FA89A6A9934306
176D8B81BCC476296DDCA7F8D9CF6040F529B172A2C37904F5A605ACF2CD7DCC
DF7290D015A18B3BAE766A72F50E1DF43F8CBAD80C65740F39CFC5C1FC86D561
64A018166F8A32BB6B17B2F0EE29C1E874AEE817B113AF2990ADB8DC424EF2BD
C21058D11EE18FA66E738A1F2F91E88BD31AB6214574DE097CE2E6677AEF7DE5
923A4F8C9091DE0A3A20EC1DD11C904AD125BAF3EF223A3697DB947753E13235
21B321A742F8DCE96F46CC348FD2001FD230E118A9288EC4A9BD3088CBF0CF4E
6BC65E2D7DDE76E26C2707F17339B7582AAB4EF6B131C90EF0CF08561423E11E
475863C494A115F7660AD4F84AC33ADA86604DBFF136F748E84ED17AA22993AD
C7F82A1D8F640C6C19F853B01BEE3E87722D63BB153CCC0CBE025916C5ED7A0E
387531E4537A89221D8BE1E9CC50EBC7FEA9DA4C4F719293D0B0EE5842AF0693
9AB5259D313EA20A078B2D969704545FF9110B776AE0C9DC8CC76FEDDED1539D
15CC027A3384468481E4E64B395A09D0B7AD2B6BD55FF3FFD7F48E936ABDB97F
F952257D8384E42F0D7BB166F77C7F22F920C207F0658487F6BAE87CC1AA93C3
CA8B7B624C5144EE74DB4ACD9999DC5654294B49C5F1B7C0620E113AC2B66863
128EBAED2CB40A92EE481CBEFAC0892ABAA08F3A3AB76A59C4CB667D8F6A3A86
EAA221093FD30D7EA76EC2FE2565B7EBB72D2A6384E36ACCA49857A7EA7543EC
490827901ED698F2097A557BE7754F0D0D358E418A0BB1C9B66503A39174D614
91C2E917F0580AD603FCC9F3F46000159C102D538A011658
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
cleartomark{restore}if
%%EndFont
TeXDict begin 39158280 55380996 1000 600 600 (grace.dvi)
@start /Fa 38[33 60[266 1[66 101[26 11[0 27[0 4[0 7[{}7
85.0146 /TeXMUSIX11-Regular rf /Fb 172[66 2[0 8[106 62[0
0 7[{}5 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 -35 3529 4 v -364 -2 V -364
31 V -364 64 V -364 98 V -364 63 a Fb(G)-244 29 y(S)-121
-27 y
 slur@Dict begin CP /S0y1 ED /S0x1 ED /S0hgt (14.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
 -121 -27 a -112 -54 4 86 v -135 -54 a Fa(\007)p
-102 -69 39 4 v -71 -71 4 79 v -94 -71 a(\007)-110 -123
y(\232)-95 -126 y(\232)-110 -139 y(\232)-95 -142 y(\232)p
-61 -69 39 4 v -30 -87 4 72 v -53 -87 a(\007)-25 -103
y
 slur@Dict begin (2.0pt) GD S0hgt (24.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
 -25 -103 a -25 -103 a
 end
 -25 -103 a -23 -69 60 4 v -23
-102 V -13 29 4 133 v 13 w Fb(\007)252 -64 y
 slur@Dict begin CP /S0y1 ED /S0x1 ED /S0hgt (19.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
 252 -64
a 229 79 4 117 v 230 -37 a Fb(\007)p 282 49 4 70 v 283
-20 a Fa(\007)283 49 y(\331)293 51 y(\331)342 -4 y
 slur@Dict begin (2.0pt) GD S0hgt (12.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
 342
-4 a 342 -4 a
 end
 342 -4 a 322 59 4 63 v -19 w Fa(\007)p
474 129 4 117 v 475 13 a Fb(\007)672 -60 y
 slur@Dict begin CP /S0y1 ED /S0x1 ED /S0hgt (18.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
 672 -60 a
663 -69 39 4 v 694 -87 4 70 v 695 -87 a Fa(\014)-24 b(\007)709
-103 y
 slur@Dict begin (2.0pt) GD S0hgt (24.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
 709 -103 a 709 -103 a
 end
 709 -103 a 711 -69 60 4
v 711 -102 V 721 29 4 133 v 13 w Fb(\007)p 965 98 4 135
v 1029 46 4 70 v 1030 46 a Fa(\()g(\007)p 1093 63 4 117
v 1055 63 a Fb(\007)1225 195 y Fa(4)p 1244 131 39 4 v
1245 164 V 1246 197 V 1277 195 4 70 v 27 w(\()g(\007)p
1294 131 60 4 v 1294 164 V 1342 179 4 150 v 1304 179
a Fb(\007)p 1536 131 60 4 v 1584 129 4 117 v 1546 129
a(\007)1630 139 y
 slur@Dict begin CP /S0y1 ED /S0x1 ED /S0hgt (-5.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
 1630 139 a 1638 112 4 151 v 1615 112
a Fa(\007)p 1678 96 4 145 v 1655 96 a(\007)p 1718 79
4 138 v 1695 79 a(\007)p 1758 63 4 131 v 1735 63 a(\007)p
1798 46 4 125 v 1775 46 a(\007)p 1837 29 4 118 v 1814
29 a(\007)p 1877 13 4 111 v 1854 13 a(\007)p 1917 -4
4 105 v 1894 -4 a(\007)p 1957 -20 4 98 v 1934 -20 a(\007)p
1997 -37 4 91 v 1974 -37 a(\007)p 2037 -54 4 85 v 2014
-54 a(\007)p 2047 -69 39 4 v 2078 -71 4 78 v 2055 -71
a(\007)1638 -6 y(\234)1852 -61 y(\234)1638 -22 y(\234)1852
-77 y(\234)1638 -38 y(\234)1852 -92 y(\234)p 2088 -69
39 4 v 2119 -87 4 72 v 2096 -87 a(\007)2124 -103 y
 slur@Dict begin (2.0pt) GD S0hgt (24.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
 2124
-103 a 2124 -103 a
 end
 2124 -103 a 2126 -69 60 4 v 2126 -102
V 2136 29 4 133 v 13 w Fb(\007)p 2378 98 4 135 v 2491
-14 a
 slur@Dict begin CP /S0y1 ED /S0x1 ED /S0hgt (13.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
 2491 -14 a 2468 129 4 117 v 2469 13 a Fb(\010)p
2695 99 4 70 v 2696 29 a Fa(\007)p 2735 99 4 53 v 2736
46 a(\007)p 2696 104 84 11 v 2795 29 a
 slur@Dict begin (2.0pt) GD S0hgt (8.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
 2795 29 a 2795
29 a
 end
 2795 29 a 2775 99 4 70 v -19 w Fa(\007)2815 -20
y Fb(P)p 2815 129 4 117 v 2816 13 a(\010)p 3161 98 4
135 v 3165 262 a
 slur@Dict begin /pss@rega 0 N /psc@rega 0 N /pst@rega 0 N end
 3165 262 a eop end
%%Trailer

userdict /end-hook known{end-hook}if
%%EOF