diff options
Diffstat (limited to 'Master/texmf-dist/doc/generic/pmx/pmxccn/eps/bars.eps')
-rw-r--r-- | Master/texmf-dist/doc/generic/pmx/pmxccn/eps/bars.eps | 1432 |
1 files changed, 716 insertions, 716 deletions
diff --git a/Master/texmf-dist/doc/generic/pmx/pmxccn/eps/bars.eps b/Master/texmf-dist/doc/generic/pmx/pmxccn/eps/bars.eps index 497211e16f6..2ba98355761 100644 --- a/Master/texmf-dist/doc/generic/pmx/pmxccn/eps/bars.eps +++ b/Master/texmf-dist/doc/generic/pmx/pmxccn/eps/bars.eps @@ -1,716 +1,716 @@ -%% LaTeX2e file `eps/bars.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: bars.dvi
-%%CreationDate: Wed Jan 21 13:50:47 2004
-%%Pages: 1
-%%PageOrder: Ascend
-%%BoundingBox: 28 547 313 782
-%%DocumentFonts: TeXMUSIX16-Regular CMTT10
-%%EndComments
-%DVIPSWebPage: (www.radicaleye.com)
-%DVIPSCommandLine: C:\MIKTEX\TEXMF\MIKTEX\BIN\DVIPS.EXE bars.dvi
-%DVIPSParameters: dpi=600, compressed
-%DVIPSSource: TeX output 2004.01.21:1350
-%%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: CMTT10
-%!PS-AdobeFont-1.1: CMTT10 1.00B
-%%CreationDate: 1992 Apr 26 10:42:42
-% 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 (CMTT10) readonly def
-/FamilyName (Computer Modern) readonly def
-/Weight (Medium) readonly def
-/ItalicAngle 0 def
-/isFixedPitch true def
-end readonly def
-/FontName /CMTT10 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 68 /D put
-dup 82 /R put
-dup 98 /b put
-dup 100 /d put
-dup 108 /l put
-dup 114 /r put
-dup 122 /z put
-readonly def
-/FontBBox{-4 -235 731 800}readonly def
-/UniqueID 5000832 def
-currentdict end
-currentfile eexec
-D9D66F633B846A97B686A97E45A3D0AA052A014267B7904EB3C0D3BD0B83D891
-016CA6CA4B712ADEB258FAAB9A130EE605E61F77FC1B738ABC7C51CD46EF8171
-9098D5FEE67660E69A7AB91B58F29A4D79E57022F783EB0FBBB6D4F4EC35014F
-D2DECBA99459A4C59DF0C6EBA150284454E707DC2100C15B76B4C19B84363758
-469A6C558785B226332152109871A9883487DD7710949204DDCF837E6A8708B8
-2BDBF16FBC7512FAA308A093FE5F00F963068B8232429ED8B7CF6A3D879A2D19
-38DD5C4467F9DD8C5D1A2000B3A6BF2F25629BAEC199AE8BD4BA6ED9BBF7DABF
-D0E153BAB1C17900D4FCE209622ACD19E7C74C2807D0397357ED07AB460D5204
-EB3A45B7AC4D106B7303AD8348853032A745F417943F9B4FED652B835AA49727
-A8B4117AFF1D4BCE831EB510B6851796D0BE6982B76620CB3CE0C22CACDD4593
-F244C14EEC0E5A7C4AC42392F81C01BC4257FE12AF33F4BFEA9108FF11CF9714
-4DD6EC70A2C4C1E4F328A1EB25E43525FB1E16C07E28CC359DF61F426B7D41EA
-6A0C84DD63275395A503AAE908E1C82D389FD12A21E86999799E7F24A994472E
-A10EAE77096709BE0D11AAD24A30D96E15A51D720AFB3B10D2E0AC8DC1A1204B
-E8725E00D7E3A96F9978BC19377034D93D080C4391E579C34FF9FC2379CB119F
-1E5BBEA91AE20F343C6420BE1E2BD0636B04FCCC0BEE0DC2D56D66F06DB22438
-452822CBEAF03EE9EAA8398F276EC0D92A7FB978C17805DB2F4A7DFBA56FD6AF
-8670EB364F01DE8FCAFBAF657D68C3A03112915736CEABAA8BA5C0AC25288369
-5D49BD891FABEFE8699A0AE3ED85B48ACB22229E15623399C93DE7D935734ADA
-DA7A1462C111D44AD53EA35B57E5D0B5FC0B481820E43222DB8EFCD5D30E15F9
-BA304FA879392EE0BCC1A77C8392948FE1B07931A19298FB60E443E198089A0A
-16D46095558E6DBAB7E03022F2A762470D545CE6B8D931FA66E63DDB04125D5E
-A2F86EC0944B0D160100C2DB33B92C400A8CCB715F68477177459BCD57C86D97
-449A25D63E9584EEF820A7AB919BC62D28434BFBA0EC53913CEB3BF4857057BB
-3FB43E95092D6DC0B7CE4E1D8C1FDD292F80E973E277C7FCC9878D2F97D0E3E9
-8DD466CCB4EEC3E16429C36FC9583A048A83F68049C707E5FC1473E7DF90125D
-BCC3489C04F227D170EA0C1E8E021294FBF894B19E966F94B1F3FF879474E9EA
-34D55A9EEB4459E5DBF801CDAB652D681BC673C26D3C73FE1AE6232638CB2582
-F75CA7F1BA6327B0A39B251E10606247224799C0B710586D3E3DDF28A5864D56
-6F5C532735511ECB7C52B7B6D47042B26B5C7B7D12DE631FE3BB27C41F4FB436
-5874CC0D1A182B42E4E0146BBECF156134C82BC2BE6F136D0439FF5B2585A53C
-7CB0DA52270915680C1610576D93988FC7CBCE8F8EEAD343E3ECEFC659191023
-535D48D74EF82BB5C27A4F560CF281011DBFB3AE77F0833EA7CB73F9812B6C57
-4F506493DDFF1FCB2FB7F9F4B2A47C512F51339FAD5776CBF8589F4C9FD3DBA0
-3EF6E49A632BF7DE5EC45B64A1F4ECF43A686529B303FE7A7A6F9BF69F3C40AA
-BFFB9D7E353A94D5829CE98C4B7A2AFB114183DA45B72912008470EAA54F3DA1
-1614F3572DF7D43FC9CD4F2278E704762F83464FB19C5B5F5940EF2F716CFCB8
-C09BBC8863D02E7CBBC3F9B1AB0D125837CA2BDDFA65ADE7B824DCB6753DCD85
-34FB2CB20A8A656A5B91896E629F88B5154687013151452CC2EE73E36C7D753A
-182B0BAC8AB381658DF10814D8C2A0F73A01FC220D1D53AE3CC92C910CAC5922
-F6AFB148FCE2FA7ACD5D5FEAB7B6C6A1BD4E6F8E61B2B8C26A1EFF7D7EE86171
-437F24D239CDAC3ECA00F77AF773067C4C4759322BAA23F3B6469506D5E38BFE
-6F3996001BC328E6E729E810C5FB083E7C6B004DDE9B0F4B3E605DDC7157570B
-F9274971D48919E8BA3457D005A9C5ACBF0E52BB9F1908D48215F6542C6A7833
-6BFB77D9D6C791BD63B7CDA608E9F06BA20DDEC232B6AE477C2422A39ED8E31B
-0BB9134DDFE14371AE8B33281C5998DB170387BC3D47F241BE6D4A8EE7D3AF53
-EAB42411AE0AA34B548C4E1B8EC8AD38647A4FA834E3E4830B5F83E1D2DD5D2B
-8ED9F4816FEAC5DC6E80968AAD0AEDC47D092B8B9A90A0BA1CCC44AC2981940F
-F040B09E085538B9D1C951D4E9D935271BE98D00DDF221DA25F993F7D86EF134
-61CC5EE31412D6C4ED6838337F04058281F5A4D350CD920F85BAB48E5CA2599C
-B6701ECDC005DF577D8AAD692F4A4CD74939D1D5F04B2663BE718EFF2C356C10
-D38D5A3AC19C37409358D389258D904D6B5AACBC67C8F390B2B402F07E087AB7
-B61EFF8AD14FFBBE455A478244C0B62A636E998D44AE5DBB1F382DC641B706C0
-03A84B77A058ABE27076A2C241E6E419DBB5896BF6F28469924DE46ADAF38730
-A412BE10349E3D0D6667CE70A39B3AB37F9FE7C76C1900E187C4729279A7D965
-6D90E03FFC2AE9BF8EC8B9B127A7AEC3F7180C6D7EE5F55E8BD5C2A727F29105
-BEF5A6D1938CAEAE4C0538D8C0AD5BADA198B16172907A85AB66F78E3B576C96
-5DE54A91F8F281E296F6F266CD43305700E77E5C63A4F1EA12655C29CF5BFFC9
-0C961AD8806EBDDB4A2C88A269743872352941861AFA9EA2F0E454F32A2083C0
-25707C49420EA0995CDB31576185F222343A2182B33E5FACB7A0207E4F007C3E
-B33FF24BFB4A5D326517095A17A9D5C967DBFA445B473D3B13285D7AD0553005
-95CB964F310AF4073E54681ECA050BBB3C7F1B0EA6FD2610DA3C00A96AD89D52
-D8AC5A139AC2A6A4A02C29962574628518C4FE1C3197730326117913CB9E73D5
-6B2C227DF81855B9FB7C69357C816EADC44B9BE9677B617A43B25721DE6F0542
-DB1FE7C1B6D5C6CFC9E2D443B93C7CB809A71BBE8888955567EAC8AB7C2DA3BA
-3F1CC797CE77D691FDAE14F81CF8459106809B17E4BADBE2800BEDE109A60918
-EC17AC66FAE2711900EA359C7253F607B52F3EFD436D360CD94F92C0D2BEC384
-637E902FA1FFD02AED29A128023FAD394A133C64E3CB68CE31D32F14D6AD272F
-1F1FA973CFDE594BC034D2EB3EA7B764B4A9B9BC450A19D4D91FE0CD74C5B27E
-C27782FB06F3D72CF84A2AE568A9FF156A1BD34362A0410FE2D4DC743BC7836C
-7FFCC14105BBFB20CB771FB38124B53DE215B358B128E41A50FB3B92A8B60587
-4A1B5BB1AD88F4892F70D3478AC94AD461A719D9975E6AD9C8817609220DDC03
-C71B73A07D22C6A7F585156069CBCF4DBA04150310CFE84DFF58D16F99401623
-E678C1E449EADF915E4E55042D3D485F4586BA0DE0D755FAA961992F209FA94E
-479FC5A2DFCE519EA914A7A43D36E5F0AFD493F548EC2415547FD0EDEDEF6D3E
-99EEDF2E491CECFFC3922659123D9369129ADF512DB339552BDD2EF629679414
-EA5986E95944BDAA58EA49D3364C526457694C47
-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 55 /seven 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
-4205FDFF83287B2C762EFD151232F1E1B856941A07C76AD4A6030971385C9614
-AF82D00B6895EE8090AE00C2AABDB1D374E9C0317A2F09AC4177697BF63E3627
-D9EBBE30E9D146E27FC0ADC8AE7C3D7A1991AD1D359B07E351803740C4B8309E
-79BEA25ACF13873C669756B9D73223D3E289CFD6FA0F87BF343611A2F54A1D02
-CA34055BBBD5B262CBB18998FB2D253017D1A87DE221B566B0AD4B363C2FF090
-128A8879E4D361053E6506D3F85F85BC040258DB2EF8859D898A60C87448EA99
-01715FF1B7816D8AF69443062C892A86A89DB67A009C31DBD87781C9C5255EAB
-F55969CD0C81800DECFEDB795B410D59D8ED4D61483D286A7994784588F802E5
-C6855AEB0D88E059CC4E66D721570545883A15FBA0D86B87EB2C7140FB7F4BCE
-D7B39DF43D0702D3189A48C38F0A5C46A4556A75B08018D68F2E5C183CBC97EF
-61AC87AF08AC93A433F81432FFE017C15B10022E061AC5D5B6B812E65ED7F9EE
-0C03751077B51F590D22923CBFB4802CB5A4FCD94EBA79FFE335352993F38347
-9618BC5CCCF2E29D8B5F1FF30FB396BE8CD00708F2561F78FF0926E007323FD6
-33A86584AF10FCE84F35780238679F9566ED55C213216D9BA04665001ECE96B7
-3757ABD09CF8DA42DD884670B2592449AA7566E9ED55743531CDBDC2C7F132E2
-75496EF5A49560CD1F1C2B2658C53ED31D302CD20A76674A470D4DF6EAEFEE76
-6BA3E7ACD35A76409267F2330145EC2FC59AC0B71D41798817216A5EE1D7E309
-D121C7781F4E84C4D56A3E5DF56433470ACEA996ADE1F8BACA27BC373E96A0F5
-3BDCD364187DFD94F5F4142BB91805865A3C906DBF072A19BE0FBF6A3848B720
-9428C9DD806A507D675B4CCE83C9E5ECB2738A8FFD801B0BC31DE582D629AB5E
-98A4B4085FB2341A8BFCBFAE18A1B97811001A943178C668EA844AA6DE3A8ADD
-9BF3BB5CEC200AAD4A686599331C4017DAB19B8199229DA382EA87A9DA562A16
-71F3465AE3F4F1BEBE3C2530BB7B1751ED796E9D4F5D122FAC582D0B632C0B5A
-4CE6D47FDAC75F
-0000000000000000000000000000000000000000000000000000000000000000
-0000000000000000000000000000000000000000000000000000000000000000
-0000000000000000000000000000000000000000000000000000000000000000
-0000000000000000000000000000000000000000000000000000000000000000
-0000000000000000000000000000000000000000000000000000000000000000
-0000000000000000000000000000000000000000000000000000000000000000
-0000000000000000000000000000000000000000000000000000000000000000
-0000000000000000000000000000000000000000000000000000000000000000
-cleartomark{restore}if
-%%EndFont
-TeXDict begin 39158280 55380996 1000 600 600 (bars.dvi)
-@start /Fa 133[44 7[44 5[44 7[44 1[44 15[44 13[44 68[{}7
-83.022 /CMTT10 rf /Fb 184[106 15[0 47[0 7[{}3 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 2350 4 v -364 -2 V -364
-31 V -364 64 V -364 98 V -364 63 a Fb(G)p -148 131 60
-4 v -100 129 4 117 v -138 129 a(\007)402 229 y Fa(Rl)p
-153 131 60 4 v 201 129 4 117 v 163 129 a Fb(\007)p 464
-98 20 135 v 494 98 4 135 v 517 29 a(7)p 613 131 60 4
-v 661 129 4 117 v 623 129 a(\007)1163 229 y Fa(Rr)p 914
-131 60 4 v 962 129 4 117 v 924 129 a Fb(\007)1225 29
-y(7)p 1245 98 4 135 v 1258 98 20 135 v 1374 131 60 4
-v 1422 129 4 117 v 1384 129 a(\007)1884 229 y Fa(Rz)p
-1675 131 60 4 v 1723 129 4 117 v 1685 129 a Fb(\007)1986
-262 y
- slur@Dict begin /pss@rega 0 N /psc@rega 0 N /pst@rega 0 N end
- 1986 262 a -364 504 2350 4 v -364 538 V -364 571
-V -364 604 V -364 637 V -364 602 a Fb(G)p -97 670 60
-4 v -49 668 4 117 v -87 668 a(\007)715 768 y Fa(Rlr)p
-346 670 60 4 v 394 668 4 117 v 356 668 a Fb(\007)799
-569 y(7)p 819 637 20 135 v 849 637 V 90 w(7)p 1036 670
-60 4 v 1084 668 4 117 v 1046 668 a(\007)1848 768 y Fa(Rlr)p
-1479 670 60 4 v 1527 668 4 117 v 1489 668 a Fb(\007)1933
-569 y(7)p 1953 637 4 135 v 1966 637 20 135 v 1986 802
-a
- slur@Dict begin /pss@rega 0 N /psc@rega 0 N /pst@rega 0 N end
- 1986 802 a -364 1044 2350 4 v -364 1077 V -364 1110
-V -364 1144 V -364 1177 V -364 1142 a Fb(G)p -97 1177
-20 135 v -67 1177 4 135 v -44 1109 a(7)p 93 1210 60 4
-v 141 1208 4 117 v 103 1208 a(\007)837 1308 y Fa(Rdl)p
-509 1210 60 4 v 557 1208 4 117 v 519 1208 a Fb(\007)p
-934 1177 20 135 v 964 1177 4 135 v 987 1109 a(7)p 1124
-1210 60 4 v 1172 1208 4 117 v 1134 1208 a(\007)1869 1308
-y Fa(Rdl)p 1540 1210 60 4 v 1588 1208 4 117 v 1550 1208
-a Fb(\007)p 1966 1177 4 135 v 1982 1177 V 1986 1341 a
- slur@Dict begin /pss@rega 0 N /psc@rega 0 N /pst@rega 0 N end
-
-1986 1341 a -364 1584 2350 4 v -364 1617 V -364 1650
-V -364 1683 V -364 1716 V -364 1682 a Fb(G)p -143 1716
-20 135 v -113 1716 4 135 v -90 1648 a(7)p 1 1750 60 4
-v 49 1748 4 117 v 11 1748 a(\007)496 1848 y Fa(Rd)p 287
-1750 60 4 v 335 1748 4 117 v 297 1748 a Fb(\007)p 583
-1716 4 135 v 600 1716 V 694 1750 60 4 v 742 1748 4 117
-v 407 w(\007)1229 1848 y Fa(RD)p 980 1750 60 4 v 1028
-1748 4 117 v 990 1748 a Fb(\007)p 1276 1716 4 135 v 1289
-1716 20 135 v 1400 1750 60 4 v 1448 1748 4 117 v 420
-w(\007)1896 1848 y Fa(Rb)p 1686 1750 60 4 v 1734 1748
-4 117 v 1696 1748 a Fb(\007)p 1982 1716 4 135 v 1986
-1881 a
- slur@Dict begin /pss@rega 0 N /psc@rega 0 N /pst@rega 0 N end
- 1986 1881 a eop end
-%%Trailer
-
-userdict /end-hook known{end-hook}if
-%%EOF
+%% LaTeX2e file `eps/bars.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: bars.dvi +%%CreationDate: Wed Jan 21 13:50:47 2004 +%%Pages: 1 +%%PageOrder: Ascend +%%BoundingBox: 28 547 313 782 +%%DocumentFonts: TeXMUSIX16-Regular CMTT10 +%%EndComments +%DVIPSWebPage: (www.radicaleye.com) +%DVIPSCommandLine: C:\MIKTEX\TEXMF\MIKTEX\BIN\DVIPS.EXE bars.dvi +%DVIPSParameters: dpi=600, compressed +%DVIPSSource: TeX output 2004.01.21:1350 +%%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: CMTT10 +%!PS-AdobeFont-1.1: CMTT10 1.00B +%%CreationDate: 1992 Apr 26 10:42:42 +% 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 (CMTT10) readonly def +/FamilyName (Computer Modern) readonly def +/Weight (Medium) readonly def +/ItalicAngle 0 def +/isFixedPitch true def +end readonly def +/FontName /CMTT10 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 68 /D put +dup 82 /R put +dup 98 /b put +dup 100 /d put +dup 108 /l put +dup 114 /r put +dup 122 /z put +readonly def +/FontBBox{-4 -235 731 800}readonly def +/UniqueID 5000832 def +currentdict end +currentfile eexec +D9D66F633B846A97B686A97E45A3D0AA052A014267B7904EB3C0D3BD0B83D891 +016CA6CA4B712ADEB258FAAB9A130EE605E61F77FC1B738ABC7C51CD46EF8171 +9098D5FEE67660E69A7AB91B58F29A4D79E57022F783EB0FBBB6D4F4EC35014F +D2DECBA99459A4C59DF0C6EBA150284454E707DC2100C15B76B4C19B84363758 +469A6C558785B226332152109871A9883487DD7710949204DDCF837E6A8708B8 +2BDBF16FBC7512FAA308A093FE5F00F963068B8232429ED8B7CF6A3D879A2D19 +38DD5C4467F9DD8C5D1A2000B3A6BF2F25629BAEC199AE8BD4BA6ED9BBF7DABF +D0E153BAB1C17900D4FCE209622ACD19E7C74C2807D0397357ED07AB460D5204 +EB3A45B7AC4D106B7303AD8348853032A745F417943F9B4FED652B835AA49727 +A8B4117AFF1D4BCE831EB510B6851796D0BE6982B76620CB3CE0C22CACDD4593 +F244C14EEC0E5A7C4AC42392F81C01BC4257FE12AF33F4BFEA9108FF11CF9714 +4DD6EC70A2C4C1E4F328A1EB25E43525FB1E16C07E28CC359DF61F426B7D41EA +6A0C84DD63275395A503AAE908E1C82D389FD12A21E86999799E7F24A994472E +A10EAE77096709BE0D11AAD24A30D96E15A51D720AFB3B10D2E0AC8DC1A1204B +E8725E00D7E3A96F9978BC19377034D93D080C4391E579C34FF9FC2379CB119F +1E5BBEA91AE20F343C6420BE1E2BD0636B04FCCC0BEE0DC2D56D66F06DB22438 +452822CBEAF03EE9EAA8398F276EC0D92A7FB978C17805DB2F4A7DFBA56FD6AF +8670EB364F01DE8FCAFBAF657D68C3A03112915736CEABAA8BA5C0AC25288369 +5D49BD891FABEFE8699A0AE3ED85B48ACB22229E15623399C93DE7D935734ADA +DA7A1462C111D44AD53EA35B57E5D0B5FC0B481820E43222DB8EFCD5D30E15F9 +BA304FA879392EE0BCC1A77C8392948FE1B07931A19298FB60E443E198089A0A +16D46095558E6DBAB7E03022F2A762470D545CE6B8D931FA66E63DDB04125D5E +A2F86EC0944B0D160100C2DB33B92C400A8CCB715F68477177459BCD57C86D97 +449A25D63E9584EEF820A7AB919BC62D28434BFBA0EC53913CEB3BF4857057BB +3FB43E95092D6DC0B7CE4E1D8C1FDD292F80E973E277C7FCC9878D2F97D0E3E9 +8DD466CCB4EEC3E16429C36FC9583A048A83F68049C707E5FC1473E7DF90125D +BCC3489C04F227D170EA0C1E8E021294FBF894B19E966F94B1F3FF879474E9EA +34D55A9EEB4459E5DBF801CDAB652D681BC673C26D3C73FE1AE6232638CB2582 +F75CA7F1BA6327B0A39B251E10606247224799C0B710586D3E3DDF28A5864D56 +6F5C532735511ECB7C52B7B6D47042B26B5C7B7D12DE631FE3BB27C41F4FB436 +5874CC0D1A182B42E4E0146BBECF156134C82BC2BE6F136D0439FF5B2585A53C +7CB0DA52270915680C1610576D93988FC7CBCE8F8EEAD343E3ECEFC659191023 +535D48D74EF82BB5C27A4F560CF281011DBFB3AE77F0833EA7CB73F9812B6C57 +4F506493DDFF1FCB2FB7F9F4B2A47C512F51339FAD5776CBF8589F4C9FD3DBA0 +3EF6E49A632BF7DE5EC45B64A1F4ECF43A686529B303FE7A7A6F9BF69F3C40AA +BFFB9D7E353A94D5829CE98C4B7A2AFB114183DA45B72912008470EAA54F3DA1 +1614F3572DF7D43FC9CD4F2278E704762F83464FB19C5B5F5940EF2F716CFCB8 +C09BBC8863D02E7CBBC3F9B1AB0D125837CA2BDDFA65ADE7B824DCB6753DCD85 +34FB2CB20A8A656A5B91896E629F88B5154687013151452CC2EE73E36C7D753A +182B0BAC8AB381658DF10814D8C2A0F73A01FC220D1D53AE3CC92C910CAC5922 +F6AFB148FCE2FA7ACD5D5FEAB7B6C6A1BD4E6F8E61B2B8C26A1EFF7D7EE86171 +437F24D239CDAC3ECA00F77AF773067C4C4759322BAA23F3B6469506D5E38BFE +6F3996001BC328E6E729E810C5FB083E7C6B004DDE9B0F4B3E605DDC7157570B +F9274971D48919E8BA3457D005A9C5ACBF0E52BB9F1908D48215F6542C6A7833 +6BFB77D9D6C791BD63B7CDA608E9F06BA20DDEC232B6AE477C2422A39ED8E31B +0BB9134DDFE14371AE8B33281C5998DB170387BC3D47F241BE6D4A8EE7D3AF53 +EAB42411AE0AA34B548C4E1B8EC8AD38647A4FA834E3E4830B5F83E1D2DD5D2B +8ED9F4816FEAC5DC6E80968AAD0AEDC47D092B8B9A90A0BA1CCC44AC2981940F +F040B09E085538B9D1C951D4E9D935271BE98D00DDF221DA25F993F7D86EF134 +61CC5EE31412D6C4ED6838337F04058281F5A4D350CD920F85BAB48E5CA2599C +B6701ECDC005DF577D8AAD692F4A4CD74939D1D5F04B2663BE718EFF2C356C10 +D38D5A3AC19C37409358D389258D904D6B5AACBC67C8F390B2B402F07E087AB7 +B61EFF8AD14FFBBE455A478244C0B62A636E998D44AE5DBB1F382DC641B706C0 +03A84B77A058ABE27076A2C241E6E419DBB5896BF6F28469924DE46ADAF38730 +A412BE10349E3D0D6667CE70A39B3AB37F9FE7C76C1900E187C4729279A7D965 +6D90E03FFC2AE9BF8EC8B9B127A7AEC3F7180C6D7EE5F55E8BD5C2A727F29105 +BEF5A6D1938CAEAE4C0538D8C0AD5BADA198B16172907A85AB66F78E3B576C96 +5DE54A91F8F281E296F6F266CD43305700E77E5C63A4F1EA12655C29CF5BFFC9 +0C961AD8806EBDDB4A2C88A269743872352941861AFA9EA2F0E454F32A2083C0 +25707C49420EA0995CDB31576185F222343A2182B33E5FACB7A0207E4F007C3E +B33FF24BFB4A5D326517095A17A9D5C967DBFA445B473D3B13285D7AD0553005 +95CB964F310AF4073E54681ECA050BBB3C7F1B0EA6FD2610DA3C00A96AD89D52 +D8AC5A139AC2A6A4A02C29962574628518C4FE1C3197730326117913CB9E73D5 +6B2C227DF81855B9FB7C69357C816EADC44B9BE9677B617A43B25721DE6F0542 +DB1FE7C1B6D5C6CFC9E2D443B93C7CB809A71BBE8888955567EAC8AB7C2DA3BA +3F1CC797CE77D691FDAE14F81CF8459106809B17E4BADBE2800BEDE109A60918 +EC17AC66FAE2711900EA359C7253F607B52F3EFD436D360CD94F92C0D2BEC384 +637E902FA1FFD02AED29A128023FAD394A133C64E3CB68CE31D32F14D6AD272F +1F1FA973CFDE594BC034D2EB3EA7B764B4A9B9BC450A19D4D91FE0CD74C5B27E +C27782FB06F3D72CF84A2AE568A9FF156A1BD34362A0410FE2D4DC743BC7836C +7FFCC14105BBFB20CB771FB38124B53DE215B358B128E41A50FB3B92A8B60587 +4A1B5BB1AD88F4892F70D3478AC94AD461A719D9975E6AD9C8817609220DDC03 +C71B73A07D22C6A7F585156069CBCF4DBA04150310CFE84DFF58D16F99401623 +E678C1E449EADF915E4E55042D3D485F4586BA0DE0D755FAA961992F209FA94E +479FC5A2DFCE519EA914A7A43D36E5F0AFD493F548EC2415547FD0EDEDEF6D3E +99EEDF2E491CECFFC3922659123D9369129ADF512DB339552BDD2EF629679414 +EA5986E95944BDAA58EA49D3364C526457694C47 +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 55 /seven 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 +4205FDFF83287B2C762EFD151232F1E1B856941A07C76AD4A6030971385C9614 +AF82D00B6895EE8090AE00C2AABDB1D374E9C0317A2F09AC4177697BF63E3627 +D9EBBE30E9D146E27FC0ADC8AE7C3D7A1991AD1D359B07E351803740C4B8309E +79BEA25ACF13873C669756B9D73223D3E289CFD6FA0F87BF343611A2F54A1D02 +CA34055BBBD5B262CBB18998FB2D253017D1A87DE221B566B0AD4B363C2FF090 +128A8879E4D361053E6506D3F85F85BC040258DB2EF8859D898A60C87448EA99 +01715FF1B7816D8AF69443062C892A86A89DB67A009C31DBD87781C9C5255EAB +F55969CD0C81800DECFEDB795B410D59D8ED4D61483D286A7994784588F802E5 +C6855AEB0D88E059CC4E66D721570545883A15FBA0D86B87EB2C7140FB7F4BCE +D7B39DF43D0702D3189A48C38F0A5C46A4556A75B08018D68F2E5C183CBC97EF +61AC87AF08AC93A433F81432FFE017C15B10022E061AC5D5B6B812E65ED7F9EE +0C03751077B51F590D22923CBFB4802CB5A4FCD94EBA79FFE335352993F38347 +9618BC5CCCF2E29D8B5F1FF30FB396BE8CD00708F2561F78FF0926E007323FD6 +33A86584AF10FCE84F35780238679F9566ED55C213216D9BA04665001ECE96B7 +3757ABD09CF8DA42DD884670B2592449AA7566E9ED55743531CDBDC2C7F132E2 +75496EF5A49560CD1F1C2B2658C53ED31D302CD20A76674A470D4DF6EAEFEE76 +6BA3E7ACD35A76409267F2330145EC2FC59AC0B71D41798817216A5EE1D7E309 +D121C7781F4E84C4D56A3E5DF56433470ACEA996ADE1F8BACA27BC373E96A0F5 +3BDCD364187DFD94F5F4142BB91805865A3C906DBF072A19BE0FBF6A3848B720 +9428C9DD806A507D675B4CCE83C9E5ECB2738A8FFD801B0BC31DE582D629AB5E +98A4B4085FB2341A8BFCBFAE18A1B97811001A943178C668EA844AA6DE3A8ADD +9BF3BB5CEC200AAD4A686599331C4017DAB19B8199229DA382EA87A9DA562A16 +71F3465AE3F4F1BEBE3C2530BB7B1751ED796E9D4F5D122FAC582D0B632C0B5A +4CE6D47FDAC75F +0000000000000000000000000000000000000000000000000000000000000000 +0000000000000000000000000000000000000000000000000000000000000000 +0000000000000000000000000000000000000000000000000000000000000000 +0000000000000000000000000000000000000000000000000000000000000000 +0000000000000000000000000000000000000000000000000000000000000000 +0000000000000000000000000000000000000000000000000000000000000000 +0000000000000000000000000000000000000000000000000000000000000000 +0000000000000000000000000000000000000000000000000000000000000000 +cleartomark{restore}if +%%EndFont +TeXDict begin 39158280 55380996 1000 600 600 (bars.dvi) +@start /Fa 133[44 7[44 5[44 7[44 1[44 15[44 13[44 68[{}7 +83.022 /CMTT10 rf /Fb 184[106 15[0 47[0 7[{}3 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 2350 4 v -364 -2 V -364 +31 V -364 64 V -364 98 V -364 63 a Fb(G)p -148 131 60 +4 v -100 129 4 117 v -138 129 a(\007)402 229 y Fa(Rl)p +153 131 60 4 v 201 129 4 117 v 163 129 a Fb(\007)p 464 +98 20 135 v 494 98 4 135 v 517 29 a(7)p 613 131 60 4 +v 661 129 4 117 v 623 129 a(\007)1163 229 y Fa(Rr)p 914 +131 60 4 v 962 129 4 117 v 924 129 a Fb(\007)1225 29 +y(7)p 1245 98 4 135 v 1258 98 20 135 v 1374 131 60 4 +v 1422 129 4 117 v 1384 129 a(\007)1884 229 y Fa(Rz)p +1675 131 60 4 v 1723 129 4 117 v 1685 129 a Fb(\007)1986 +262 y + slur@Dict begin /pss@rega 0 N /psc@rega 0 N /pst@rega 0 N end + 1986 262 a -364 504 2350 4 v -364 538 V -364 571 +V -364 604 V -364 637 V -364 602 a Fb(G)p -97 670 60 +4 v -49 668 4 117 v -87 668 a(\007)715 768 y Fa(Rlr)p +346 670 60 4 v 394 668 4 117 v 356 668 a Fb(\007)799 +569 y(7)p 819 637 20 135 v 849 637 V 90 w(7)p 1036 670 +60 4 v 1084 668 4 117 v 1046 668 a(\007)1848 768 y Fa(Rlr)p +1479 670 60 4 v 1527 668 4 117 v 1489 668 a Fb(\007)1933 +569 y(7)p 1953 637 4 135 v 1966 637 20 135 v 1986 802 +a + slur@Dict begin /pss@rega 0 N /psc@rega 0 N /pst@rega 0 N end + 1986 802 a -364 1044 2350 4 v -364 1077 V -364 1110 +V -364 1144 V -364 1177 V -364 1142 a Fb(G)p -97 1177 +20 135 v -67 1177 4 135 v -44 1109 a(7)p 93 1210 60 4 +v 141 1208 4 117 v 103 1208 a(\007)837 1308 y Fa(Rdl)p +509 1210 60 4 v 557 1208 4 117 v 519 1208 a Fb(\007)p +934 1177 20 135 v 964 1177 4 135 v 987 1109 a(7)p 1124 +1210 60 4 v 1172 1208 4 117 v 1134 1208 a(\007)1869 1308 +y Fa(Rdl)p 1540 1210 60 4 v 1588 1208 4 117 v 1550 1208 +a Fb(\007)p 1966 1177 4 135 v 1982 1177 V 1986 1341 a + slur@Dict begin /pss@rega 0 N /psc@rega 0 N /pst@rega 0 N end + +1986 1341 a -364 1584 2350 4 v -364 1617 V -364 1650 +V -364 1683 V -364 1716 V -364 1682 a Fb(G)p -143 1716 +20 135 v -113 1716 4 135 v -90 1648 a(7)p 1 1750 60 4 +v 49 1748 4 117 v 11 1748 a(\007)496 1848 y Fa(Rd)p 287 +1750 60 4 v 335 1748 4 117 v 297 1748 a Fb(\007)p 583 +1716 4 135 v 600 1716 V 694 1750 60 4 v 742 1748 4 117 +v 407 w(\007)1229 1848 y Fa(RD)p 980 1750 60 4 v 1028 +1748 4 117 v 990 1748 a Fb(\007)p 1276 1716 4 135 v 1289 +1716 20 135 v 1400 1750 60 4 v 1448 1748 4 117 v 420 +w(\007)1896 1848 y Fa(Rb)p 1686 1750 60 4 v 1734 1748 +4 117 v 1696 1748 a Fb(\007)p 1982 1716 4 135 v 1986 +1881 a + slur@Dict begin /pss@rega 0 N /psc@rega 0 N /pst@rega 0 N end + 1986 1881 a eop end +%%Trailer + +userdict /end-hook known{end-hook}if +%%EOF |