diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /usergrps/uktug/baskervi/6_1/0-0-28.eps |
Initial commit
Diffstat (limited to 'usergrps/uktug/baskervi/6_1/0-0-28.eps')
-rw-r--r-- | usergrps/uktug/baskervi/6_1/0-0-28.eps | 2012 |
1 files changed, 2012 insertions, 0 deletions
diff --git a/usergrps/uktug/baskervi/6_1/0-0-28.eps b/usergrps/uktug/baskervi/6_1/0-0-28.eps new file mode 100644 index 0000000000..3c80c34b03 --- /dev/null +++ b/usergrps/uktug/baskervi/6_1/0-0-28.eps @@ -0,0 +1,2012 @@ +%!PS-Adobe-2.0 EPSF-2.0 +%%Creator: dvipsk 5.58f Copyright 1986, 1994 Radical Eye Software +%%Title: 0-0-28.dvi +%%BoundingBox: 148 454 604 668 +%%EndComments +%DVIPSCommandLine: dvips -D600 0-0-28 -E -o 0-0-28.eps +%DVIPSParameters: dpi=600, compressed, comments removed +%DVIPSSource: TeX output 1996.02.09:1811 +%%BeginProcSet: texc.pro +/TeXDict 250 dict def TeXDict begin /N{def}def /B{bind def}N /S{exch}N +/X{S N}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 dup dup 4 get round 4 exch put dup dup 5 get +round 5 exch put 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 dup{/foo +setfont}2 array copy cvx N load 0 nn put /ctr 0 N[}B /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 dup definefont setfont}B /ch-width{ch-data dup length 5 sub get} +B /ch-height{ch-data dup length 4 sub get}B /ch-xoff{128 ch-data dup +length 3 sub get sub}B /ch-yoff{ch-data dup length 2 sub get 127 sub}B +/ch-dx{ch-data dup length 1 sub get}B /ch-image{ch-data dup 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 /sf 0 N /CharBuilder{save 3 1 roll S dup /base get 2 +index get S /BitMaps get S get /ch-data X pop /ctr 0 N ch-dx 0 ch-xoff +ch-yoff ch-height sub ch-xoff ch-width add ch-yoff setcachedevice +ch-width ch-height true[1 0 0 -1 -.1 ch-xoff sub ch-yoff .1 add]/id +ch-image N /rw ch-width 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 dup 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 dup gp add /gp X +adv}B /nd{/cp 0 N rw exit}B /lsh{rw cp 2 copy get dup 0 eq{pop 1}{dup +255 eq{pop 254}{dup dup add 255 and S 1 and or}ifelse}ifelse put 1 adv} +B /rsh{rw cp 2 copy get dup 0 eq{pop 128}{dup 255 eq{pop 127}{dup 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}]dup{bind pop}forall N /D{/cc X dup type /stringtype ne{] +}if nn /base get cc ctr put nn /BitMaps get S ctr S sf 1 ne{dup dup +length 1 sub dup 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 dup 1 get dup mul exch 0 get dup mul +add .99 lt{/QV}{/RV}ifelse load def pop pop}N /eop{SI restore showpage +userdict /eop-hook known{eop-hook}if}N /@start{userdict /start-hook +known{start-hook}if pop /VResolution X /Resolution X 1000 div /DVImag X +/IE 256 array N 0 1 255{IE S 1 string dup 0 3 index put cvn put}for +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 /rulex 0 N /ruley 0 N /v{/ruley X /rulex X V}B /V +{}B /RV statusdict begin /product where{pop product dup length 7 ge{0 7 +getinterval dup(Display)eq exch 0 4 getinterval(NeXT)eq or}{pop false} +ifelse}{false}ifelse end{{gsave TR -.1 -.1 TR 1 1 scale rulex ruley +false RMat{BDot}imagemask grestore}}{{gsave TR -.1 -.1 TR rulex ruley +scale 1 1 false RMat{BDot}imagemask grestore}}ifelse B /QV{gsave +transform round exch round exch itransform moveto rulex 0 rlineto 0 +ruley neg rlineto rulex neg 0 rlineto fill grestore}B /a{moveto}B /delta +0 N /tail{dup /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: pstricks.pro +% PostScript prologue for pstricks.tex. +% Created 1994/6/23. Source file was pstricks.doc +% Version 0.93a, 93/03/12. +% For use with Rokicki's dvips. +/tx@Dict 200 dict def tx@Dict begin +/ADict 25 dict def +/CM { matrix currentmatrix } bind def +/SLW /setlinewidth load def +/CLW /currentlinewidth load def +/CP /currentpoint load def +/ED { exch def } bind def +/L /lineto load def +/T /translate load def +/TMatrix { } def +/RAngle { 0 } def +/Atan { /atan load stopped { pop pop 0 } if } def +/Div { dup 0 eq { pop } { div } ifelse } def +/NET { neg exch neg exch T } def +/Pyth { dup mul exch dup mul add sqrt } def +/PtoC { 2 copy cos mul 3 1 roll sin mul } def +/PathLength@ { /z z y y1 sub x x1 sub Pyth add def /y1 y def /x1 x def } +def +/PathLength { flattenpath /z 0 def { /y1 ED /x1 ED /y2 y1 def /x2 x1 def +} { /y ED /x ED PathLength@ } {} { /y y2 def /x x2 def PathLength@ } +/pathforall load stopped { pop pop pop pop } if z } def +/STP { .996264 dup scale } def +/STV { SDict begin normalscale end STP } def +/DashLine { dup 0 gt { /a .5 def PathLength exch div } { pop /a 1 def +PathLength } ifelse /b ED /x ED /y ED /z y x add def b a .5 sub 2 mul y +mul sub z Div round z mul a .5 sub 2 mul y mul add b exch Div dup y mul +/y ED x mul /x ED x 0 gt y 0 gt and { [ y x ] 1 a sub y mul } { [ 1 0 ] +0 } ifelse setdash stroke } def +/DotLine { /b PathLength def /a ED /z ED /y CLW def /z y z add def a 0 gt +{ /b b a div def } { a 0 eq { /b b y sub def } { a -3 eq { /b b y add +def } if } ifelse } ifelse [ 0 b b z Div round Div dup 0 le { pop 1 } if +] a 0 gt { 0 } { y 2 div a -2 gt { neg } if } ifelse setdash 1 +setlinecap stroke } def +/LineFill { gsave abs CLW add /a ED a 0 dtransform round exch round exch +2 copy idtransform exch Atan rotate idtransform pop /a ED .25 .25 +itransform translate pathbbox /y2 ED a Div ceiling cvi /x2 ED /y1 ED a +Div cvi /x1 ED /y2 y2 y1 sub def clip newpath 2 setlinecap systemdict +/setstrokeadjust known { true setstrokeadjust } if x2 x1 sub 1 add { x1 +a mul y1 moveto 0 y2 rlineto stroke /x1 x1 1 add def } repeat grestore } +def +/BeginArrow { ADict begin /@mtrx CM def gsave 2 copy T 2 index sub neg +exch 3 index sub exch Atan rotate newpath } def +/EndArrow { @mtrx setmatrix CP grestore end } def +/Arrow { CLW mul add dup 2 div /w ED mul dup /h ED mul /a ED { 0 h T 1 -1 +scale } if w neg h moveto 0 0 L w h L w neg a neg rlineto gsave fill +grestore } def +/Tbar { CLW mul add /z ED z -2 div CLW 2 div moveto z 0 rlineto stroke 0 +CLW moveto } def +/Bracket { CLW mul add dup CLW sub 2 div /x ED mul CLW add /y ED /z CLW 2 +div def x neg y moveto x neg CLW 2 div L x CLW 2 div L x y L stroke 0 +CLW moveto } def +/RoundBracket { CLW mul add dup 2 div /x ED mul /y ED /mtrx CM def 0 CLW +2 div T x y mul 0 ne { x y scale } if 1 1 moveto .85 .5 .35 0 0 0 +curveto -.35 0 -.85 .5 -1 1 curveto mtrx setmatrix stroke 0 CLW moveto } +def +/SD { 0 360 arc fill } def +/EndDot { { /z DS def } { /z 0 def } ifelse /b ED 0 z DS SD b { 0 z DS +CLW sub SD } if 0 DS z add CLW 4 div sub moveto } def +/Shadow { {[ { /moveto load } { /lineto load } { /curveto load } { +/closepath load } /pathforall load stopped { pop pop pop pop CP /moveto +load } if ] cvx newpath 3 1 roll T exec } stopped pop} def +/NArray { aload length 2 div dup dup cvi eq not { exch pop } if /n exch +cvi def } def +/NArray { /f ED counttomark 2 div dup cvi /n ED n eq not { exch pop } if +f { ] aload /Points ED } { n 2 mul 1 add -1 roll pop } ifelse } def +/Line { NArray n 0 eq not { n 1 eq { 0 0 /n 2 def } if ArrowA /n n 2 sub +def n { Lineto } repeat CP 4 2 roll ArrowB L pop pop } if } def +/Arcto { /a [ 6 -2 roll ] cvx def a r /arcto load stopped { 5 } { 4 } +ifelse { pop } repeat a } def +/CheckClosed { dup n 2 mul 1 sub index eq 2 index n 2 mul 1 add index eq +and { pop pop /n n 1 sub def } if } def +/Polygon { NArray n 2 eq { 0 0 /n 3 def } if n 3 lt { n { pop pop } +repeat } { n 3 gt { CheckClosed } if n 2 mul -2 roll /y0 ED /x0 ED /y1 +ED /x1 ED x1 y1 /x1 x0 x1 add 2 div def /y1 y0 y1 add 2 div def x1 y1 +moveto /n n 2 sub def n { Lineto } repeat x1 y1 x0 y0 6 4 roll Lineto +Lineto pop pop closepath } ifelse } def +/Diamond { /mtrx CM def T rotate /h ED /w ED dup 0 eq { pop } { CLW mul +neg /d ED /a w h Atan def /h d a sin Div h add def /w d a cos Div w add +def } ifelse mark w 2 div h 2 div w 0 0 h neg w neg 0 0 h w 2 div h 2 +div /ArrowA { moveto } def /ArrowB { } def false Line closepath mtrx +setmatrix } def +/Triangle { /mtrx CM def translate rotate /h ED 2 div /w ED dup 0 eq { +pop } { CLW mul /d ED /h h d w h Atan sin Div sub def /w w d h w Atan 2 +div dup cos exch sin Div mul sub def } ifelse mark 0 d w neg d 0 h w d 0 +d /ArrowA { moveto } def /ArrowB { } def false Line closepath mtrx +setmatrix } def +/CCA { /y ED /x ED 2 copy y sub /dy1 ED x sub /dx1 ED /l1 dx1 dy1 Pyth +def } def +/CCA { /y ED /x ED 2 copy y sub /dy1 ED x sub /dx1 ED /l1 dx1 dy1 Pyth +def } def +/CC { /l0 l1 def /x1 x dx sub def /y1 y dy sub def /dx0 dx1 def /dy0 dy1 +def CCA /dx dx0 l1 c exp mul dx1 l0 c exp mul add def /dy dy0 l1 c exp +mul dy1 l0 c exp mul add def /m dx0 dy0 Atan dx1 dy1 Atan sub 2 div cos +abs b exp a mul dx dy Pyth Div 2 div def /x2 x l0 dx mul m mul sub def +/y2 y l0 dy mul m mul sub def /dx l1 dx mul m mul neg def /dy l1 dy mul +m mul neg def } def +/IC { /c c 1 add def c 0 lt { /c 0 def } { c 3 gt { /c 3 def } if } +ifelse /a a 2 mul 3 div 45 cos b exp div def CCA /dx 0 def /dy 0 def } +def +/BOC { IC CC x2 y2 x1 y1 ArrowA CP 4 2 roll x y curveto } def +/NC { CC x1 y1 x2 y2 x y curveto } def +/EOC { x dx sub y dy sub 4 2 roll ArrowB 2 copy curveto } def +/BAC { IC CC x y moveto CC x1 y1 CP ArrowA } def +/NAC { x2 y2 x y curveto CC x1 y1 } def +/EAC { x2 y2 x y ArrowB curveto pop pop } def +/OpenCurve { NArray n 3 lt { n { pop pop } repeat } { BOC /n n 3 sub def +n { NC } repeat EOC } ifelse } def +/AltCurve { { false NArray n 2 mul 2 roll [ n 2 mul 3 sub 1 roll ] aload +/Points ED n 2 mul -2 roll } { false NArray } ifelse n 4 lt { n { pop +pop } repeat } { BAC /n n 4 sub def n { NAC } repeat EAC } ifelse } def +/ClosedCurve { NArray n 3 lt { n { pop pop } repeat } { n 3 gt { +CheckClosed } if 6 copy n 2 mul 6 add 6 roll IC CC x y moveto n { NC } +repeat closepath pop pop } ifelse } def +/SQ { /r ED r r moveto r r neg L r neg r neg L r neg r L fill } def +/ST { /y ED /x ED x y moveto x neg y L 0 x L fill } def +/SP { /r ED gsave 0 r moveto 4 { 72 rotate 0 r L } repeat fill grestore } +def +/FontDot { DS 2 mul dup matrix scale matrix concatmatrix exch matrix +rotate matrix concatmatrix exch findfont exch makefont setfont } def +/Rect { x1 y1 y2 add 2 div moveto x1 y2 lineto x2 y2 lineto x2 y1 lineto +x1 y1 lineto closepath } def +/OvalFrame { x1 x2 eq y1 y2 eq or { pop pop x1 y1 moveto x2 y2 L } { y1 +y2 sub abs x1 x2 sub abs 2 copy gt { exch pop } { pop } ifelse 2 div +exch { dup 3 1 roll mul exch } if 2 copy lt { pop } { exch pop } ifelse +/b ED x1 y1 y2 add 2 div moveto x1 y2 x2 y2 b arcto x2 y2 x2 y1 b arcto +x2 y1 x1 y1 b arcto x1 y1 x1 y2 b arcto 16 { pop } repeat closepath } +ifelse } def +/Frame { CLW mul /a ED 3 -1 roll 2 copy gt { exch } if a sub /y2 ED a add +/y1 ED 2 copy gt { exch } if a sub /x2 ED a add /x1 ED 1 index 0 eq { +pop pop Rect } { OvalFrame } ifelse } def +/BezierNArray { /f ED counttomark 2 div dup cvi /n ED n eq not { exch pop +} if n 1 sub neg 3 mod 3 add 3 mod { 0 0 /n n 1 add def } repeat f { ] +aload /Points ED } { n 2 mul 1 add -1 roll pop } ifelse } def +/OpenBezier { BezierNArray n 1 eq { pop pop } { ArrowA n 4 sub 3 idiv { 6 +2 roll 4 2 roll curveto } repeat 6 2 roll 4 2 roll ArrowB curveto } +ifelse } def +/ClosedBezier { BezierNArray n 1 eq { pop pop } { moveto n 1 sub 3 idiv { +6 2 roll 4 2 roll curveto } repeat closepath } ifelse } def +/BezierShowPoints { gsave Points aload length 2 div cvi /n ED moveto n 1 +sub { lineto } repeat CLW 2 div SLW [ 4 4 ] 0 setdash stroke grestore } +def +/Parab { /y0 exch def /x0 exch def /y1 exch def /x1 exch def /dx x0 x1 +sub 3 div def /dy y0 y1 sub 3 div def x0 dx sub y0 dy add x1 y1 ArrowA +x0 dx add y0 dy add x0 2 mul x1 sub y1 ArrowB curveto /Points [ x1 y1 x0 +y0 x0 2 mul x1 sub y1 ] def } def +/Grid { newpath /a 4 string def /b ED /c ED /n ED cvi dup 1 lt { pop 1 } +if /s ED s div dup 0 eq { pop 1 } if /dy ED s div dup 0 eq { pop 1 } if +/dx ED dy div round dy mul /y0 ED dx div round dx mul /x0 ED dy div +round cvi /y2 ED dx div round cvi /x2 ED dy div round cvi /y1 ED dx div +round cvi /x1 ED /h y2 y1 sub 0 gt { 1 } { -1 } ifelse def /w x2 x1 sub +0 gt { 1 } { -1 } ifelse def b 0 gt { /z1 b 4 div CLW 2 div add def +/Helvetica findfont b scalefont setfont /b b .95 mul CLW 2 div add def } +if systemdict /setstrokeadjust known { true setstrokeadjust /t { } def } +{ /t { transform 0.25 sub round 0.25 add exch 0.25 sub round 0.25 add +exch itransform } bind def } ifelse gsave n 0 gt { 1 setlinecap [ 0 dy n +div ] dy n div 2 div setdash } { 2 setlinecap } ifelse /i x1 def /f y1 +dy mul n 0 gt { dy n div 2 div h mul sub } if def /g y2 dy mul n 0 gt { +dy n div 2 div h mul add } if def x2 x1 sub w mul 1 add dup 1000 gt { +pop 1000 } if { i dx mul dup y0 moveto b 0 gt { gsave c i a cvs dup +stringwidth pop /z2 ED w 0 gt {z1} {z1 z2 add neg} ifelse h 0 gt {b neg} +{z1} ifelse rmoveto show grestore } if dup t f moveto g t L stroke /i i +w add def } repeat grestore gsave n 0 gt { 1 setlinecap [ 0 dx n div ] +dy n div 2 div setdash } { 2 setlinecap } ifelse /i y1 def /f x1 dx mul +n 0 gt { dx n div 2 div w mul sub } if def /g x2 dx mul n 0 gt { dx n +div 2 div w mul add } if def y2 y1 sub h mul 1 add dup 1000 gt { pop +1000 } if { newpath i dy mul dup x0 exch moveto b 0 gt { gsave c i a cvs +dup stringwidth pop /z2 ED w 0 gt {z1 z2 add neg} {z1} ifelse h 0 gt +{z1} {b neg} ifelse rmoveto show grestore } if dup f exch t moveto g +exch t L stroke /i i h add def } repeat grestore } def +/ArcArrow { /d ED /b ED /a ED gsave newpath 0 -1000 moveto clip newpath 0 +1 0 0 b grestore c mul /e ED pop pop pop r a e d PtoC y add exch x add +exch r a PtoC y add exch x add exch b pop pop pop pop a e d CLW 8 div c +mul neg d } def +/Ellipse { /mtrx CM def T scale 0 0 1 5 3 roll arc mtrx setmatrix } def +/Rot { CP CP translate 3 -1 roll neg rotate NET } def +/RotBegin { tx@Dict /TMatrix known not { /TMatrix { } def /RAngle { 0 } +def } if /TMatrix [ TMatrix CM ] cvx def /a ED a Rot /RAngle [ RAngle +dup a add ] cvx def } def +/RotEnd { /TMatrix [ TMatrix setmatrix ] cvx def /RAngle [ RAngle pop ] +cvx def } def +/PutCoor { gsave CP T CM STV exch exec moveto setmatrix CP grestore } def +/PutBegin { /TMatrix [ TMatrix CM ] cvx def CP 4 2 roll T moveto } def +/PutEnd { CP /TMatrix [ TMatrix setmatrix ] cvx def moveto } def +/Uput { /a ED add 2 div /h ED 2 div /w ED /s a sin def /c a cos def /b s +abs c abs 2 copy gt dup /q ED { pop } { exch pop } ifelse def /w1 c b +div w mul def /h1 s b div h mul def q { w1 abs w sub dup c mul abs } { +h1 abs h sub dup s mul abs } ifelse } def +/UUput { /z ED abs /y ED /x ED q { x s div c mul abs y gt } { x c div s +mul abs y gt } ifelse { x x mul y y mul sub z z mul add sqrt z add } { q +{ x s div } { x c div } ifelse abs } ifelse a PtoC h1 add exch w1 add +exch } def +/BeginOL { dup (all) eq exch TheOL eq or { IfVisible not { Visible +/IfVisible true def } if } { IfVisible { Invisible /IfVisible false def +} if } ifelse } def +/InitOL { /OLUnit [ 3000 3000 matrix defaultmatrix dtransform ] cvx def +/Visible { CP OLUnit idtransform T moveto } def /Invisible { CP OLUnit +neg exch neg exch idtransform T moveto } def /BOL { BeginOL } def +/IfVisible true def } def +end +%%EndProcSet +%%BeginProcSet: pst-dots.pro +10 dict dup begin + /FontType 3 def + /FontMatrix [ .001 0 0 .001 0 0 ] def + /FontBBox [ 0 0 0 0 ] def + /Encoding 256 array def + 0 1 255 { Encoding exch /.notdef put } for + Encoding + dup (b) 0 get /Bullet put + dup (c) 0 get /Circle put + dup (C) 0 get /BoldCircle put + dup (u) 0 get /SolidTriangle put + dup (t) 0 get /Triangle put + dup (T) 0 get /BoldTriangle put + dup (r) 0 get /SolidSquare put + dup (s) 0 get /Square put + dup (S) 0 get /BoldSquare put + dup (q) 0 get /SolidPentagon put + dup (p) 0 get /Pentagon put + (P) 0 get /BoldPentagon put + /Metrics 13 dict def + Metrics begin + /Bullet 1000 def + /Circle 1000 def + /BoldCircle 1000 def + /SolidTriangle 1344 def + /Triangle 1344 def + /BoldTriangle 1344 def + /SolidSquare 886 def + /Square 886 def + /BoldSquare 886 def + /SolidPentagon 1093.2 def + /Pentagon 1093.2 def + /BoldPentagon 1093.2 def + /.notdef 0 def + end + /BBoxes 13 dict def + BBoxes begin + /Circle { -550 -550 550 550 } def + /BoldCircle /Circle load def + /Bullet /Circle load def + /Triangle { -571.5 -330 571.5 660 } def + /BoldTriangle /Triangle load def + /SolidTriangle /Triangle load def + /Square { -450 -450 450 450 } def + /BoldSquare /Square load def + /SolidSquare /Square load def + /Pentagon { -546.6 -465 546.6 574.7 } def + /BoldPentagon /Pentagon load def + /SolidPentagon /Pentagon load def + /.notdef { 0 0 0 0 } def + end + /CharProcs 20 dict def + CharProcs begin + /Adjust { + 2 copy dtransform floor .5 add exch floor .5 add exch idtransform + 3 -1 roll div 3 1 roll exch div exch scale + } def + /CirclePath { 0 0 500 0 360 arc closepath } def + /Bullet { 500 500 Adjust CirclePath fill } def + /Circle { 500 500 Adjust CirclePath .9 .9 scale CirclePath eofill } def + /BoldCircle { 500 500 Adjust CirclePath .8 .8 scale CirclePath eofill } def + /BoldCircle { CirclePath .8 .8 scale CirclePath eofill } def + /TrianglePath { + 0 660 moveto -571.5 -330 lineto 571.5 -330 lineto closepath + } def + /SolidTriangle { TrianglePath fill } def + /Triangle { TrianglePath .85 .85 scale TrianglePath eofill } def + /BoldTriangle { TrianglePath .7 .7 scale TrianglePath eofill } def + /SquarePath { + -450 450 moveto 450 450 lineto 450 -450 lineto -450 -450 lineto + closepath + } def + /SolidSquare { SquarePath fill } def + /Square { SquarePath .89 .89 scale SquarePath eofill } def + /BoldSquare { SquarePath .78 .78 scale SquarePath eofill } def + /PentagonPath { + -337.8 -465 moveto + 337.8 -465 lineto + 546.6 177.6 lineto + 0 574.7 lineto + -546.6 177.6 lineto + closepath + } def + /SolidPentagon { PentagonPath fill } def + /Pentagon { PentagonPath .89 .89 scale PentagonPath eofill } def + /BoldPentagon { PentagonPath .78 .78 scale PentagonPath eofill } def + /.notdef { } def + end + /BuildGlyph { + exch + begin + Metrics 1 index get exec 0 + BBoxes 3 index get exec + setcachedevice + CharProcs begin load exec end + end + } def + /BuildChar { + 1 index /Encoding get exch get + 1 index /BuildGlyph get exec + } bind def +end +/PSTricksDotFont exch definefont pop +%%EndProcSet +%%BeginProcSet: gradient.pro +% PostScript header file gradient.ps +% For the PSTricks gradient fillstyle. +% Version: 0.93a +% Date: 93/03/12 +% For copying restrictions, see pstricks.doc or pstricks.tex. +% +% Based on some EPS files by leeweyr!bill@nuchat.sccsi.com (W. R. Lee). +% +% Syntax: +% R0 G0 B0 R1 G1 B1 MidPoint NumLines Angle GradientFill + +/tx@GradientDict 40 dict def +tx@GradientDict begin +/GradientFill { + rotate + /MidPoint ED + /NumLines ED + /LastBlue ED + /LastGreen ED + /LastRed ED + /FirstBlue ED + /FirstGreen ED + /FirstRed ED + clip + pathbbox %leave llx,lly,urx,ury on stack + /y ED /x ED + 2 copy translate + y sub neg /y ED + x sub neg /x ED + /b { + x 0 rlineto + 0 YSizePerLine rlineto + x neg 0 rlineto + closepath + } def + /MidLine NumLines 1 MidPoint sub mul abs cvi def + MidLine NumLines gt { /Midline NumLines def } if + /RedIncrement LastRed FirstRed sub MidLine div def + /GreenIncrement LastGreen FirstGreen sub MidLine div def + /BlueIncrement LastBlue FirstBlue sub MidLine div def + /YSizePerLine y NumLines div def + /CurrentY 0 def + /Red FirstRed def + /Green FirstGreen def + /Blue FirstBlue def + % This avoids gaps due to rounding errors: + gsave Red Green Blue setrgbcolor fill grestore + MidLine { + 0 CurrentY moveto b + Red Green Blue setrgbcolor fill + CurrentY YSizePerLine add /CurrentY exch def + Blue BlueIncrement add dup 1 gt { pop 1 } if + dup 0 lt { pop 0 } if /Blue exch def + Green GreenIncrement add dup 1 gt { pop 1 } if + dup 0 lt { pop 0 } if /Green exch def + Red RedIncrement add dup 1 gt { pop 1 } if + dup 0 lt { pop 0 } if /Red exch def + } repeat + Blue BlueIncrement sub /Blue exch def + Green GreenIncrement sub /Green exch def + Red RedIncrement sub /Red exch def + /RedIncrement LastRed FirstRed sub NumLines MidLine sub div def + /GreenIncrement LastGreen FirstGreen sub NumLines MidLine sub div def + /BlueIncrement LastBlue FirstBlue sub NumLines MidLine sub div def + Blue BlueIncrement sub /Blue exch def + Green GreenIncrement sub /Green exch def + Red RedIncrement sub /Red exch def + NumLines MidLine sub 1 add { + 0 CurrentY moveto b + Red Green Blue setrgbcolor fill + CurrentY YSizePerLine add /CurrentY exch def + Blue BlueIncrement sub dup 1 gt { pop 1 } if + dup 0 lt { pop 0 } if /Blue exch def + Green GreenIncrement sub dup 1 gt { pop 1 } if + dup 0 lt { pop 0 } if /Green exch def + Red RedIncrement sub dup 1 gt { pop 1 } if + dup 0 lt { pop 0 } if /Red exch def + } repeat +} def +end +% END gradient.ps +%%EndProcSet +%%BeginProcSet: pst-coil.pro +% PostScript prologue for pst-coil.tex. +% Created 1993/3/12. Source file was pst-coil.doc +% Version 0.93a, 93/03/12. +% For use with Rokicki's dvips. +/tx@CoilDict 40 dict def tx@CoilDict begin +/CoilLoop { /t ED t sin AspectSin mul t 180 div AspectCos mul add t cos +lineto } def +/Coil { /Inc ED dup sin /AspectSin ED cos /AspectCos ED /ArmB ED /ArmA ED +/h ED /w ED /y1 ED /x1 ED /y0 ED /x0 ED x0 y0 translate y1 y0 sub x1 x0 +sub 2 copy Pyth /TotalLength ED Atan rotate /BeginAngle ArmA AspectCos +Div w h mul Div 360 mul def /EndAngle TotalLength ArmB sub AspectCos Div +w h mul Div 360 mul def 1 0 0 0 ArrowA ArmA 0 lineto /mtrx CM def w h +mul 2 Div w 2 Div scale BeginAngle Inc EndAngle { CoilLoop } for +EndAngle CoilLoop mtrx setmatrix TotalLength ArmB sub 0 lineto CP +TotalLength 0 ArrowB lineto } def +/AltCoil { /Inc ED dup sin /AspectSin ED cos /AspectCos ED /h ED /w ED +/EndAngle ED /BeginAngle ED /mtrx CM def w h mul 2 Div w 2 Div scale +BeginAngle sin AspectSin mul BeginAngle 180 div AspectCos mul add +BeginAngle cos /lineto load stopped { moveto } if BeginAngle Inc +EndAngle { CoilLoop } for EndAngle CoilLoop mtrx setmatrix } def +/ZigZag { /ArmB ED /ArmA ED 2 div /w ED w mul /h ED /y1 ED /x1 ED /y0 ED +/x0 ED x1 y1 translate y0 y1 sub x0 x1 sub 2 copy Pyth /TotalLength ED +Atan rotate TotalLength ArmA sub ArmB sub dup h div cvi /n ED n h mul +sub 2 div dup ArmA add /ArmA ED ArmB add /ArmB ED /x ArmB h 2 div add +def mark 0 0 ArmB 0 n { x w /w w neg def /x x h add def } repeat +TotalLength ArmA sub 0 TotalLength 0 } def +end +%%EndProcSet +%%BeginProcSet: textpath.pro +% PostScript header file textpath.pro +% For putting text along curve with textpath.tex and PSTricks +% Version: 0.93a +% Date: 93/03/12 +% For copying restrictions, see pstricks.doc or pstricks.tex. + +/tx@TextPathDict 40 dict def +tx@TextPathDict begin + +/PathPosition +{ /targetdist exch def + /pathdist 0 def + /continue true def + /X { newx } def /Y { newy } def /Angle 0 def + gsave + flattenpath + { movetoproc } { linetoproc } { curvetoproc } { closepathproc } + pathforall + grestore +} def + +/movetoproc { continue { @movetoproc } { pop pop } ifelse } def + +/@movetoproc +{ /newy exch def /newx exch def + /firstx newx def /firsty newy def +} def + +/linetoproc { continue { @linetoproc } { pop pop } ifelse } def + +/@linetoproc +{ + /oldx newx def /oldy newy def + /newy exch def /newx exch def + /dx newx oldx sub def + /dy newy oldy sub def + /dist dx dup mul dy dup mul add sqrt def + /pathdist pathdist dist add def + pathdist targetdist ge + { pathdist targetdist sub dist div dup + dy mul neg newy add /Y exch def + dx mul neg newx add /X exch def + /Angle dy dx atan def + /continue false def + } if +} def + +/curvetoproc { (ERROR: No curveto's after flattenpath!) print } def + +/closepathproc { firstx firsty linetoproc } def + +/TextPathShow +{ /String exch def + /CharCount 0 def + String length + { String CharCount 1 getinterval ShowChar + /CharCount CharCount 1 add def + } repeat +} def + +/InitTextPath +{ gsave + currentpoint + /Y exch def /X exch def + 10000000 PathPosition + pathdist X Hoffset sub sub mul + Voffset Hoffset sub add + neg X add /Hoffset exch def + /Voffset Y def + grestore +} def + +/Transform +{ PathPosition + dup + Angle cos mul Y add exch + Angle sin mul neg X add exch + translate + Angle rotate +} def + +/ShowChar +{ /Char exch def + gsave + Char end stringwidth + tx@TextPathDict begin + 2 div /Sy exch def 2 div /Sx exch def + currentpoint + Voffset sub Sy add exch + Hoffset sub Sx add + Transform + Sx neg Sy neg moveto + Char end tx@TextPathSavedShow + tx@TextPathDict begin + grestore + Sx 2 mul Sy 2 mul rmoveto +} def + +end +% End textpath.pro +%%EndProcSet +%%BeginProcSet: pst-node.pro +% PostScript prologue for pst-node.tex. +% Created 1993/3/12. Source file was pst-node.doc +% Version 0.93a, 93/03/12. +% For use with Rokicki's dvips. +/tx@NodeDict 200 dict def tx@NodeDict begin +/NewNode { gsave /next ED dict dup 3 -1 roll ED begin tx@Dict begin STV +CP T exec end /NodeMtrx CM def next end grestore } def +/InitPnode { /Y ED /X ED /NodePos { Nodesep Cos mul Nodesep Sin mul } def +} def +/InitCnode { /r ED /Y ED /X ED /NodePos { Nodesep r add dup Cos mul exch +Sin mul } def } def +/GetRnodePos { Cos 0 gt { /dx r Nodesep add def } { /dx l Nodesep sub def +} ifelse Sin 0 gt { /dy u Nodesep add def } { /dy d Nodesep sub def } +ifelse dx Sin mul abs dy Cos mul abs gt { dy Cos mul Sin div dy } { dx +dup Sin mul Cos Div } ifelse } def +/InitRnode { /r ED r mul neg /l ED /r r l add def /X l neg def { neg /d +ED /u ED /Y 0 def } { neg /Y ED Y sub /u ED u mul neg /d ED /u u d add +def /Y Y d sub def } ifelse /NodePos { GetRnodePos } def } def +/InitRNode { /Y ED /X ED /r ED /X r 2 div X add def /r r X sub def /l X +neg def Y add neg /d ED Y sub /u ED /NodePos { GetRnodePos } def } def +/GetOnodePos { /ww w Nodesep add def /hh h Nodesep add def Sin ww mul Cos +hh mul Atan dup cos ww mul exch sin hh mul } def +/GetCenter { begin X Y NodeMtrx transform CM itransform end } def +/GetAngle { nodeA GetCenter nodeB GetCenter 3 -1 roll sub 3 1 roll sub +neg Atan } def +/GetEdge { begin /Nodesep ED dup 1 0 NodeMtrx dtransform CM idtransform +exch atan sub dup sin /Sin ED cos /Cos ED NodePos Y add exch X add exch +NodeMtrx transform CM itransform end 4 2 roll 1 index 0 eq { pop pop } { +2 copy 5 2 roll cos mul add 4 1 roll sin mul sub exch } ifelse } def +/GetPos { OffsetA AngleA NodesepA nodeA GetEdge /y1 ED /x1 ED OffsetB +AngleB NodesepB nodeB GetEdge /y2 ED /x2 ED } def +/InitNC { /nodeB ED /nodeA ED /NodesepB ED /NodesepA ED /OffsetB ED +/OffsetA ED tx@NodeDict nodeA known tx@NodeDict nodeB known and dup { +/nodeA nodeA load def /nodeB nodeB load def } if } def +/LineMP { 4 copy 1 t sub mul exch t mul add 3 1 roll 1 t sub mul exch t +mul add exch 6 2 roll sub 3 1 roll sub Atan } def +/NCCoor { GetAngle /AngleA ED /AngleB AngleA 180 add def GetPos /LPutVar +[ x2 x1 y2 y1 ] cvx def /LPutPos { LPutVar LineMP } def x1 y1 x2 y2 } +def +/NCLine { NCCoor tx@Dict begin ArrowB 4 2 roll ArrowA lineto end } def +/BezierMidpoint { /y3 ED /x3 ED /y2 ED /x2 ED /y1 ED /x1 ED /y0 ED /x0 ED +/t ED /cx x1 x0 sub 3 mul def /cy y1 y0 sub 3 mul def /bx x2 x1 sub 3 +mul cx sub def /by y2 y1 sub 3 mul cy sub def /ax x3 x0 sub cx sub bx +sub def /ay y3 y0 sub cy sub by sub def ax t 3 exp mul bx t t mul mul +add cx t mul add x0 add ay t 3 exp mul by t t mul mul add cy t mul add +y0 add 3 ay t t mul mul mul 2 by t mul mul add cy add 3 ax t t mul mul +mul 2 bx t mul mul add cx add atan } def +/GetArms { /x1a armA AngleA cos mul x1 add def /y1a armA AngleA sin mul +y1 add def /x2a armB AngleB cos mul x2 add def /y2a armB AngleB sin mul +y2 add def } def +/NCCurve { GetPos x1 x2 sub y1 y2 sub Pyth 2 div dup 3 -1 roll mul /armA +ED mul /armB ED GetArms x1a y1a x1 y1 tx@Dict begin ArrowA end x2a y2a +x2 y2 tx@Dict begin ArrowB end curveto /LPutVar [ x1 y1 x1a y1a x2a y2a +x2 y2 ] cvx def /LPutPos { t LPutVar BezierMidpoint } def } def +/AnglesMP { LPutVar t 3 gt { /t t 3 sub def } { t 2 gt { /t t 2 sub def +10 -2 roll } { t 1 gt { /t t 1 sub def 10 -4 roll } { 10 4 roll } ifelse +} ifelse } ifelse 6 { pop } repeat 3 -1 roll exch LineMP } def +/NCAngles { GetPos GetArms /mtrx AngleA matrix rotate def x1a y1a mtrx +transform pop x2a y2a mtrx transform exch pop mtrx itransform /y0 ED /x0 +ED mark armB 0 ne { x2 y2 } if x2a y2a x0 y0 x1a y1a armA 0 ne { x1 y1 } +if tx@Dict begin false Line end /LPutVar [ x2 y2 x2a y2a x0 y0 x1a y1a +x1 y1 ] cvx def /LPutPos { AnglesMP } def } def +/NCAngle { GetPos /x2a armB AngleB cos mul x2 add def /y2a armB AngleB +sin mul y2 add def /mtrx AngleA matrix rotate def x2a y2a mtrx transform +pop x1 y1 mtrx transform exch pop mtrx itransform /y0 ED /x0 ED mark +armB 0 ne { x2 y2 } if x2a y2a x0 y0 x1 y1 tx@Dict begin false Line end +/LPutVar [ x2 y2 x2 y2 x2a y2a x0 y0 x1 y1 ] cvx def /LPutPos { AnglesMP +} def } def +/NCBar { GetPos GetArms /mtrx AngleA matrix rotate def x1a y1a mtrx +transform pop x2a y2a mtrx transform pop sub dup 0 mtrx itransform 3 -1 +roll 0 gt { /y2a exch y2a add def /x2a exch x2a add def } { /y1a exch +neg y1a add def /x2a exch neg x2a add def } ifelse mark x2 y2 x2a y2a +x1a y1a x1 y1 tx@Dict begin false Line end /LPutVar [ x2 y2 x2 y2 x2a +y2a x1a y1a x1 y1 ] cvx def /LPutPos { LPutVar AnglesMP } def } def +/NCDiag { GetPos GetArms mark x2 y2 x2a y2a x1a y1a x1 y1 tx@Dict begin +false Line end /LPutVar [ x2 y2 x2 y2 x2a y2a x1a y1a x1 y1 ] cvx def +/LPutPos { AnglesMP } def } def +/NCDiagg { OffsetA AngleA NodesepA nodeA GetEdge /y1 ED /x1 ED /x1a armA +AngleA cos mul x1 add def /y1a armA AngleA sin mul y1 add def nodeB +GetCenter y1a sub exch x1a sub Atan 180 add /AngleB ED OffsetB AngleB +NodesepB nodeB GetEdge /y2 ED /x2 ED mark x2 y2 x1a y1a x1 y1 tx@Dict +begin false Line end /LPutVar [ x2 y2 x2 y2 x2 y2 x1a y1a x1 y1] cvx def +/LPutPos { AnglesMP } def } def +/LoopMP { /t t abs def [ LPutVar ] length 2 div 1 sub dup t lt { /t ED } +{ pop } ifelse mark LPutVar t cvi { /t t 1 sub def pop pop } repeat +counttomark 1 add 4 roll cleartomark 3 -1 roll exch LineMP } def +/NCLoop { GetPos GetArms /mtrx AngleA matrix rotate def x1a y1a mtrx +transform loopsize add /y1b ED /x1b ED /x2b x2a y2a mtrx transform pop +def x2b y1b mtrx itransform /y2b ED /x2b ED x1b y1b mtrx itransform /y1b +ED /x1b ED mark armB 0 ne { x2 y2 } if x2a y2a x2b y2b x1b y1b x1a y1a +armA 0 ne { x1 y1 } if tx@Dict begin false Line end /LPutVar [ x2 y2 x2a +y2a x2b y2b x1b y1b x1a y1a x1 y1 ] cvx def /LPutPos { LoopMP } def } +def +/NCCircle { nodeA GetCenter 0 0 NodesepA nodeA GetEdge pop 3 1 roll /Y ED +/X ED X sub 2 div dup 2 exp r r mul sub abs sqrt atan 2 mul /a ED r +AngleA 90 add PtoC Y add exch X add exch 2 copy /LPutVar [ 4 2 roll r a +] def /LPutPos { LPutVar aload pop t 360 mul add dup 5 1 roll 90 sub +PtoC 3 -1 roll add 3 1 roll add exch 3 -1 roll } def r AngleA 90 sub a +add AngleA 270 add a sub tx@Dict begin /angleB ED /angleA ED /r ED /c +57.2957 r Div def /y ED /x ED } def +/LPutCoor { tx@NodeDict /LPutPos known { gsave LPutPos tx@Dict begin +/langle ED CM 3 1 roll STV CP 3 -1 roll sub neg 3 1 roll sub exch moveto +setmatrix CP end grestore } { 0 0 tx@Dict /langle 0 def end } ifelse } +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 +%%BeginProcSet: color.pro +TeXDict begin /setcmykcolor where{pop}{/setcmykcolor{dup 10 eq{pop +setrgbcolor}{1 sub 4 1 roll 3{3 index add neg dup 0 lt{pop 0}if 3 1 roll +}repeat setrgbcolor pop}ifelse}B}ifelse /TeXcolorcmyk{setcmykcolor}def +/TeXcolorrgb{setrgbcolor}def /TeXcolorgrey{setgray}def /TeXcolorgray{ +setgray}def /TeXcolorhsb{sethsbcolor}def /currentcmykcolor where{pop}{ +/currentcmykcolor{currentrgbcolor 10}B}ifelse /DC{exch dup userdict exch +known{pop pop}{X}ifelse}B /GreenYellow{0.15 0 0.69 0 setcmykcolor}DC +/Yellow{0 0 1 0 setcmykcolor}DC /Goldenrod{0 0.10 0.84 0 setcmykcolor} +DC /Dandelion{0 0.29 0.84 0 setcmykcolor}DC /Apricot{0 0.32 0.52 0 +setcmykcolor}DC /Peach{0 0.50 0.70 0 setcmykcolor}DC /Melon{0 0.46 0.50 +0 setcmykcolor}DC /YellowOrange{0 0.42 1 0 setcmykcolor}DC /Orange{0 +0.61 0.87 0 setcmykcolor}DC /BurntOrange{0 0.51 1 0 setcmykcolor}DC +/Bittersweet{0 0.75 1 0.24 setcmykcolor}DC /RedOrange{0 0.77 0.87 0 +setcmykcolor}DC /Mahogany{0 0.85 0.87 0.35 setcmykcolor}DC /Maroon{0 +0.87 0.68 0.32 setcmykcolor}DC /BrickRed{0 0.89 0.94 0.28 setcmykcolor} +DC /Red{0 1 1 0 setcmykcolor}DC /OrangeRed{0 1 0.50 0 setcmykcolor}DC +/RubineRed{0 1 0.13 0 setcmykcolor}DC /WildStrawberry{0 0.96 0.39 0 +setcmykcolor}DC /Salmon{0 0.53 0.38 0 setcmykcolor}DC /CarnationPink{0 +0.63 0 0 setcmykcolor}DC /Magenta{0 1 0 0 setcmykcolor}DC /VioletRed{0 +0.81 0 0 setcmykcolor}DC /Rhodamine{0 0.82 0 0 setcmykcolor}DC /Mulberry +{0.34 0.90 0 0.02 setcmykcolor}DC /RedViolet{0.07 0.90 0 0.34 +setcmykcolor}DC /Fuchsia{0.47 0.91 0 0.08 setcmykcolor}DC /Lavender{0 +0.48 0 0 setcmykcolor}DC /Thistle{0.12 0.59 0 0 setcmykcolor}DC /Orchid{ +0.32 0.64 0 0 setcmykcolor}DC /DarkOrchid{0.40 0.80 0.20 0 setcmykcolor} +DC /Purple{0.45 0.86 0 0 setcmykcolor}DC /Plum{0.50 1 0 0 setcmykcolor} +DC /Violet{0.79 0.88 0 0 setcmykcolor}DC /RoyalPurple{0.75 0.90 0 0 +setcmykcolor}DC /BlueViolet{0.86 0.91 0 0.04 setcmykcolor}DC /Periwinkle +{0.57 0.55 0 0 setcmykcolor}DC /CadetBlue{0.62 0.57 0.23 0 setcmykcolor} +DC /CornflowerBlue{0.65 0.13 0 0 setcmykcolor}DC /MidnightBlue{0.98 0.13 +0 0.43 setcmykcolor}DC /NavyBlue{0.94 0.54 0 0 setcmykcolor}DC +/RoyalBlue{1 0.50 0 0 setcmykcolor}DC /Blue{1 1 0 0 setcmykcolor}DC +/Cerulean{0.94 0.11 0 0 setcmykcolor}DC /Cyan{1 0 0 0 setcmykcolor}DC +/ProcessBlue{0.96 0 0 0 setcmykcolor}DC /SkyBlue{0.62 0 0.12 0 +setcmykcolor}DC /Turquoise{0.85 0 0.20 0 setcmykcolor}DC /TealBlue{0.86 +0 0.34 0.02 setcmykcolor}DC /Aquamarine{0.82 0 0.30 0 setcmykcolor}DC +/BlueGreen{0.85 0 0.33 0 setcmykcolor}DC /Emerald{1 0 0.50 0 +setcmykcolor}DC /JungleGreen{0.99 0 0.52 0 setcmykcolor}DC /SeaGreen{ +0.69 0 0.50 0 setcmykcolor}DC /Green{1 0 1 0 setcmykcolor}DC +/ForestGreen{0.91 0 0.88 0.12 setcmykcolor}DC /PineGreen{0.92 0 0.59 +0.25 setcmykcolor}DC /LimeGreen{0.50 0 1 0 setcmykcolor}DC /YellowGreen{ +0.44 0 0.74 0 setcmykcolor}DC /SpringGreen{0.26 0 0.76 0 setcmykcolor} +DC /OliveGreen{0.64 0 0.95 0.40 setcmykcolor}DC /RawSienna{0 0.72 1 0.45 +setcmykcolor}DC /Sepia{0 0.83 1 0.70 setcmykcolor}DC /Brown{0 0.81 1 +0.60 setcmykcolor}DC /Tan{0.14 0.42 0.56 0 setcmykcolor}DC /Gray{0 0 0 +0.50 setcmykcolor}DC /Black{0 0 0 1 setcmykcolor}DC /White{0 0 0 0 +setcmykcolor}DC end +%%EndProcSet +TeXDict begin 40258437 52099154 1000 600 600 (0-0-28.dvi) +@start end +%%EndProlog +%%BeginSetup +%%Feature: *Resolution 600dpi +TeXDict begin + +%%EndSetup +1 0 bop Black Black 639 443 3790 4 v 639 2206 4 1764 +v 1131 1088 a + tx@Dict begin { 0.0 39.83453 0.0 -9.95863 0.0 0.0 0. -9.95863 -9.95863 +9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a +0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { /a +p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul p2 +dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 p1 +a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ b +f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul neg +c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 1131 1088 a @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .75 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 9.95863 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 19.91727 19.91727 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 29.8759 2.98761 +SD end + +@endspecial +1131 1088 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 1131 1088 a 1131 1088 a + tx@Dict begin { 0.0 0.0 0.0 0.0 -9.95863 0.0 0. -9.95863 -9.95863 +9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a +0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { /a +p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul p2 +dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 p1 +a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ b +f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul neg +c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 1131 1088 a @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .25 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 9.95863 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 29.8759 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 29.8759 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 9.95863 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 19.91727 19.91727 2.98761 +SD end + +@endspecial 1131 1088 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 1131 +1088 a 1131 1088 a + tx@Dict begin { 0.0 0.0 39.83453 0.0 0.0 9.95863 0. -9.95863 -9.95863 +9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a +0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { /a +p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul p2 +dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 p1 +a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ b +f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul neg +c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 1131 1088 a @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .75 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 19.91727 19.91727 2.98761 +SD end + +@endspecial 1131 +1088 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 1131 1088 a 1850 1006 a + tx@Dict begin { 0.0 0.0 0.0 0.0 -9.95863 0.0 0. 9.95863 -9.95863 9.95863 +0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def +/b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 +lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul p2 dup +mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 p1 a div +} ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ b f mul +c a mul e mul sub a f mul c b mul e mul add d e mul b e mul neg c a +mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 1850 1006 a @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .25 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 9.95863 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 29.8759 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 29.8759 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 9.95863 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 19.91727 19.91727 2.98761 +SD end + +@endspecial 1850 1006 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 1850 +1006 a 1850 1006 a + tx@Dict begin { 39.83453 0.0 0.0 9.95863 0.0 0.0 0. 9.95863 -9.95863 +9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a +0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { /a +p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul p2 +dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 p1 +a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ b +f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul neg +c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 1850 1006 a @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .25 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 9.95863 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 29.8759 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 29.8759 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 9.95863 2.98761 +SD end + +@endspecial 1850 1006 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 1850 +1006 a 1850 1006 a + tx@Dict begin { 0.0 0.0 39.83453 0.0 0.0 9.95863 0. 9.95863 -9.95863 +9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a +0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { /a +p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul p2 +dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 p1 +a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ b +f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul neg +c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 1850 1006 a @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .75 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 19.91727 19.91727 2.98761 +SD end + +@endspecial 1850 +1006 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 1850 1006 a 2984 882 a + tx@Dict begin { 39.83453 0.0 0.0 9.95863 0.0 0.0 0. 9.95863 9.95863 +9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a +0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { /a +p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul p2 +dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 p1 +a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ b +f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul neg +c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 2984 882 a @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .25 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 9.95863 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 29.8759 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 29.8759 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 9.95863 2.98761 +SD end + +@endspecial +2984 882 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 2984 882 a 2984 882 a + tx@Dict begin { 39.83453 39.83453 0.0 0.0 9.95863 0.0 0. 9.95863 9.95863 +9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a +0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { /a +p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul p2 +dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 p1 +a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ b +f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul neg +c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 2984 882 a @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .75 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 19.91727 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 19.91727 2.98761 +SD end + +@endspecial 2984 882 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 2984 +882 a 2984 882 a + tx@Dict begin { 0.0 0.0 39.83453 0.0 0.0 9.95863 0. 9.95863 9.95863 +9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a +0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { /a +p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul p2 +dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 p1 +a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ b +f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul neg +c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 2984 882 a @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .75 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 19.91727 19.91727 2.98761 +SD end + +@endspecial 2984 +882 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 2984 882 a 4117 964 a + tx@Dict begin { 39.83453 39.83453 0.0 0.0 9.95863 0.0 0. -9.95863 +9.95863 9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 +0 eq { /a 0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 +0 eq { /a p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 +dup mul p2 dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b +ED p3 p1 a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D +[ b f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul +neg c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 4117 964 a @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .75 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 19.91727 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 19.91727 2.98761 +SD end + +@endspecial 4117 964 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 4117 +964 a 4117 964 a + tx@Dict begin { 0.0 39.83453 0.0 -9.95863 0.0 0.0 0. -9.95863 9.95863 +9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a +0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { /a +p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul p2 +dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 p1 +a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ b +f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul neg +c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 4117 964 a @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .75 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 9.95863 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 19.91727 19.91727 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 29.8759 2.98761 +SD end + +@endspecial +4117 964 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 4117 964 a 4117 964 a + tx@Dict begin { 0.0 0.0 39.83453 0.0 0.0 9.95863 0. -9.95863 9.95863 +9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a +0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { /a +p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul p2 +dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 p1 +a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ b +f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul neg +c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 4117 964 a @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .75 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 19.91727 19.91727 2.98761 +SD end + +@endspecial +4117 964 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 4117 964 a 1131 1738 a + tx@Dict begin { 0.0 39.83453 0.0 -9.95863 0.0 0.0 0. -9.95863 -9.95863 +-9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { +/a 0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { +/a p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul +p2 dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 +p1 a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ +b f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul +neg c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 1131 1738 a @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .75 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 9.95863 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 19.91727 19.91727 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 29.8759 2.98761 +SD end + +@endspecial 1131 1738 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 1131 1738 a 1131 +1738 a + tx@Dict begin { 0.0 0.0 0.0 0.0 -9.95863 0.0 0. -9.95863 -9.95863 +-9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { +/a 0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { +/a p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul +p2 dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 +p1 a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ +b f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul +neg c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 1131 1738 a @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .25 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 9.95863 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 29.8759 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 29.8759 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 9.95863 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 19.91727 19.91727 2.98761 +SD end + +@endspecial 1131 1738 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 1131 1738 a 1131 +1738 a + tx@Dict begin { 0.0 39.83453 0.0 0.0 0.0 -9.95863 0. -9.95863 -9.95863 +-9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { +/a 0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { +/a p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul +p2 dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 +p1 a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ +b f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul +neg c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 1131 1738 a @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .25 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 9.95863 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 19.91727 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 29.8759 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 9.95863 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 19.91727 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 29.8759 2.98761 +SD end + +@endspecial +1131 1738 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 1131 1738 a 1850 1862 a + tx@Dict begin { 0.0 0.0 0.0 0.0 -9.95863 0.0 0. 9.95863 -9.95863 -9.95863 +0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def +/b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 +lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul p2 dup +mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 p1 a div +} ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ b f mul +c a mul e mul sub a f mul c b mul e mul add d e mul b e mul neg c a +mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 1850 1862 a @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .25 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 9.95863 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 29.8759 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 29.8759 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 9.95863 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 19.91727 19.91727 2.98761 +SD end + +@endspecial 1850 1862 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 1850 +1862 a 1850 1862 a + tx@Dict begin { 39.83453 0.0 0.0 9.95863 0.0 0.0 0. 9.95863 -9.95863 +-9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { +/a 0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { +/a p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul +p2 dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 +p1 a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ +b f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul +neg c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 1850 1862 a @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .25 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 9.95863 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 29.8759 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 29.8759 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 9.95863 2.98761 +SD end + +@endspecial 1850 1862 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 1850 +1862 a 1850 1862 a + tx@Dict begin { 0.0 39.83453 0.0 0.0 0.0 -9.95863 0. 9.95863 -9.95863 +-9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { +/a 0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { +/a p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul +p2 dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 +p1 a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ +b f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul +neg c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 1850 1862 a @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .25 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 9.95863 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 19.91727 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 29.8759 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 9.95863 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 19.91727 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 29.8759 2.98761 +SD end + +@endspecial +1850 1862 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 1850 1862 a 2984 1945 a + tx@Dict begin { 39.83453 0.0 0.0 9.95863 0.0 0.0 0. 9.95863 9.95863 +-9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { +/a 0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { +/a p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul +p2 dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 +p1 a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ +b f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul +neg c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 2984 1945 a @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .25 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 9.95863 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 29.8759 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 29.8759 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 9.95863 2.98761 +SD end + +@endspecial +2984 1945 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 2984 1945 a 2984 1945 a + tx@Dict begin { 39.83453 39.83453 0.0 0.0 9.95863 0.0 0. 9.95863 9.95863 +-9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { +/a 0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { +/a p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul +p2 dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 +p1 a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ +b f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul +neg c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 2984 1945 a @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .75 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 19.91727 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 19.91727 2.98761 +SD end + +@endspecial 2984 1945 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 2984 +1945 a 2984 1945 a + tx@Dict begin { 0.0 39.83453 0.0 0.0 0.0 -9.95863 0. 9.95863 9.95863 +-9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { +/a 0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { +/a p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul +p2 dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 +p1 a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ +b f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul +neg c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 2984 1945 a @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .25 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 9.95863 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 19.91727 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 29.8759 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 9.95863 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 19.91727 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 29.8759 2.98761 +SD end + +@endspecial +2984 1945 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 2984 1945 a 4117 1821 a + tx@Dict begin { 39.83453 39.83453 0.0 0.0 9.95863 0.0 0. -9.95863 +9.95863 -9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 +0 eq { /a 0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 +0 eq { /a p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 +dup mul p2 dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b +ED p3 p1 a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D +[ b f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul +neg c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 4117 1821 a @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .75 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 19.91727 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 19.91727 2.98761 +SD end + +@endspecial 4117 1821 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 4117 +1821 a 4117 1821 a + tx@Dict begin { 0.0 39.83453 0.0 -9.95863 0.0 0.0 0. -9.95863 9.95863 +-9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { +/a 0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { +/a p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul +p2 dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 +p1 a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ +b f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul +neg c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 4117 1821 a @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .75 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 9.95863 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 19.91727 19.91727 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 29.8759 2.98761 +SD end + +@endspecial +4117 1821 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 4117 1821 a 4117 1821 a + tx@Dict begin { 0.0 39.83453 0.0 0.0 0.0 -9.95863 0. -9.95863 9.95863 +-9.95863 0. dup sin /e ED cos /f ED /p3 ED /p2 ED /p1 ED p1 0 eq { +/a 0 def /b p2 0 le { 1 } { -1 } ifelse def p3 p2 abs } { p2 0 eq { +/a p1 0 lt { -1 } { 1 } ifelse def /b 0 def p3 p1 abs } { p1 dup mul +p2 dup mul add sqrt dup p1 exch div /a ED p2 exch div neg /b ED p3 +p1 a div } ifelse } ifelse atan dup sin /c ED cos /d ED /Matrix3D [ +b f mul c a mul e mul sub a f mul c b mul e mul add d e mul b e mul +neg c a mul f mul sub a e mul neg c b mul f mul add d f mul ] def Matrix3D +aload pop /z3 ED /z2 ED /z1 ED /x3 ED /x2 ED /x1 ED dup sin /e ED cos +/f ED /p3 ED /p2 ED /p1 ED p1 0 eq { /a 0 def /b p2 0 le { 1 } { -1 +} ifelse def p3 p2 abs } { p2 0 eq { /a p1 0 lt { -1 } { 1 } ifelse +def /b 0 def p3 p1 abs } { p1 dup mul p2 dup mul add sqrt dup p1 exch +div /a ED p2 exch div neg /b ED p3 p1 a div } ifelse } ifelse atan +dup sin /c ED cos /d ED /Matrix3D [ b f mul c a mul e mul sub a f mul +c b mul e mul add d e mul b e mul neg c a mul f mul sub a e mul neg +c b mul f mul add d f mul ] def [ Matrix3D aload pop z3 mul exch z2 +mul add exch z1 mul add 4 1 roll z3 mul exch z2 mul add exch z1 mul +add Matrix3D aload pop x3 mul exch x2 mul add exch x1 mul add 4 1 roll +x3 mul exch x2 mul add exch x1 mul add 3 -1 roll 3 -1 roll 4 -1 roll +8 -3 roll 3 copy x3 mul exch x2 mul add exch x1 mul add 4 1 roll z3 +mul exch z2 mul add exch z1 mul add ] concat } tx@Dict /TMatrix known +not { /TMatrix { } def /RAngle { 0 } def } if /TMatrix [ TMatrix CM +] cvx def /cp [ currentpoint ] cvx def CM CP T STV CM matrix invertmatrix +matrix concatmatrix exch exec concat cp moveto end + 4117 1821 a @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 0 setgray 0. true 0.0 0.0 39.83453 +39.83453 .5 Frame gsave .25 setgray fill grestore gsave 0.8 SLW 0 + setgray 0 setlinecap stroke grestore end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 9.95863 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 19.91727 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 9.95863 29.8759 2.98761 +SD end + +@endspecial @beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 9.95863 2.98761 +SD end + +@endspecial +@beginspecial @setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 19.91727 2.98761 +SD end + +@endspecial @beginspecial +@setspecial + tx@Dict begin STP newpath 0.8 SLW 1 setgray 29.8759 29.8759 2.98761 +SD end + +@endspecial 4117 1821 a + tx@Dict begin CP /TMatrix [ TMatrix setmatrix ] cvx def moveto end + 4117 1821 a 4426 +2206 4 1764 v 639 2209 3790 4 v Black Black eop +%%Trailer +end +userdict /end-hook known{end-hook}if +%%EOF |