%!PS-Adobe-2.0 EPSF-2.0 %%Creator: dvips(k) 5.95a Copyright 2005 Radical Eye Software %%Title: Jaxo_tmp.dvi %%BoundingBox: 73 382 522 721 %%DocumentFonts: CMMI12 CMR12 CMMI10 CMSY10 CMR10 %%EndComments %DVIPSWebPage: (www.radicaleye.com) %DVIPSCommandLine: /usr/bin/dvips -E -o %+ /home/mike/D0Note/plots/feynman.eps Jaxo_tmp.dvi %DVIPSParameters: dpi=600 %DVIPSSource: TeX output 2005.12.25:2056 %%BeginProcSet: tex.pro 0 0 %! /TeXDict 300 dict def TeXDict begin/N{def}def/B{bind def}N/S{exch}N/X{S N}B/A{dup}B/TR{translate}N/isls false N/vsize 11 72 mul N/hsize 8.5 72 mul N/landplus90{false}def/@rigin{isls{[0 landplus90{1 -1}{-1 1}ifelse 0 0 0]concat}if 72 Resolution div 72 VResolution div neg scale isls{ landplus90{VResolution 72 div vsize mul 0 exch}{Resolution -72 div hsize mul 0}ifelse TR}if Resolution VResolution vsize -72 div 1 add mul TR[ matrix currentmatrix{A A round sub abs 0.00001 lt{round}if}forall round exch round exch]setmatrix}N/@landscape{/isls true N}B/@manualfeed{ statusdict/manualfeed true put}B/@copies{/#copies X}B/FMat[1 0 0 -1 0 0] N/FBB[0 0 0 0]N/nn 0 N/IEn 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 IEn N end A{/foo setfont}2 array copy cvx N load 0 nn put/ctr 0 N[}B/sf 0 N/df{/sf 1 N/fntrx FMat N df-tail}B/dfs{div/sf X/fntrx[sf 0 0 sf neg 0 0]N df-tail}B/E{pop nn A definefont setfont}B/Cw{Cd A length 5 sub get}B/Ch{Cd A length 4 sub get }B/Cx{128 Cd A length 3 sub get sub}B/Cy{Cd A length 2 sub get 127 sub} B/Cdx{Cd A length 1 sub get}B/Ci{Cd A type/stringtype ne{ctr get/ctr ctr 1 add N}if}B/CharBuilder{save 3 1 roll S A/base get 2 index get S /BitMaps get S get/Cd X pop/ctr 0 N Cdx 0 Cx Cy Ch sub Cx Cw add Cy setcachedevice Cw Ch true[1 0 0 -1 -.1 Cx sub Cy .1 sub]{Ci}imagemask restore}B/D{/cc X A type/stringtype ne{]}if nn/base get cc ctr put nn /BitMaps get S ctr S sf 1 ne{A A length 1 sub A 2 index S get sf div put }if put/ctr ctr 1 add N}B/I{cc 1 add D}B/bop{userdict/bop-hook known{ bop-hook}if/SI save N @rigin 0 0 moveto/V matrix currentmatrix A 1 get A mul exch 0 get A mul add .99 lt{/QV}{/RV}ifelse load def pop pop}N/eop{ SI restore userdict/eop-hook known{eop-hook}if showpage}N/@start{ userdict/start-hook known{start-hook}if pop/VResolution X/Resolution X 1000 div/DVImag X/IEn 256 array N 2 string 0 1 255{IEn S A 360 add 36 4 index cvrs cvn put}for pop 65781.76 div/vsize X 65781.76 div/hsize X}N /p{show}N/RMat[1 0 0 -1 0 0]N/BDot 260 string N/Rx 0 N/Ry 0 N/V{}B/RV/v{ /Ry X/Rx X V}B statusdict begin/product where{pop false[(Display)(NeXT) (LaserWriter 16/600)]{A length product length le{A length product exch 0 exch getinterval eq{pop true exit}if}{pop}ifelse}forall}{false}ifelse end{{gsave TR -.1 .1 TR 1 1 scale Rx Ry false RMat{BDot}imagemask grestore}}{{gsave TR -.1 .1 TR Rx Ry scale 1 1 false RMat{BDot} imagemask grestore}}ifelse B/QV{gsave newpath transform round exch round exch itransform moveto Rx 0 rlineto 0 Ry neg rlineto Rx neg 0 rlineto fill grestore}B/a{moveto}B/delta 0 N/tail{A/delta X 0 rmoveto}B/M{S p delta add tail}B/b{S p tail}B/c{-4 M}B/d{-3 M}B/e{-2 M}B/f{-1 M}B/g{0 M} B/h{1 M}B/i{2 M}B/j{3 M}B/k{4 M}B/w{0 rmoveto}B/l{p -4 w}B/m{p -3 w}B/n{ p -2 w}B/o{p -1 w}B/q{p 1 w}B/r{p 2 w}B/s{p 3 w}B/t{p 4 w}B/x{0 S rmoveto}B/y{3 2 roll p a}B/bos{/SS save N}B/eos{SS restore}B end %%EndProcSet %%BeginProcSet: pstricks.pro 0 0 %! % PostScript prologue for pstricks.tex. % Version 97 patch 4, 04/05/10 % For distribution, see pstricks.tex. % /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 % %%-------------- DG begin patch 15 ---------------%% %/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 /DashLine { dup 0 gt { /a .5 def PathLength exch div } { pop /a 1 def PathLength } ifelse /b ED /x1 ED /y1 ED /x ED /y ED /z y x add y1 add x1 add def /Coef 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 def /y y Coef mul def /x x Coef mul def /y1 y1 Coef mul def /x1 x1 Coef mul def x1 0 gt y1 0 gt x 0 gt y 0 gt and { [ y x y1 x1 ] 1 a sub y mul} { [ 1 0] 0 } ifelse setdash stroke } def %%-------------- DG end patch 15 ---------------%% /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 % DG/SR modification begin - Dec. 12, 1997 - Patch 2 %itransform translate pathbbox /y2 ED a Div ceiling cvi /x2 ED /y1 ED a itransform pathbbox /y2 ED a Div ceiling cvi /x2 ED /y1 ED a % DG/SR modification end 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 % DG/SR modification begin - Jun. 1, 1998 - Patch 3 (from Michael Vulis) % a mul y1 moveto 0 y2 rlineto stroke /x1 x1 1 add def } repeat grestore } % def a mul y1 moveto 0 y2 rlineto stroke /x1 x1 1 add def } repeat grestore pop pop } def % DG/SR modification end /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 } 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 % DG modification begin - Jan. 15, 1997 %/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 /Triangle { /mtrx CM def translate rotate /h ED 2 div /w ED dup 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 mark 0 d w neg d 0 h w d 0 d /ArrowA { moveto } def /ArrowB { } def false Line closepath mtrx % DG/SR modification begin - Jun. 1, 1998 - Patch 3 (from Michael Vulis) % setmatrix } def setmatrix pop } def % DG/SR modification end /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 % DG/SR modification begin - Nov. 7, 1997 - Patch 1 %{ 1 setlinecap [ 0 dx n div ] dy n div 2 div setdash } { 1 setlinecap [ 0 dx n div ] dx n div 2 div setdash } % DG/SR modification end { 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 % END pstricks.pro %%EndProcSet %%BeginProcSet: pst-dots.pro 0 0 %!PS-Adobe-2.0 %%Title: Dot Font for PSTricks %%Creator: Timothy Van Zandt %%Creation Date: May 7, 1993 %% Version 97 patch 1, 99/12/16 %% Modified by Etienne Riga - Dec. 16, 1999 %% to add /Diamond, /SolidDiamond and /BoldDiamond 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 dup (P) 0 get /BoldPentagon put % DG/SR modification begin - Dec. 16, 1999 - From Etienne Riga dup (l) 0 get /SolidDiamond put dup (d) 0 get /Diamond put (D) 0 get /BoldDiamond put % DG/SR modification end /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 % DG/SR modification begin - Dec. 16, 1999 - From Etienne Riga /SolidDiamond 1008 def /Diamond 1008 def /BoldDiamond 1008 def % DG/SR modification end /.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 % DG/SR modification begin - Dec. 16, 1999 - From Etienne Riga /Diamond { -428.5 -742.5 428.5 742.5 } def /BoldDiamond /Diamond load def /SolidDiamond /Diamond load def % DG/SR modification end /.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 % DG/SR modification begin - Dec. 16, 1999 - From Etienne Riga /DiamondPath { 0 742.5 moveto -428.5 0 lineto 0 -742.5 lineto 428.5 0 lineto closepath } def /SolidDiamond { DiamondPath fill } def /Diamond { DiamondPath .85 .85 scale DiamondPath eofill } def /BoldDiamond { DiamondPath .7 .7 scale DiamondPath eofill } def % DG/SR modification end /.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 %END pst-dots.pro %%EndProcSet %%BeginProcSet: texps.pro 0 0 %! TeXDict begin/rf{findfont dup length 1 add dict begin{1 index/FID ne 2 index/UniqueID ne and{def}{pop pop}ifelse}forall[1 index 0 6 -1 roll exec 0 exch 5 -1 roll VResolution Resolution div mul neg 0 0]FontType 0 ne{/Metrics exch def dict begin Encoding{exch dup type/integertype ne{ pop pop 1 sub dup 0 le{pop}{[}ifelse}{FontMatrix 0 get div Metrics 0 get div def}ifelse}forall Metrics/Metrics currentdict end def}{{1 index type /nametype eq{exit}if exch pop}loop}ifelse[2 index currentdict end definefont 3 -1 roll makefont/setfont cvx]cvx def}def/ObliqueSlant{dup sin S cos div neg}B/SlantFont{4 index mul add}def/ExtendFont{3 -1 roll mul exch}def/ReEncodeFont{CharStrings rcheck{/Encoding false def dup[ exch{dup CharStrings exch known not{pop/.notdef/Encoding true def}if} forall Encoding{]exch pop}{cleartomark}ifelse}if/Encoding exch def}def end %%EndProcSet %%BeginProcSet: special.pro 0 0 %! 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/setpagedevice{pop}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 /setpagedevice{pop}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 0 0 %! 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 @defspecial /ed{exch def}def /gs{gsave dup scale}def /gsw{gs /width ed width setlinewidth}def /p1{/y1 ed /x1 ed}def /p2{/y2 ed /x2 ed}def /p3{/y3 ed /x3 ed}def /abox{newpath x1 y1 moveto x1 y2 lineto x2 y2 lineto x2 y1 lineto closepath}def /atriangle{newpath x1 y1 moveto x2 y2 lineto x3 y3 lineto closepath}def /arrowdown{ /nwidth { width 1 add } def newpath 0 nwidth 1.5 mul neg moveto nwidth 1.2 mul nwidth 3 mul rlineto nwidth 2.4 mul neg 0 rlineto nwidth 1.2 mul nwidth 3 mul neg rlineto closepath fill } def /arrowup{ /nwidth { width 1 add } def newpath 0 nwidth 1.5 mul moveto nwidth 1.2 mul nwidth 3 mul neg rlineto nwidth 2.4 mul neg 0 rlineto nwidth 1.2 mul nwidth 3 mul rlineto closepath fill } def /arrowright{ /nwidth { width 1 add } def newpath nwidth 1.5 mul 0 moveto nwidth 3 mul neg nwidth 1.2 mul rlineto 0 nwidth 2.4 mul neg rlineto nwidth 3 mul nwidth 1.2 mul rlineto closepath fill } def /gluon{ gsw /num ed /ampi ed /dy ed /dx ed p1 /dy dy y1 sub def /dx dx x1 sub def /dr dx dx mul dy dy mul add sqrt def x1 y1 translate dy dx atan rotate /num num 0.5 sub round def /inc dr num 2 mul 2 add div def /amp8 ampi 0.9 mul def amp8 0 lt {/amp8 amp8 neg def} if /x1 inc 2 mul def newpath 0 0 moveto inc 0.1 mul ampi 0.5 mul inc 0.5 mul ampi inc 1.4 mul ampi curveto x1 amp8 add dup ampi exch ampi neg dup x1 exch curveto 2 1 num { pop x1 amp8 sub dup ampi neg exch ampi dup x1 inc add exch curveto /x1 x1 inc dup add add def x1 amp8 add dup ampi exch ampi neg dup x1 exch curveto } for x1 amp8 sub dup ampi neg exch ampi dup x1 inc 0.6 mul add exch curveto x1 inc 1.5 mul add ampi dr inc 0.1 mul sub ampi 0.5 mul dr 0 curveto stroke grestore } def /photon{ gsw /num ed /ampi ed p2 p1 /dy y2 y1 sub def /dx x2 x1 sub def /dr dx dx mul dy dy mul add sqrt def x1 y1 translate dy dx atan rotate /num num 2 mul 0.5 sub round def /x2 dr num div def /pi 3.141592 def /sign 1 def 1 1 num { pop newpath 0 0 moveto 4 3 div x2 mul pi div dup neg x2 add 4 3 div ampi sign mul mul dup 3 1 roll x2 0 curveto stroke /sign sign neg def x2 0 translate } for grestore } def /zigzag{ gsw /num ed /ampi ed p2 p1 /dy y2 y1 sub def /dx x2 x1 sub def /dr dx dx mul dy dy mul add sqrt def x1 y1 translate dy dx atan rotate /num num 2 mul 0.5 sub round def /x2 dr num div def /pi 3.141592 def /sign 1 def 1 1 num { pop newpath 0 0 moveto x2 2 div ampi sign mul lineto x2 0 lineto stroke /sign sign neg def x2 0 translate } for grestore } def /photonarc{ gsw /num ed /ampli ed /arcend ed /arcstart ed /radius ed translate /num num 2 mul round def arcend arcstart lt { /arcend arcend 360 add def } if /arcend arcend arcstart sub num div def arcstart rotate /arcstart arcend 2 div def /cp arcend cos def /sp arcend sin def /cp2 arcstart cos def /sp2 arcstart sin def newpath 1 1 num { pop radius 0 moveto /beta radius arcend mul 180 ampli mul div def /tt sp cp beta mul sub cp sp beta mul add div def /amp1 radius ampli add 8 mul beta cp2 mul sp2 sub mul beta 4 cp add mul tt cp mul 3 mul sp 4 mul sub add radius mul sub beta tt sub 3 mul div def radius ampli add 8 mul cp2 mul 1 cp add radius mul sub 3 div amp1 sub dup radius sub beta mul amp1 dup radius cp mul sub tt mul radius sp mul add radius cp mul radius sp mul curveto /ampli ampli neg def arcend rotate } for stroke grestore } def /gluearc{ gsw /num ed /ampi ed /arcend ed /arcstart ed /radius ed arcend arcstart lt { /ampi ampi -1 mul def /arcstart arcend /arcend arcstart def def } if translate arcstart rotate /darc arcend arcstart sub def /dr darc 180 div 3.141592 mul radius mul def /const darc dr div def /num num 0.5 sub round def /inc dr num 2 mul 2 add div def /amp8 ampi 0.9 mul def /amp1 radius ampi add def /amp2 radius ampi sub def /amp3 radius ampi 2 div add def /amp4 amp1 inc amp8 add const mul cos div def /amp5 amp2 amp8 const mul cos div def /amp6 amp1 inc 0.6 mul amp8 add const mul cos div def /amp7 amp1 inc 0.9 mul const mul cos div def amp8 0 lt {/amp8 amp8 neg def} if /x1 inc 2 mul def newpath radius 0 moveto inc 0.1 mul const mul dup cos amp3 mul exch sin amp3 mul inc 0.5 mul const mul dup cos amp7 mul exch sin amp7 mul inc 1.4 mul const mul dup cos amp1 mul exch sin amp1 mul curveto x1 amp8 add const mul dup cos amp6 mul exch sin amp6 mul x1 amp8 add const mul dup cos amp5 mul exch sin amp5 mul x1 const mul dup cos amp2 mul exch sin amp2 mul curveto 2 1 num { pop x1 amp8 sub const mul dup cos amp5 mul exch sin amp5 mul x1 amp8 sub const mul dup cos amp4 mul exch sin amp4 mul x1 inc add const mul dup cos amp1 mul exch sin amp1 mul curveto /x1 x1 inc dup add add def x1 amp8 add const mul dup cos amp4 mul exch sin amp4 mul x1 amp8 add const mul dup cos amp5 mul exch sin amp5 mul x1 const mul dup cos amp2 mul exch sin amp2 mul curveto } for x1 amp8 sub const mul dup cos amp5 mul exch sin amp5 mul x1 amp8 sub const mul dup cos amp6 mul exch sin amp6 mul x1 inc 0.6 mul add const mul dup cos amp1 mul exch sin amp1 mul curveto x1 inc 1.5 mul add const mul dup cos amp7 mul exch sin amp7 mul dr inc 0.1 mul sub const mul dup cos amp3 mul exch sin amp3 mul dr const mul dup cos radius mul exch sin radius mul curveto stroke grestore } def /arrowarc{ gsw /arcend ed /arcstart ed /radius ed translate newpath 0 0 radius arcstart arcend arc stroke arcstart arcend gt { /arcend arcend 360 add def } if arcstart arcend add 2 div rotate radius 0 translate arrowup grestore } def /longarrowarc{ gsw /arcend ed /arcstart ed /radius ed translate arcstart arcend gt { /arcend arcend 360 add def } if /arcmid 540 width 1 add mul 3.14159 div radius div def newpath 0 0 radius arcstart arcend arcmid sub arc stroke arcend arcmid 2 div sub rotate radius 0 translate arrowup grestore } def /dasharrowarc{ gsw /dsize ed /arcend1 ed /arcstart1 ed /radius ed translate arcend1 arcstart1 lt { /arcend1 arcend1 360 add def } if /arcmid1 arcend1 arcstart1 add 2 div def 0 0 radius arcstart1 arcmid1 dsize width 1 dashcarc 0 0 radius arcmid1 arcend1 dsize width 1 dashcarc arcmid1 rotate radius 0 translate arrowup grestore } def /arrowarcn{ gsw /arcend ed /arcstart ed /radius ed translate newpath 0 0 radius arcstart arcend arcn stroke arcstart arcend lt { /arcstart arcstart 360 add def } if arcstart arcend add 2 div rotate radius 0 translate arrowdown grestore } def /longarrowarcn{ gsw /arcend ed /arcstart ed /radius ed translate arcstart arcend lt { /arcstart arcstart 360 add def } if /arcmid 540 width 1 add mul 3.14159 div radius div def newpath 0 0 radius arcstart arcend arcmid add arcn stroke arcend arcmid 2 div add rotate radius 0 translate arrowdown grestore } def /dasharrowarcn{ gsw /dsize ed /arcend1 ed /arcstart1 ed /radius ed translate arcstart1 arcend1 lt { /arcstart1 arcstart1 360 add def } if /arcmid1 arcstart1 arcend1 add 2 div def 0 0 radius arcmid1 arcstart1 dsize width 1 dashcarc 0 0 radius arcend1 arcmid1 dsize width 1 dashcarc arcmid1 rotate radius 0 translate arrowdown grestore } def /arrowline{ gsw p2 p1 /dx x2 x1 sub def /dy y2 y1 sub def /dr dx dx mul dy dy mul add sqrt def x1 y1 translate newpath 0 0 moveto dx dy rlineto stroke dy dx atan rotate dr 2.0 div 0 translate arrowright grestore } def /longarrow{ gsw p2 p1 /dx x2 x1 sub def /dy y2 y1 sub def /dr dx dx mul dy dy mul add sqrt def x1 y1 translate dy dx atan rotate newpath 0 0 moveto dr width 3 mul sub 0 rlineto stroke dr width 1.5 mul sub 0 translate arrowright grestore } def /dasharrowline{ gsw /dsize ed p2 p1 /dx x2 x1 sub def /dy y2 y1 sub def /dr dx dx mul dy dy mul add sqrt 2 div def x1 y1 translate dy dx atan rotate 0 0 dr 0 dsize width 1 dashline dr 0 translate 0 0 dr 0 dsize width 1 dashline arrowright grestore } def /line{ gsw p2 p1 newpath x1 y1 moveto x2 y2 lineto stroke grestore } def /dashline{ gsw /dsize ed p2 p1 /r y2 y1 sub dup mul x2 x1 sub dup mul add sqrt def /dsize r dsize 2 mul div 0.5 sub round dup 0 le { pop 0 } if 2 mul 1 add r exch div def [dsize dsize] 0 setdash newpath x1 y1 moveto x2 y2 lineto stroke grestore } def /carc{ gsw /arcend ed /arcstart ed /radius ed translate newpath 0 0 radius arcstart arcend arc stroke grestore } def /dashcarc{ gsw /dsize ed /arcend ed /arcstart ed /radius ed translate /dr arcend arcstart sub dup 0 lt { 360 add } if 3.14159 mul 180 div radius mul def /dsize dr dsize 2 mul div 0.5 sub round dup 0 le { pop 0 } if 2 mul 1 add dr exch div def [dsize dsize] 0 setdash newpath 0 0 radius arcstart arcend arc stroke grestore } def /vertex{ gs /dotsize ed translate newpath 0 0 dotsize 0 360 arc fill stroke grestore } def /bcirc{ gsw /radius ed translate gsave 1 setgray newpath 0 0 radius 0 360 arc fill grestore newpath 0 0 radius 0 360 arc stroke grestore } def /gcirc{ gsw /gcolor ed /radius ed translate 1 setgray newpath 0 0 radius 0 360 arc fill gcolor setgray newpath 0 0 radius 0 360 arc fill 0 setgray newpath 0 0 radius 0 360 arc stroke grestore } def /ccirc1{ gsw /radius ed translate newpath 0 0 radius 0 360 arc fill grestore } def /ccirc2{ gsw /radius ed translate newpath 0 0 radius 0 360 arc stroke grestore } def /box{ gsw p2 p1 abox stroke grestore } def /bbox{ gsw p2 p1 gsave 1 setgray abox fill grestore abox stroke grestore } def /gbox{ gsw /gcolor ed p2 p1 1 setgray abox fill gcolor setgray abox fill 0 setgray abox stroke grestore } def /cbox1{ gsw p2 p1 abox fill grestore } def /cbox2{ gsw p2 p1 abox stroke grestore } def /triangle{ gsw p3 p2 p1 atriangle stroke grestore } def /btriangle{ gsw p3 p2 p1 gsave 1 setgray atriangle fill grestore atriangle stroke grestore } def /gtriangle{ gsw /gcolor ed p3 p2 p1 1 setgray atriangle fill gcolor setgray atriangle fill 0 setgray atriangle stroke grestore } def /ctriangle1{ gsw p3 p2 p1 atriangle fill grestore } def /ctriangle2{ gsw p3 p2 p1 atriangle stroke grestore } def /btext{ gsw /fsize ed /thetext ed translate /hsize thetext stringwidth pop def /x1 hsize fsize add 2 div neg def /y1 fsize 2 mul 3 div neg def /x2 x1 neg def /y2 y1 neg def gsave 1 setgray abox fill grestore abox stroke hsize 2 div neg fsize 3 div neg moveto thetext show grestore } def /b2text{ gsw /fsize ed /text2 ed /text1 ed translate /hsize1 text1 stringwidth pop def /hsize2 text2 stringwidth pop def hsize1 hsize2 lt { /hsize hsize2 def } { /hsize hsize1 def } ifelse /x1 hsize fsize add 2 div neg def /y1 fsize neg 7 mul 6 div def /x2 x1 neg def /y2 y1 neg def gsave 1 setgray abox fill grestore abox stroke hsize1 2 div neg fsize 6 div moveto text1 show hsize2 2 div neg fsize 5 mul 6 div neg moveto text2 show grestore } def /gtext{ gsw /fsize ed /thetext ed /graysc ed translate /hsize thetext stringwidth pop def /x1 hsize fsize add 2 div neg def /y1 fsize 2 mul 3 div neg def /x2 x1 neg def /y2 y1 neg def graysc setgray abox fill 0 setgray abox stroke hsize 2 div neg fsize 3 div neg moveto thetext show grestore } def /ctext1{ gsw /fsize ed /thetext ed translate /hsize thetext stringwidth pop def /x1 hsize fsize add 2 div neg def /y1 fsize 2 mul 3 div neg def /x2 x1 neg def /y2 y1 neg def abox fill grestore } def /ctext2{ gsw /fsize ed /thetext ed translate /hsize thetext stringwidth pop def /x1 hsize fsize add 2 div neg def /y1 fsize 2 mul 3 div neg def /x2 x1 neg def /y2 y1 neg def abox stroke hsize 2 div neg fsize 3 div neg moveto thetext show grestore } def /g2text{ gsw /fsize ed /text2 ed /text1 ed /graysc ed translate /hsize1 text1 stringwidth pop def /hsize2 text2 stringwidth pop def hsize1 hsize2 lt { /hsize hsize2 def } { /hsize hsize1 def } ifelse /x1 hsize fsize add 2 div neg def /y1 fsize neg 7 mul 6 div def /x2 x1 neg def /y2 y1 neg def graysc setgray abox fill 0 setgray abox stroke hsize1 2 div neg fsize 6 div moveto text1 show hsize2 2 div neg fsize 5 mul 6 div neg moveto text2 show grestore } def /c2text1{ gsw /fsize ed /text2 ed /text1 ed translate /hsize1 text1 stringwidth pop def /hsize2 text2 stringwidth pop def hsize1 hsize2 lt { /hsize hsize2 def } { /hsize hsize1 def } ifelse /x1 hsize fsize add 2 div neg def /y1 fsize neg 7 mul 6 div def /x2 x1 neg def /y2 y1 neg def abox fill grestore } def /c2text2{ gsw /fsize ed /text2 ed /text1 ed translate /hsize1 text1 stringwidth pop def /hsize2 text2 stringwidth pop def hsize1 hsize2 lt { /hsize hsize2 def } { /hsize hsize1 def } ifelse /x1 hsize fsize add 2 div neg def /y1 fsize neg 7 mul 6 div def /x2 x1 neg def /y2 y1 neg def abox stroke hsize1 2 div neg fsize 6 div moveto text1 show hsize2 2 div neg fsize 5 mul 6 div neg moveto text2 show grestore } def /ptext{ gs /text ed /fsize ed /mode ed 3 1 roll translate rotate mode 3 lt { 0 fsize neg translate } { mode 6 lt { /mode mode 3 sub def 0 fsize 2 div neg translate } { /mode mode 6 sub def } ifelse } ifelse /fsize text stringwidth pop def mode 1 eq { fsize 2 div neg 0 translate } { mode 2 eq { fsize neg 0 translate } if } ifelse 0 0 moveto text show grestore } def /goval{ gsw /gcolor ed /x1 ed /x2 ed /radius ed translate x1 rotate x2 radius div 1.0 scale 1 setgray newpath 0 0 radius 0 360 arc fill gcolor setgray newpath 0 0 radius 0 360 arc fill 0 setgray newpath 0 0 radius 0 360 arc stroke grestore } def /coval1{ gsw /x1 ed /x2 ed /radius ed translate x1 rotate x2 radius div 1.0 scale newpath 0 0 radius 0 360 arc fill grestore } def /coval2{ gsw /x1 ed /x2 ed /radius ed translate x1 rotate x2 radius div 1.0 scale newpath 0 0 radius 0 360 arc stroke grestore } def /oval{ gsw /x1 ed /x2 ed /radius ed translate x1 rotate x2 radius div 1.0 scale newpath 0 0 radius 0 360 arc stroke grestore } def /docurve{ x1 2 mul x2 add 3 div y1 y0 sub x1 x0 sub div x2 x0 sub mul y2 y0 sub x2 x0 sub div x1 x0 sub mul add y1 add y0 2 mul add 3 div x1 x2 2 mul add 3 div y2 y3 sub x2 x3 sub div x1 x3 sub mul y1 y3 sub x1 x3 sub div x2 x3 sub mul add y2 add y3 2 mul add 3 div x2 y2 curveto } def /makecurve{ gsw /points ed /ss points length 2 idiv 2 mul def newpath ss 4 gt { /x1 points 0 get def /y1 points 1 get def /x2 points 2 get def /y2 points 3 get def /x3 points 4 get def /y3 points 5 get def /x0 x1 2 mul x2 sub def /y0 y3 y2 sub x3 x2 sub div y2 y1 sub x2 x1 sub div sub 2 mul x2 x1 sub dup mul x3 x1 sub div mul y1 2 mul add y2 sub def x1 y1 moveto docurve 0 2 ss 8 sub { /ii ed /x0 points ii get def /y0 points ii 1 add get def /x1 points ii 2 add get def /y1 points ii 3 add get def /x2 points ii 4 add get def /y2 points ii 5 add get def /x3 points ii 6 add get def /y3 points ii 7 add get def docurve } for /x0 points ss 6 sub get def /y0 points ss 5 sub get def /x1 points ss 4 sub get def /y1 points ss 3 sub get def /x2 points ss 2 sub get def /y2 points ss 1 sub get def /x3 x2 2 mul x1 sub def /y3 y2 y1 sub x2 x1 sub div y1 y0 sub x1 x0 sub div sub 2 mul x2 x1 sub dup mul x2 x0 sub div mul y2 2 mul add y1 sub def docurve } { ss 4 eq { points 0 get points 1 get moveto points 2 get points 3 get lineto } if } ifelse stroke grestore } def /makedashcurve{ gsw /dsize ed /points ed /ss points length 2 idiv 2 mul def newpath ss 4 gt { /x1 points 0 get def /y1 points 1 get def /x2 points 2 get def /y2 points 3 get def /x3 points 4 get def /y3 points 5 get def /x0 x1 2 mul x2 sub def /y0 y3 y2 sub x3 x2 sub div y2 y1 sub x2 x1 sub div sub 2 mul x2 x1 sub dup mul x3 x1 sub div mul y1 2 mul add y2 sub def x1 y1 moveto docurve 0 2 ss 8 sub { /ii ed /x0 points ii get def /y0 points ii 1 add get def /x1 points ii 2 add get def /y1 points ii 3 add get def /x2 points ii 4 add get def /y2 points ii 5 add get def /x3 points ii 6 add get def /y3 points ii 7 add get def docurve } for /x0 points ss 6 sub get def /y0 points ss 5 sub get def /x1 points ss 4 sub get def /y1 points ss 3 sub get def /x2 points ss 2 sub get def /y2 points ss 1 sub get def /x3 x2 2 mul x1 sub def /y3 y2 y1 sub x2 x1 sub div y1 y0 sub x1 x0 sub div sub 2 mul x2 x1 sub dup mul x2 x0 sub div mul y2 2 mul add y1 sub def docurve } { ss 4 eq { points 0 get points 1 get moveto points 2 get points 3 get lineto } if } ifelse centerdash stroke grestore } def /pathlength{ flattenpath /dist 0 def { /yfirst ed /xfirst ed /ymoveto yfirst def /xmoveto xfirst def } { /ynext ed /xnext ed /dist dist ynext yfirst sub dup mul xnext xfirst sub dup mul add sqrt add def /yfirst ynext def /xfirst xnext def } {} {/ynext ymoveto def /xnext xmoveto def /dist ynext yfirst sub dup mul xnext xfirst sub dup mul add sqrt add def /yfirst ynext def /xfirst xnext def } pathforall dist } def /centerdash{ /pathlen pathlength def /jj pathlen dsize div 2.0 div cvi def /ddsize pathlen jj 2.0 mul div def [ddsize] ddsize 2 div setdash } def /logaxis{ gsw /offset ed /hashsize ed /nlogs ed p2 p1 x1 y1 translate /y2 y2 y1 sub def /x2 x2 x1 sub def y2 x2 atan rotate /rr x2 dup mul y2 dup mul add sqrt def offset 0 ne { /offset offset ln 10 ln div def } if /offset offset dup cvi sub def newpath 0 0 moveto rr 0 lineto /lsize rr nlogs div def 0 1 nlogs { /x2 ed x2 offset ge { /y2 x2 offset sub lsize mul def y2 rr le { y2 0 moveto y2 hashsize 1.2 mul lineto } if } if } for stroke width 0.6 mul setlinewidth newpath 0 1 nlogs { /x2 ed 2 1 9 { ln 10 ln div x2 add /xx2 ed xx2 offset ge { /y2 xx2 offset sub lsize mul def y2 rr le { y2 0 moveto y2 hashsize 0.8 mul lineto } if } if } for } for stroke grestore } def /linaxis{ gsw /offset ed /hashsize ed /perdec ed /numdec ed p2 p1 x1 y1 translate /y2 y2 y1 sub def /x2 x2 x1 sub def y2 x2 atan rotate /rr x2 dup mul y2 dup mul add sqrt def newpath 0 0 moveto rr 0 lineto /x1 rr numdec perdec mul div def /y1 rr numdec div def /offset offset x1 mul def 0 1 numdec { y1 mul offset sub dup 0 ge { dup rr le { dup 0 moveto hashsize 1.2 mul lineto } if } if } for stroke width 0.6 mul setlinewidth newpath offset cvi 1 numdec perdec mul offset add { x1 mul offset sub dup 0 ge { dup rr le { dup 0 moveto hashsize 0.8 mul lineto } if } if } for stroke grestore } def @fedspecial end %%BeginFont: CMR10 %!PS-AdobeFont-1.1: CMR10 1.00B %%CreationDate: 1992 Feb 19 19:54:52 % Copyright (C) 1997 American Mathematical Society. All Rights Reserved. 11 dict begin /FontInfo 7 dict dup begin /version (1.00B) readonly def /Notice (Copyright (C) 1997 American Mathematical Society. All Rights Reserved) readonly def /FullName (CMR10) readonly def /FamilyName (Computer Modern) readonly def /Weight (Medium) readonly def /ItalicAngle 0 def /isFixedPitch false def end readonly def /FontName /CMR10 def /PaintType 0 def /FontType 1 def /FontMatrix [0.001 0 0 0.001 0 0] readonly def /Encoding 256 array 0 1 255 {1 index exch /.notdef put} for dup 43 /plus put readonly def /FontBBox{-251 -250 1009 969}readonly def currentdict end currentfile eexec D9D66F633B846A97B686A97E45A3D0AA052A014267B7904EB3C0D3BD0B83D891 016CA6CA4B712ADEB258FAAB9A130EE605E61F77FC1B738ABC7C51CD46EF8171 9098D5FEE67660E69A7AB91B58F29A4D79E57022F783EB0FBBB6D4F4EC35014F D2DECBA99459A4C59DF0C6EBA150284454E707DC2100C15B76B4C19B84363758 469A6C558785B226332152109871A9883487DD7710949204DDCF837E6A8708B8 2BDBF16FBC7512FAA308A093FE5CF7158F1163BC1F3352E22A1452E73FECA8A4 87100FB1FFC4C8AF409B2067537220E605DA0852CA49839E1386AF9D7A1A455F D1F017CE45884D76EF2CB9BC5821FD25365DDEA6E45F332B5F68A44AD8A530F0 92A36FAC8D27F9087AFEEA2096F839A2BC4B937F24E080EF7C0F9374A18D565C 295A05210DB96A23175AC59A9BD0147A310EF49C551A417E0A22703F94FF7B75 409A5D417DA6730A69E310FA6A4229FC7E4F620B0FC4C63C50E99E179EB51E4C 4BC45217722F1E8E40F1E1428E792EAFE05C5A50D38C52114DFCD24D54027CBF 2512DD116F0463DE4052A7AD53B641A27E81E481947884CE35661B49153FA19E 0A2A860C7B61558671303DE6AE06A80E4E450E17067676E6BBB42A9A24ACBC3E B0CA7B7A3BFEA84FED39CCFB6D545BB2BCC49E5E16976407AB9D94556CD4F008 24EF579B6800B6DC3AAF840B3FC6822872368E3B4274DD06CA36AF8F6346C11B 43C772CC242F3B212C4BD7018D71A1A74C9A94ED0093A5FB6557F4E0751047AF D72098ECA301B8AE68110F983796E581F106144951DF5B750432A230FDA3B575 5A38B5E7972AABC12306A01A99FCF8189D71B8DBF49550BAEA9CF1B97CBFC7CC 96498ECC938B1A1710B670657DE923A659DB8757147B140A48067328E7E3F9C3 7D1888B284904301450CE0BC15EEEA00E48CCD6388F3FC3C8578EF9A20A0E06E 4F7ADDAF0E7D1E182D115BF1AD931977325AD391E72E2B13CC108E3726C11099 E2000623188AAAC9F3E233EB253BDD8B0A4759A66A113E066238B0086AC1B634 5ABFF90E4B5ED3FA69C22541981B2BFC9710AEF6B50A8BB53431C7B4D380D721 639E005D6B4688EE16BFF48443E7C9E5FB5BC5883E271CB0342893C0BBC0A879 B7220832FB50103F72F8B5D9932DD02233219F804C0501D918326F387EE1A224 998D363FD55726C260EDBCF91C9A0690B008FB12AF257FB4B2AC80FFFF07BED7 7841254EE4C976DD96906BAA6C7332946F51B75F5C9C15AE15193700F73CCFD1 04881670671B49CDDFBC5C52DFF43BEAB6B4CCEBF70AE043A1395C514E531B20 BF414B344AD9CCEFC62A279EA53EEC4ACCFEB711A3B802FF770A09E52ED3A7A5 089E57688D8FF3CC2FEB42244A73A2E815DA491C260740C211888D80FC4F8329 ACB35AAC0E43999456BEDD73C343CEAB18ACEB7E176BE20328CFDF1D60436E9F 5617605486E25D8A849EB0FF4A66EF9485A7883340824B5533A6179D0A 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 cleartomark %%EndFont %%BeginFont: CMSY10 %!PS-AdobeFont-1.1: CMSY10 1.0 %%CreationDate: 1991 Aug 15 07:20:57 % Copyright (C) 1997 American Mathematical Society. All Rights Reserved. 11 dict begin /FontInfo 7 dict dup begin /version (1.0) readonly def /Notice (Copyright (C) 1997 American Mathematical Society. All Rights Reserved) readonly def /FullName (CMSY10) readonly def /FamilyName (Computer Modern) readonly def /Weight (Medium) readonly def /ItalicAngle -14.035 def /isFixedPitch false def end readonly def /FontName /CMSY10 def /PaintType 0 def /FontType 1 def /FontMatrix [0.001 0 0 0.001 0 0] readonly def /Encoding 256 array 0 1 255 {1 index exch /.notdef put} for dup 0 /minus put readonly def /FontBBox{-29 -960 1116 775}readonly def currentdict end currentfile eexec D9D66F633B846A97B686A97E45A3D0AA052F09F9C8ADE9D907C058B87E9B6964 7D53359E51216774A4EAA1E2B58EC3176BD1184A633B951372B4198D4E8C5EF4 A213ACB58AA0A658908035BF2ED8531779838A960DFE2B27EA49C37156989C85 E21B3ABF72E39A89232CD9F4237FC80C9E64E8425AA3BEF7DED60B122A52922A 221A37D9A807DD01161779DDE7D31FF2B87F97C73D63EECDDA4C49501773468A 27D1663E0B62F461F6E40A5D6676D1D12B51E641C1D4E8E2771864FC104F8CBF 5B78EC1D88228725F1C453A678F58A7E1B7BD7CA700717D288EB8DA1F57C4F09 0ABF1D42C5DDD0C384C7E22F8F8047BE1D4C1CC8E33368FB1AC82B4E96146730 DE3302B2E6B819CB6AE455B1AF3187FFE8071AA57EF8A6616B9CB7941D44EC7A 71A7BB3DF755178D7D2E4BB69859EFA4BBC30BD6BB1531133FD4D9438FF99F09 4ECC068A324D75B5F696B8688EEB2F17E5ED34CCD6D047A4E3806D000C199D7C 515DB70A8D4F6146FE068DC1E5DE8BC5703711DA090312BA3FC00A08C453C609 C627A8B1550654AD5E22C5F3F3CC8C1C0A6C7ADDAB55016A76EC46213FD9BAAF 03F7A5FD261BF647FCA5049118033F809370A84AC3ADA3D5BE032CBB494D7851 A6242E785CCC20D81FC5EE7871F1E588DA3E31BD321C67142C5D76BC6AC708DF C21616B4CC92F0F8B92BD37A4AB83E066D1245FAD89B480CB0AC192D4CAFA6AD 241BD8DF7AD566A2022FBC67364AB89F33608554113D210FE5D27F8FB1B2B78A F22EC999DBAAFC9C60017101D5FB2A3B6E2BF4BE47B8E5E4662B8C41AB471DFC A31EE1 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 cleartomark %%EndFont %%BeginFont: CMMI10 %!PS-AdobeFont-1.1: CMMI10 1.100 %%CreationDate: 1996 Jul 23 07:53:57 % Copyright (C) 1997 American Mathematical Society. All Rights Reserved. 11 dict begin /FontInfo 7 dict dup begin /version (1.100) readonly def /Notice (Copyright (C) 1997 American Mathematical Society. All Rights Reserved) readonly def /FullName (CMMI10) readonly def /FamilyName (Computer Modern) readonly def /Weight (Medium) readonly def /ItalicAngle -14.04 def /isFixedPitch false def end readonly def /FontName /CMMI10 def /PaintType 0 def /FontType 1 def /FontMatrix [0.001 0 0 0.001 0 0] readonly def /Encoding 256 array 0 1 255 {1 index exch /.notdef put} for dup 28 /tau put readonly def /FontBBox{-32 -250 1048 750}readonly def currentdict end currentfile eexec D9D66F633B846A97B686A97E45A3D0AA0529731C99A784CCBE85B4993B2EEBDE 3B12D472B7CF54651EF21185116A69AB1096ED4BAD2F646635E019B6417CC77B 532F85D811C70D1429A19A5307EF63EB5C5E02C89FC6C20F6D9D89E7D91FE470 B72BEFDA23F5DF76BE05AF4CE93137A219ED8A04A9D7D6FDF37E6B7FCDE0D90B 986423E5960A5D9FBB4C956556E8DF90CBFAEC476FA36FD9A5C8175C9AF513FE D919C2DDD26BDC0D99398B9F4D03D5993DFC0930297866E1CD0A319B6B1FD958 9E394A533A081C36D456A09920001A3D2199583EB9B84B4DEE08E3D12939E321 990CD249827D9648574955F61BAAA11263A91B6C3D47A5190165B0C25ABF6D3E 6EC187E4B05182126BB0D0323D943170B795255260F9FD25F2248D04F45DFBFB DEF7FF8B19BFEF637B210018AE02572B389B3F76282BEB29CC301905D388C721 59616893E774413F48DE0B408BC66DCE3FE17CB9F84D205839D58014D6A88823 D9320AE93AF96D97A02C4D5A2BB2B8C7925C4578003959C46E3CE1A2F0EAC4BF 8B9B325E46435BDE60BC54D72BC8ACB5C0A34413AC87045DC7B84646A324B808 6FD8E34217213E131C3B1510415CE45420688ED9C1D27890EC68BD7C1235FAF9 1DAB3A369DD2FC3BE5CF9655C7B7EDA7361D7E05E5831B6B8E2EEC542A7B38EE 03BE4BAC6079D038ACB3C7C916279764547C2D51976BABA94BA9866D79F13909 95AA39B0F03103A07CBDF441B8C5669F729020AF284B7FF52A29C6255FCAACF1 74109050FBA2602E72593FBCBFC26E726EE4AEF97B7632BC4F5F353B5C67FED2 3EA752A4A57B8F7FEFF1D7341D895F0A3A0BE1D8E3391970457A967EFF84F6D8 47750B1145B8CC5BD96EE7AA99DDC9E06939E383BDA41175233D58AD263EBF19 AFC0E2F840512D321166547B306C592B8A01E1FA2564B9A26DAC14256414E4C8 42616728D918C74D13C349F4186EC7B9708B86467425A6FDB3A396562F7EE4D8 40B43621744CF8A23A6E532649B66C2A0002DD04F8F39618E4F572819DD34837 B5A08E643FDCA1505AF6A1FA3DDFD1FA758013CAED8ACDDBBB334D664DFF5B53 9560176676ABB71BBD0EE56B4CC492C0652750227CEC68C34E4BCB664B292C9F 52991DD9A0572E79596E6FC01CE1E505AD151CF3A414C712DA15497A5C6DC6F4 C6F874CE82C6E308E751FCA49705D9095CE2A88EFF7E6022D6800383853FC6FE 5CB2C2894B5D96CB2E6B5F237A9CED187945769ED216958C96D238ECC105F92C 2377C346C844E020CAEC0719D0AD785AFFF2D19C0A020E4A24EFCC030A0FAE54 D36720626FC9EE9D61129E0E1A1F757D9CC28609B8DB0DC89220501317F4EBBC 84C8A7910828F0F2255F139441F643C31003C12937882E758DBB42A87E31B53B 5649089671CF78B06E18D1766E8E7C4B2DF0548CC038D4D8B5C43726368205CD 47A6287CB24D490A64D8869E8628F30B6C 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 cleartomark %%EndFont %%BeginFont: CMR12 %!PS-AdobeFont-1.1: CMR12 1.0 %%CreationDate: 1991 Aug 20 16:38:05 % Copyright (C) 1997 American Mathematical Society. All Rights Reserved. 11 dict begin /FontInfo 7 dict dup begin /version (1.0) readonly def /Notice (Copyright (C) 1997 American Mathematical Society. All Rights Reserved) readonly def /FullName (CMR12) readonly def /FamilyName (Computer Modern) readonly def /Weight (Medium) readonly def /ItalicAngle 0 def /isFixedPitch false def end readonly def /FontName /CMR12 def /PaintType 0 def /FontType 1 def /FontMatrix [0.001 0 0 0.001 0 0] readonly def /Encoding 256 array 0 1 255 {1 index exch /.notdef put} for dup 22 /macron put readonly def /FontBBox{-34 -251 988 750}readonly def currentdict end currentfile eexec D9D66F633B846A97B686A97E45A3D0AA052A014267B7904EB3C0D3BD0B83D891 016CA6CA4B712ADEB258FAAB9A130EE605E61F77FC1B738ABC7C51CD46EF8171 9098D5FEE67660E69A7AB91B58F29A4D79E57022F783EB0FBBB6D4F4EC35014F D2DECBA99459A4C59DF0C6EBA150284454E707DC2100C15B76B4C19B84363758 469A6C558785B226332152109871A9883487DD7710949204DDCF837E6A8708B8 2BDBF16FBC7512FAA308A093FE5CF4E9D2405B169CD5365D6ECED5D768D66D6C 68618B8C482B341F8CA38E9BB9BAFCFAAD9C2F3FD033B62690986ED43D9C9361 3645B82392D5CAE11A7CB49D7E2E82DCD485CBA04C77322EB2E6A79D73DC194E 59C120A2DABB9BF72E2CF256DD6EB54EECBA588101ABD933B57CE8A3A0D16B28 51D7494F73096DF53BDC66BBF896B587DF9643317D5F610CD9088F9849126F23 DDE030F7B277DD99055C8B119CAE9C99158AC4E150CDFC2C66ED92EBB4CC092A AA078CE16247A1335AD332DAA950D20395A7384C33FF72EAA31A5B89766E635F 45C4C068AD7EE867398F0381B07CB94D29FF097D59FF9961D195A948E3D87C31 821E9295A56D21875B41988F7A16A1587050C3C71B4E4355BB37F255D6B237CE 96F25467F70FA19E0F85785FF49068949CCC79F2F8AE57D5F79BB9C5CF5EED5D 9857B9967D9B96CDCF73D5D65FF75AFABB66734018BAE264597220C89FD17379 26764A9302D078B4EB0E29178C878FD61007EEA2DDB119AE88C57ECFEF4B71E4 140A34951DDC3568A84CC92371A789021A103A1A347050FDA6ECF7903F67D213 1D0C7C474A9053866E9C88E65E6932BA87A73686EAB0019389F84D159809C498 1E7A30ED942EB211B00DBFF5BCC720F4E276C3339B31B6EABBB078430E6A09BB 377D3061A20B1EB98796B8607EECBC699445EAA866C38E02DF59F5EDD378303A 0733B90E7835C0AAF32BA04F1566D8161EA89CD4D14DDB953F8B910BFC8A7F03 5020F55EF8FC2640ADADA156F6CF8F2EB6610F7EE8874A26CBE7CD154469B9F4 ED76886B3FB679FFDEB59BB6C55AF7087BA48B75EE2FB374B19BCC421A963E15 FE05ECAAF9EECDF4B2715010A320102E6F8CCAA342FA11532671CD9B29E43E50 0DDD39AA60A89537A4286846D1231E731DE0F7BE080340A268DE289842867224 D5C6A2AE401593EAD23FC1BCEEC91186C588A362E565593ABD5835B13443CA5B E4CE1116AE41EE557D31E340C9426E909A4B54BA76208B9055E0B8C38458866A A9BDE2A7C62A5A4EF3185BD4E5ACAF094906C8E72344D343C7E306F8C5E5BE3D 75CFF7872B37B3D6B732FA583B9B68613BC013CA02A4E21C17A841B0DD5AD4F4 F3F791170464C7C0A06FA4AE181AD36C6F052B9CA7CD2222EB8D4EE4C616AF21 57F42BDEB6 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 cleartomark %%EndFont %%BeginFont: CMMI12 %!PS-AdobeFont-1.1: CMMI12 1.100 %%CreationDate: 1996 Jul 27 08:57:55 % Copyright (C) 1997 American Mathematical Society. All Rights Reserved. 11 dict begin /FontInfo 7 dict dup begin /version (1.100) readonly def /Notice (Copyright (C) 1997 American Mathematical Society. All Rights Reserved) readonly def /FullName (CMMI12) readonly def /FamilyName (Computer Modern) readonly def /Weight (Medium) readonly def /ItalicAngle -14.04 def /isFixedPitch false def end readonly def /FontName /CMMI12 def /PaintType 0 def /FontType 1 def /FontMatrix [0.001 0 0 0.001 0 0] readonly def /Encoding 256 array 0 1 255 {1 index exch /.notdef put} for dup 23 /nu put dup 28 /tau put dup 87 /W put dup 98 /b put dup 113 /q put dup 116 /t put readonly def /FontBBox{-30 -250 1026 750}readonly def currentdict end currentfile eexec D9D66F633B846A97B686A97E45A3D0AA0529731C99A784CCBE85B4993B2EEBDE 3B12D472B7CF54651EF21185116A69AB1096ED4BAD2F646635E019B6417CC77B 532F85D811C70D1429A19A5307EF63EB5C5E02C89FC6C20F6D9D89E7D91FE470 B72BEFDA23F5DF76BE05AF4CE93137A219ED8A04A9D7D6FDF37E6B7FCDE0D90B 986423E5960A5D9FBB4C956556E8DF90CBFAEC476FA36FD9A5C8175C9AF513FE D919C2DDD26BDC0D99398B9F4D03D6A8F05B47AF95EF28A9C561DBDC98C47CF5 5250011D19E9366EB6FD153D3A100CAA6212E3D5D93990737F8D326D347B7EDC 4391C9DF440285B8FC159D0E98D4258FC57892DCC57F7903449E07914FBE9E67 3C15C2153C061EB541F66C11E7EE77D5D77C0B11E1AC55101DA976CCACAB6993 EED1406FBB7FF30EAC9E90B90B2AF4EC7C273CA32F11A5C1426FF641B4A2FB2F 4E68635C93DB835737567FAF8471CBC05078DCD4E40E25A2F4E5AF46C234CF59 2A1CE8F39E1BA1B2A594355637E474167EAD4D97D51AF0A899B44387E1FD933A 323AFDA6BA740534A510B4705C0A15647AFBF3E53A82BF320DD96753639BE49C 2F79A1988863EF977B800C9DB5B42039C23EB86953713F730E03EA22FF7BB2C1 D97D33FD77B1BDCC2A60B12CF7805CFC90C5B914C0F30A673DF9587F93E47CEA 5932DD1930560C4F0D97547BCD805D6D854455B13A4D7382A22F562D7C55041F 0FD294BDAA1834820F894265A667E5C97D95FF152531EF97258F56374502865D A1E7C0C5FB7C6FB7D3C43FEB3431095A59FBF6F61CEC6D6DEE09F4EB0FD70D77 2A8B0A4984C6120293F6B947944BE23259F6EB64303D627353163B6505FC8A60 00681F7A3968B6CBB49E0420A691258F5E7B07B417157803FCBE9B9FB1F80FD8 CA0DA1186446DD565542BCCC7D339A1EB34C7F49246E8D72E987EB477C6DB757 99AF86CEBCD7605C487A00CD2CD093098182DC57B20D78ECE0BECF3A0BF88EBA C866DB19F34BBBED6634AFC0F08D2AFB2A92578A6F8B4ADCD6594737FF6EED7D 5B536DA9E3E2CADB40DB7C600EA4D100D33C3B92B1CF857E012C4EB370BA8295 55B50047C91E3A06EEA249C7ACC86AA6F3934F18B1AA7AC1B3F95E297FF9C638 7B54AB3B4CE4C7D11EF10F6BC2AFE3710FCDF0E4E39080B50E288E973A96E1E0 9AD9410963CE26E4456A62BA7F663260C6E72DBEBF83AF0B044B9F3C7AA52E45 E0DE20C37805BFC48BDFD18129CBBEE31103BB9D1172BE7738DD9A3DF72C96A6 77FD4A2745971D9F9BB61B6A08E54722E137BFA949096B24AB2FCC91F9194193 CE74F3D7C6094EA645BB86D33CBE867CD03C9452EB92DE3450460D8E040C0E1A 940D165391710F0BE18D39A6BA5DB114C41B1137808C7929EDEB143CBC4059AD 5F9F7B0A7650207FE74F18DACABED2923CB8FCBDBF4519DF4E2512CDCD3B810C 4B634EB95A5DECD790687CDF6DB9CFA5806D8DF2C90878F1CE129C2F5DFD9B76 6AF39282D002642C7489C6C7563F36C99547CEC87D37A15A63660BC45FEB6EEA C0FFCB4C4CC2D64B59F2C987596C8CF021DAA4D8FB98EAD6FE028B87C3F27321 F07C133E26E554CDE5AE06384119206F17CF32A56D91EDDDCABE004D4F0D2CEA 1AC9A4F358CEA9269D2128674516A99D81D4C1F3A0D02C4C97F2B582D99FB48B 6A2EBFA883B867286BAC873A35D48C2941E638FF068DFB4C3AE61F5281EC0B7E 307E063DAEAB0BBAFF8C14A6C739CE6BFFBA8682AD5A92D025078E000340676F F115A775DCE5B4C8DC3F9FE866B0B186CE3A44AC058140E2C4485C16991AC28E 8360D4988B4986890C01CE9D28E23F748F985E1E6BF6F7EB699A05B0F61CAFDC 02DFE7FA67F4835726399F847C7EF11CD447BD73308F645EBE30034EA2105AE6 B9AB57C2525F4014FD568087E25F54AB624D7298C480D7CE350747A38CCFE961 9F0996755C453CE1EE6982022972CFD93DC8AC1FE0BD7A19F0E73B2C8711DA7E 8D2C38A2B96EAC2E2055513ABB6A6B17BA8CDBF1F68ABB74633AEEFCE08DC73C 1A759A5E7DFB4DF2DBA43B1C52FA62640162CC1FCC844826F2FF233EF5FFD0D2 8B150F026847A135DC2ADAB0100CC86153F91802BE2629F63B31A93FCB41A28A 8FBAAC5735A5B5CE708C7B005D8F1E72138E3DF96DE844795D2DBFBFAC8B6675 5C8EFDEDCC4F98218595C44CBB9B0F1BAACE3E28CA9352BBA959C374D95748A6 5708515E0D5E05835B5D06B1216A3DB2DA629712A39D1733CFAC3CE40489579B 8CB5E2093262FF97590E27126E5129E8B0B954B3997306C1BE7DC8B4EED90584 A4152564D9E5A7F8244F3C6211ED5E98B9D715CEED10D770AEAB80187C36C249 287F3C7E8E87E433404A69EBA65B47ACAF668C0D8B374E5B0B2BDF61A01C0E8C 7DFB24D645FF7FDD77E121097BD74B25EC464A89729804AD8554AE21B6AD9E57 4CAAEDC58B6AAA59DAD680F638C2347E33BF830DFA497D54A191E40BD3A9BA02 7C72DED2AC95370905BB25E5AAFCA7472295E08DC8B19D1517E278B938A261E7 5AC95506BAEF195C7CAD8B9BC0D124D382FC6032D515BCDD24689982D9087110 E8CCA580C2C7344D5053A5C4231248B9D3272364DF015EADD163AC436926B6D3 1703FE8C5DFD48761668011FB0A610727DA9E71303D5D707BC45D7833E1BFDA0 9DCB01BC97A50D54A2D45BD2B9894036EB86B25B29D9B7C551A7984B3B579415 38366E8B3A49DFDE26507DD92D1748854FDDE94A558BC07D4F9820C2AA02D1E2 679F11185322B3ECAD731A1D6C1AA32164C73B311078983DE33867106574B7C4 47AA350DDD84B13D24A16B6033461256E3A7E0BBDEFD1B5ACA5CAD22E531C261 626CCA4CBC1F 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 cleartomark %%EndFont TeXDict begin 40258437 52099154 1000 600 600 (Jaxo_tmp.dvi) @start /Fa 212[65 43[{}1 83.022 /CMR10 rf /Fb 255[65{}1 83.022 /CMSY10 rf /Fc 227[36 28[{}1 83.022 /CMMI10 rf /Fd 233[59 22[{}1 119.552 /CMR12 rf /Fe 139[42 2[52 14[50 10[111 58[51 4[58 23[{}6 119.552 /CMMI12 rf end %%EndProlog %%BeginSetup %%Feature: *Resolution 600dpi TeXDict begin end %%EndSetup TeXDict begin 1 0 bop 0 TeXcolorgray Black Black 0 TeXcolorgray 1 TeXcolorgray 0 TeXcolorgray 1 TeXcolorgray 0 TeXcolorgray 0 TeXcolorgray 0 TeXcolorgray 1 TeXcolorgray 0 TeXcolorgray 0 TeXcolorgray 0 TeXcolorgray 0 TeXcolorgray 0 TeXcolorgray 0 TeXcolorgray 0 TeXcolorgray 0.25 TeXcolorgray 0 TeXcolorgray 0.5 TeXcolorgray 0 TeXcolorgray 0 TeXcolorgray 0 TeXcolorgray 1 TeXcolorgray 19 3 3724 4 v 19 2801 4 2798 v 1 TeXcolorgray 1 TeXcolorgray 23 2801 3717 2798 v 1 TeXcolorgray 0 TeXcolorgray -1171 917 a @beginspecial @setspecial Black 150 0 add -104 0 add 210 0 add -29 0 add 0.5 1.0 arrowline showpage @endspecial @beginspecial @setspecial Black 210 0 add -29 0 add 150 0 add 46 0 add 0.5 1.0 arrowline showpage @endspecial @beginspecial @setspecial Black 210 0 add -29 0 add 330 0 add -29 0 add 7.5 7.14 0.5 1.0 gluon showpage @endspecial @beginspecial @setspecial Black 330 0 add -29 0 add 390 0 add 46 0 add 0.5 1.0 arrowline showpage @endspecial @beginspecial @setspecial Black 390 0 add -104 0 add 330 0 add -29 0 add 0.5 1.0 arrowline showpage @endspecial Black 1569 784 a Fe(t)p 0 TeXcolorgray Black 448 760 a(q)p 0 TeXcolorgray Black 457 1632 a Fd(\026)-68 b Fe(q)p 0 TeXcolorgray Black 1571 1633 a Fd(\026)1569 1655 y Fe(t)p 0 TeXcolorgray -1171 917 a @beginspecial @setspecial Black 390 0 add 46 0 add 465 0 add 106 0 add 0.5 1.0 arrowline showpage @endspecial @beginspecial @setspecial Black 390 0 add 46 0 add 465 0 add -14 0 add 7.5 5 0.5 1.0 photon showpage @endspecial @beginspecial @setspecial Black 390 0 add -104 0 add 450 0 add -44 0 add 0.5 1.0 arrowline showpage @endspecial @beginspecial @setspecial Black 390 0 add -104 0 add 465 0 add -164 0 add 7.5 5 0.5 1.0 photon showpage @endspecial @beginspecial @setspecial Black 465 0 add -14 0 add 540 0 add 46 0 add 0.5 1.0 arrowline showpage @endspecial @beginspecial @setspecial Black 540 0 add -74 0 add 465 0 add -14 0 add 0.5 1.0 arrowline showpage @endspecial Black 2316 161 a(b)p 0 TeXcolorgray Black 2188 1375 a Fd(\026)2192 1406 y Fe(b)p 0 TeXcolorgray Black 3437 511 a(q)p 0 TeXcolorgray Black 3437 1905 a(\034)p 0 TeXcolorgray Black 3446 1383 a Fd(\026)g Fe(q)p 0 TeXcolorgray Black 3462 2758 a Fd(\026)-84 b Fe(\027)3495 2776 y Fc(\034)p 0 TeXcolorgray Black 2208 2270 a Fe(W)2335 2226 y Fb(\000)p 0 TeXcolorgray Black 2208 975 a Fe(W)2335 931 y Fa(+)p 0 TeXcolorgray -1171 917 a @beginspecial @setspecial Black 465 0 add -164 0 add 530 0 add -97 0 add 0.5 1.0 arrowline showpage @endspecial @beginspecial @setspecial Black 532 0 add -217 0 add 465 0 add -164 0 add 0.5 1.0 arrowline showpage @endspecial 1 TeXcolorgray 1 TeXcolorgray 3739 2801 4 2798 v 19 2804 3724 4 v 0 TeXcolorgray 0 TeXcolorgray 0 TeXcolorgray eop end %%Trailer userdict /end-hook known{end-hook}if %%EOF