1 %!PS-Adobe-2.0

     2 %%Creator: dvips(k) 5.95a Copyright 2005 Radical Eye Software

     3 %%Title: last.dvi

     4 %%Pages: 27

     5 %%PageOrder: Ascend

     6 %%BoundingBox: 0 0 595 842

     7 %%DocumentFonts: Times-Bold Times-Roman Times-Italic

     8 %%DocumentPaperSizes: a4

     9 %%EndComments

    10 %DVIPSWebPage: (www.radicaleye.com)

    11 %DVIPSCommandLine: dvips last.dvi -o last.ps

    12 %DVIPSParameters: dpi=600

    13 %DVIPSSource:  TeX output 2006.04.27:1426

    14 %%BeginProcSet: tex.pro 0 0

    15 %!

    16 /TeXDict 300 dict def TeXDict begin/N{def}def/B{bind def}N/S{exch}N/X{S

    17 N}B/A{dup}B/TR{translate}N/isls false N/vsize 11 72 mul N/hsize 8.5 72

    18 mul N/landplus90{false}def/@rigin{isls{[0 landplus90{1 -1}{-1 1}ifelse 0

    19 0 0]concat}if 72 Resolution div 72 VResolution div neg scale isls{

    20 landplus90{VResolution 72 div vsize mul 0 exch}{Resolution -72 div hsize

    21 mul 0}ifelse TR}if Resolution VResolution vsize -72 div 1 add mul TR[

    22 matrix currentmatrix{A A round sub abs 0.00001 lt{round}if}forall round

    23 exch round exch]setmatrix}N/@landscape{/isls true N}B/@manualfeed{

    24 statusdict/manualfeed true put}B/@copies{/#copies X}B/FMat[1 0 0 -1 0 0]

    25 N/FBB[0 0 0 0]N/nn 0 N/IEn 0 N/ctr 0 N/df-tail{/nn 8 dict N nn begin

    26 /FontType 3 N/FontMatrix fntrx N/FontBBox FBB N string/base X array

    27 /BitMaps X/BuildChar{CharBuilder}N/Encoding IEn N end A{/foo setfont}2

    28 array copy cvx N load 0 nn put/ctr 0 N[}B/sf 0 N/df{/sf 1 N/fntrx FMat N

    29 df-tail}B/dfs{div/sf X/fntrx[sf 0 0 sf neg 0 0]N df-tail}B/E{pop nn A

    30 definefont setfont}B/Cw{Cd A length 5 sub get}B/Ch{Cd A length 4 sub get

    31 }B/Cx{128 Cd A length 3 sub get sub}B/Cy{Cd A length 2 sub get 127 sub}

    32 B/Cdx{Cd A length 1 sub get}B/Ci{Cd A type/stringtype ne{ctr get/ctr ctr

    33 1 add N}if}B/CharBuilder{save 3 1 roll S A/base get 2 index get S

    34 /BitMaps get S get/Cd X pop/ctr 0 N Cdx 0 Cx Cy Ch sub Cx Cw add Cy

    35 setcachedevice Cw Ch true[1 0 0 -1 -.1 Cx sub Cy .1 sub]{Ci}imagemask

    36 restore}B/D{/cc X A type/stringtype ne{]}if nn/base get cc ctr put nn

    37 /BitMaps get S ctr S sf 1 ne{A A length 1 sub A 2 index S get sf div put

    38 }if put/ctr ctr 1 add N}B/I{cc 1 add D}B/bop{userdict/bop-hook known{

    39 bop-hook}if/SI save N @rigin 0 0 moveto/V matrix currentmatrix A 1 get A

    40 mul exch 0 get A mul add .99 lt{/QV}{/RV}ifelse load def pop pop}N/eop{

    41 SI restore userdict/eop-hook known{eop-hook}if showpage}N/@start{

    42 userdict/start-hook known{start-hook}if pop/VResolution X/Resolution X

    43 1000 div/DVImag X/IEn 256 array N 2 string 0 1 255{IEn S A 360 add 36 4

    44 index cvrs cvn put}for pop 65781.76 div/vsize X 65781.76 div/hsize X}N

    45 /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{

    46 /Ry X/Rx X V}B statusdict begin/product where{pop false[(Display)(NeXT)

    47 (LaserWriter 16/600)]{A length product length le{A length product exch 0

    48 exch getinterval eq{pop true exit}if}{pop}ifelse}forall}{false}ifelse

    49 end{{gsave TR -.1 .1 TR 1 1 scale Rx Ry false RMat{BDot}imagemask

    50 grestore}}{{gsave TR -.1 .1 TR Rx Ry scale 1 1 false RMat{BDot}

    51 imagemask grestore}}ifelse B/QV{gsave newpath transform round exch round

    52 exch itransform moveto Rx 0 rlineto 0 Ry neg rlineto Rx neg 0 rlineto

    53 fill grestore}B/a{moveto}B/delta 0 N/tail{A/delta X 0 rmoveto}B/M{S p

    54 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}

    55 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{

    56 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

    57 rmoveto}B/y{3 2 roll p a}B/bos{/SS save N}B/eos{SS restore}B end

    58 

    59 %%EndProcSet

    60 %%BeginProcSet: pstricks.pro 0 0

    61 %!

    62 % PostScript prologue for pstricks.tex.

    63 % Version 97 patch 4, 04/05/10

    64 % For distribution, see pstricks.tex.

    65 %

    66 /tx@Dict 200 dict def tx@Dict begin

    67 /ADict 25 dict def

    68 /CM { matrix currentmatrix } bind def

    69 /SLW /setlinewidth load def

    70 /CLW /currentlinewidth load def

    71 /CP /currentpoint load def

    72 /ED { exch def } bind def

    73 /L /lineto load def

    74 /T /translate load def

    75 /TMatrix { } def

    76 /RAngle { 0 } def

    77 /Atan { /atan load stopped { pop pop 0 } if } def

    78 /Div { dup 0 eq { pop } { div } ifelse } def

    79 /NET { neg exch neg exch T } def

    80 /Pyth { dup mul exch dup mul add sqrt } def

    81 /PtoC { 2 copy cos mul 3 1 roll sin mul } def

    82 /PathLength@ { /z z y y1 sub x x1 sub Pyth add def /y1 y def /x1 x def }

    83 def

    84 /PathLength { flattenpath /z 0 def { /y1 ED /x1 ED /y2 y1 def /x2 x1 def

    85 } { /y ED /x ED PathLength@ } {} { /y y2 def /x x2 def PathLength@ }

    86 /pathforall load stopped { pop pop pop pop } if z } def

    87 /STP { .996264 dup scale } def

    88 /STV { SDict begin normalscale end STP  } def

    89 %

    90 %%-------------- DG begin patch 15 ---------------%%

    91 %/DashLine { dup 0 gt { /a .5 def PathLength exch div } { pop /a 1 def

    92 %PathLength } ifelse /b ED /x ED /y ED /z y x add def b a .5 sub 2 mul y

    93 %mul sub z Div round z mul a .5 sub 2 mul y mul add b exch Div dup y mul

    94 %/y ED x mul /x ED x 0 gt y 0 gt and { [ y x ] 1 a sub y mul } { [ 1 0 ]

    95 %0 } ifelse setdash stroke } def

    96 /DashLine {

    97   dup 0 gt { /a .5 def PathLength exch div } { pop /a 1 def PathLength } ifelse

    98   /b ED /x1 ED /y1 ED /x ED /y ED 

    99   /z y x add y1 add x1 add def

   100   /Coef b a .5 sub 2 mul y mul sub z Div round 

   101   z mul a .5 sub 2 mul y mul add b exch Div def 

   102   /y y Coef mul def /x x Coef mul def /y1 y1 Coef mul def /x1 x1 Coef mul def

   103   x1 0 gt y1 0 gt x 0 gt y 0 gt and { [ y x y1 x1 ] 1 a sub y mul}

   104   { [ 1 0] 0 } ifelse setdash stroke

   105 } def

   106 %%-------------- DG end patch 15 ---------------%%

   107 /DotLine { /b PathLength def /a ED /z ED /y CLW def /z y z add def a 0 gt

   108 { /b b a div def } { a 0 eq { /b b y sub def } { a -3 eq { /b b y add

   109 def } if } ifelse } ifelse [ 0 b b z Div round Div dup 0 le { pop 1 } if

   110 ] a 0 gt { 0 } { y 2 div a -2 gt { neg } if } ifelse setdash 1

   111 setlinecap stroke } def

   112 /LineFill { gsave abs CLW add /a ED a 0 dtransform round exch round exch

   113 2 copy idtransform exch Atan rotate idtransform pop /a ED .25 .25

   114 % DG/SR modification begin - Dec. 12, 1997 - Patch 2

   115 %itransform translate pathbbox /y2 ED a Div ceiling cvi /x2 ED /y1 ED a

   116 itransform pathbbox /y2 ED a Div ceiling cvi /x2 ED /y1 ED a

   117 % DG/SR modification end

   118 Div cvi /x1 ED /y2 y2 y1 sub def clip newpath 2 setlinecap systemdict

   119 /setstrokeadjust known { true setstrokeadjust } if x2 x1 sub 1 add { x1

   120 % DG/SR modification begin - Jun.  1, 1998 - Patch 3 (from Michael Vulis)

   121 % a mul y1 moveto 0 y2 rlineto stroke /x1 x1 1 add def } repeat grestore }

   122 % def

   123 a mul y1 moveto 0 y2 rlineto stroke /x1 x1 1 add def } repeat grestore

   124 pop pop } def

   125 % DG/SR modification end

   126 /BeginArrow { ADict begin /@mtrx CM def gsave 2 copy T 2 index sub neg

   127 exch 3 index sub exch Atan rotate newpath } def

   128 /EndArrow { @mtrx setmatrix CP grestore end } def

   129 /Arrow { CLW mul add dup 2 div /w ED mul dup /h ED mul /a ED { 0 h T 1 -1

   130 scale } if w neg h moveto 0 0 L w h L w neg a neg rlineto gsave fill

   131 grestore } def

   132 /Tbar { CLW mul add /z ED z -2 div CLW 2 div moveto z 0 rlineto stroke 0

   133 CLW moveto } def

   134 /Bracket { CLW mul add dup CLW sub 2 div /x ED mul CLW add /y ED /z CLW 2

   135 div def x neg y moveto x neg CLW 2 div L x CLW 2 div L x y L stroke 0

   136 CLW moveto } def

   137 /RoundBracket { CLW mul add dup 2 div /x ED mul /y ED /mtrx CM def 0 CLW

   138 2 div T x y mul 0 ne { x y scale } if 1 1 moveto .85 .5 .35 0 0 0

   139 curveto -.35 0 -.85 .5 -1 1 curveto mtrx setmatrix stroke 0 CLW moveto }

   140 def

   141 /SD { 0 360 arc fill } def

   142 /EndDot { { /z DS def } { /z 0 def } ifelse /b ED 0 z DS SD b { 0 z DS

   143 CLW sub SD } if 0 DS z add CLW 4 div sub moveto } def

   144 /Shadow { [ { /moveto load } { /lineto load } { /curveto load } {

   145 /closepath load } /pathforall load stopped { pop pop pop pop CP /moveto

   146 load } if ] cvx newpath 3 1 roll T exec } def

   147 /NArray { aload length 2 div dup dup cvi eq not { exch pop } if /n exch

   148 cvi def } def

   149 /NArray { /f ED counttomark 2 div dup cvi /n ED n eq not { exch pop } if

   150 f { ] aload /Points ED } { n 2 mul 1 add -1 roll pop } ifelse } def

   151 /Line { NArray n 0 eq not { n 1 eq { 0 0 /n 2 def } if ArrowA /n n 2 sub

   152 def n { Lineto } repeat CP 4 2 roll ArrowB L pop pop } if } def

   153 /Arcto { /a [ 6 -2 roll ] cvx def a r /arcto load stopped { 5 } { 4 }

   154 ifelse { pop } repeat a } def

   155 /CheckClosed { dup n 2 mul 1 sub index eq 2 index n 2 mul 1 add index eq

   156 and { pop pop /n n 1 sub def } if } def

   157 /Polygon { NArray n 2 eq { 0 0 /n 3 def } if n 3 lt { n { pop pop }

   158 repeat } { n 3 gt { CheckClosed } if n 2 mul -2 roll /y0 ED /x0 ED /y1

   159 ED /x1 ED x1 y1 /x1 x0 x1 add 2 div def /y1 y0 y1 add 2 div def x1 y1

   160 moveto /n n 2 sub def n { Lineto } repeat x1 y1 x0 y0 6 4 roll Lineto

   161 Lineto pop pop closepath } ifelse } def

   162 /Diamond { /mtrx CM def T rotate /h ED /w ED dup 0 eq { pop } { CLW mul

   163 neg /d ED /a w h Atan def /h d a sin Div h add def /w d a cos Div w add

   164 def } ifelse mark w 2 div h 2 div w 0 0 h neg w neg 0 0 h w 2 div h 2

   165 div /ArrowA { moveto } def /ArrowB { } def false Line closepath mtrx

   166 setmatrix } def

   167 % DG modification begin - Jan. 15, 1997

   168 %/Triangle { /mtrx CM def translate rotate /h ED 2 div /w ED dup 0 eq {

   169 %pop } { CLW mul /d ED /h h d w h Atan sin Div sub def /w w d h w Atan 2

   170 %div dup cos exch sin Div mul sub def } ifelse mark 0 d w neg d 0 h w d 0

   171 %d /ArrowA { moveto } def /ArrowB { } def false Line closepath mtrx

   172 %setmatrix } def

   173 /Triangle { /mtrx CM def translate rotate /h ED 2 div /w ED dup

   174 CLW mul /d ED /h h d w h Atan sin Div sub def /w w d h w Atan 2

   175 div dup cos exch sin Div mul sub def mark 0 d w neg d 0 h w d 0

   176 d /ArrowA { moveto } def /ArrowB { } def false Line closepath mtrx

   177 % DG/SR modification begin - Jun.  1, 1998 - Patch 3 (from Michael Vulis)

   178 % setmatrix } def

   179 setmatrix pop } def

   180 % DG/SR modification end

   181 /CCA { /y ED /x ED 2 copy y sub /dy1 ED x sub /dx1 ED /l1 dx1 dy1 Pyth

   182 def } def

   183 /CCA { /y ED /x ED 2 copy y sub /dy1 ED x sub /dx1 ED /l1 dx1 dy1 Pyth

   184 def } def

   185 /CC { /l0 l1 def /x1 x dx sub def /y1 y dy sub def /dx0 dx1 def /dy0 dy1

   186 def CCA /dx dx0 l1 c exp mul dx1 l0 c exp mul add def /dy dy0 l1 c exp

   187 mul dy1 l0 c exp mul add def /m dx0 dy0 Atan dx1 dy1 Atan sub 2 div cos

   188 abs b exp a mul dx dy Pyth Div 2 div def /x2 x l0 dx mul m mul sub def

   189 /y2 y l0 dy mul m mul sub def /dx l1 dx mul m mul neg def /dy l1 dy mul

   190 m mul neg def } def

   191 /IC { /c c 1 add def c 0 lt { /c 0 def } { c 3 gt { /c 3 def } if }

   192 ifelse /a a 2 mul 3 div 45 cos b exp div def CCA /dx 0 def /dy 0 def }

   193 def

   194 /BOC { IC CC x2 y2 x1 y1 ArrowA CP 4 2 roll x y curveto } def

   195 /NC { CC x1 y1 x2 y2 x y curveto } def

   196 /EOC { x dx sub y dy sub 4 2 roll ArrowB 2 copy curveto } def

   197 /BAC { IC CC x y moveto CC x1 y1 CP ArrowA } def

   198 /NAC { x2 y2 x y curveto CC x1 y1 } def

   199 /EAC { x2 y2 x y ArrowB curveto pop pop } def

   200 /OpenCurve { NArray n 3 lt { n { pop pop } repeat } { BOC /n n 3 sub def

   201     n { NC } repeat EOC } ifelse } def

   202 /AltCurve { { false NArray n 2 mul 2 roll [ n 2 mul 3 sub 1 roll ] aload

   203 /Points ED n 2 mul -2 roll } { false NArray } ifelse n 4 lt { n { pop

   204 pop } repeat } { BAC /n n 4 sub def n { NAC } repeat EAC } ifelse } def

   205 /ClosedCurve { NArray n 3 lt { n { pop pop } repeat } { n 3 gt {

   206 CheckClosed } if 6 copy n 2 mul 6 add 6 roll IC CC x y moveto n { NC }

   207 repeat closepath pop pop } ifelse } def

   208 /SQ { /r ED r r moveto r r neg L r neg r neg L r neg r L fill } def

   209 /ST { /y ED /x ED x y moveto x neg y L 0 x L fill } def

   210 /SP { /r ED gsave 0 r moveto 4 { 72 rotate 0 r L } repeat fill grestore }

   211 def

   212 /FontDot { DS 2 mul dup matrix scale matrix concatmatrix exch matrix

   213 rotate matrix concatmatrix exch findfont exch makefont setfont } def

   214 /Rect { x1 y1 y2 add 2 div moveto x1 y2 lineto x2 y2 lineto x2 y1 lineto

   215 x1 y1 lineto closepath } def

   216 /OvalFrame { x1 x2 eq y1 y2 eq or { pop pop x1 y1 moveto x2 y2 L } { y1

   217 y2 sub abs x1 x2 sub abs 2 copy gt { exch pop } { pop } ifelse 2 div

   218 exch { dup 3 1 roll mul exch } if 2 copy lt { pop } { exch pop } ifelse

   219 /b ED x1 y1 y2 add 2 div moveto x1 y2 x2 y2 b arcto x2 y2 x2 y1 b arcto

   220 x2 y1 x1 y1 b arcto x1 y1 x1 y2 b arcto 16 { pop } repeat closepath }

   221 ifelse } def

   222 /Frame { CLW mul /a ED 3 -1 roll 2 copy gt { exch } if a sub /y2 ED a add

   223 /y1 ED 2 copy gt { exch } if a sub /x2 ED a add /x1 ED 1 index 0 eq {

   224 pop pop Rect } { OvalFrame } ifelse } def

   225 /BezierNArray { /f ED counttomark 2 div dup cvi /n ED n eq not { exch pop

   226 } if n 1 sub neg 3 mod 3 add 3 mod { 0 0 /n n 1 add def } repeat f { ]

   227 aload /Points ED } { n 2 mul 1 add -1 roll pop } ifelse } def

   228 /OpenBezier { BezierNArray n 1 eq { pop pop } { ArrowA n 4 sub 3 idiv { 6

   229 2 roll 4 2 roll curveto } repeat 6 2 roll 4 2 roll ArrowB curveto }

   230 ifelse } def

   231 /ClosedBezier { BezierNArray n 1 eq { pop pop } { moveto n 1 sub 3 idiv {

   232 6 2 roll 4 2 roll curveto } repeat closepath } ifelse } def

   233 /BezierShowPoints { gsave Points aload length 2 div cvi /n ED moveto n 1

   234 sub { lineto } repeat CLW 2 div SLW [ 4 4 ] 0 setdash stroke grestore }

   235 def

   236 /Parab { /y0 exch def /x0 exch def /y1 exch def /x1 exch def /dx x0 x1

   237 sub 3 div def /dy y0 y1 sub 3 div def x0 dx sub y0 dy add x1 y1 ArrowA

   238 x0 dx add y0 dy add x0 2 mul x1 sub y1 ArrowB curveto /Points [ x1 y1 x0

   239 y0 x0 2 mul x1 sub y1 ] def } def

   240 /Grid { newpath /a 4 string def /b ED /c ED /n ED cvi dup 1 lt { pop 1 }

   241 if /s ED s div dup 0 eq { pop 1 } if /dy ED s div dup 0 eq { pop 1 } if

   242 /dx ED dy div round dy mul /y0 ED dx div round dx mul /x0 ED dy div

   243 round cvi /y2 ED dx div round cvi /x2 ED dy div round cvi /y1 ED dx div

   244 round cvi /x1 ED /h y2 y1 sub 0 gt { 1 } { -1 } ifelse def /w x2 x1 sub

   245 0 gt { 1 } { -1 } ifelse def b 0 gt { /z1 b 4 div CLW 2 div add def

   246 /Helvetica findfont b scalefont setfont /b b .95 mul CLW 2 div add def }

   247 if systemdict /setstrokeadjust known { true setstrokeadjust /t { } def }

   248 { /t { transform 0.25 sub round 0.25 add exch 0.25 sub round 0.25 add

   249 exch itransform } bind def } ifelse gsave n 0 gt { 1 setlinecap [ 0 dy n

   250 div ] dy n div 2 div setdash } { 2 setlinecap } ifelse /i x1 def /f y1

   251 dy mul n 0 gt { dy n div 2 div h mul sub } if def /g y2 dy mul n 0 gt {

   252 dy n div 2 div h mul add } if def x2 x1 sub w mul 1 add dup 1000 gt {

   253 pop 1000 } if { i dx mul dup y0 moveto b 0 gt { gsave c i a cvs dup

   254 stringwidth pop /z2 ED w 0 gt {z1} {z1 z2 add neg} ifelse h 0 gt {b neg}

   255 {z1} ifelse rmoveto show grestore } if dup t f moveto g t L stroke /i i

   256 w add def } repeat grestore gsave n 0 gt

   257 % DG/SR modification begin - Nov. 7, 1997 - Patch 1

   258 %{ 1 setlinecap [ 0 dx n div ] dy n div 2 div setdash }

   259 { 1 setlinecap [ 0 dx n div ] dx n div 2 div setdash }

   260 % DG/SR modification end

   261 { 2 setlinecap } ifelse /i y1 def /f x1 dx mul

   262 n 0 gt { dx n div 2 div w mul sub } if def /g x2 dx mul n 0 gt { dx n

   263 div 2 div w mul add } if def y2 y1 sub h mul 1 add dup 1000 gt { pop

   264 1000 } if { newpath i dy mul dup x0 exch moveto b 0 gt { gsave c i a cvs

   265 dup stringwidth pop /z2 ED w 0 gt {z1 z2 add neg} {z1} ifelse h 0 gt

   266 {z1} {b neg} ifelse rmoveto show grestore } if dup f exch t moveto g

   267 exch t L stroke /i i h add def } repeat grestore } def

   268 /ArcArrow { /d ED /b ED /a ED gsave newpath 0 -1000 moveto clip newpath 0

   269 1 0 0 b grestore c mul /e ED pop pop pop r a e d PtoC y add exch x add

   270 exch r a PtoC y add exch x add exch b pop pop pop pop a e d CLW 8 div c

   271 mul neg d } def

   272 /Ellipse { /mtrx CM def T scale 0 0 1 5 3 roll arc mtrx setmatrix } def

   273 /Rot { CP CP translate 3 -1 roll neg rotate NET  } def

   274 /RotBegin { tx@Dict /TMatrix known not { /TMatrix { } def /RAngle { 0 }

   275 def } if /TMatrix [ TMatrix CM ] cvx def /a ED a Rot /RAngle [ RAngle

   276 dup a add ] cvx def } def

   277 /RotEnd { /TMatrix [ TMatrix setmatrix ] cvx def /RAngle [ RAngle pop ]

   278 cvx def } def

   279 /PutCoor { gsave CP T CM STV exch exec moveto setmatrix CP grestore } def

   280 /PutBegin { /TMatrix [ TMatrix CM ] cvx def CP 4 2 roll T moveto } def

   281 /PutEnd { CP /TMatrix [ TMatrix setmatrix ] cvx def moveto } def

   282 /Uput { /a ED add 2 div /h ED 2 div /w ED /s a sin def /c a cos def /b s

   283 abs c abs 2 copy gt dup /q ED { pop } { exch pop } ifelse def /w1 c b

   284 div w mul def /h1 s b div h mul def q { w1 abs w sub dup c mul abs } {

   285 h1 abs h sub dup s mul abs } ifelse } def

   286 /UUput { /z ED abs /y ED /x ED q { x s div c mul abs y gt } { x c div s

   287 mul abs y gt } ifelse { x x mul y y mul sub z z mul add sqrt z add } { q

   288 { x s div } { x c div } ifelse abs } ifelse a PtoC h1 add exch w1 add

   289 exch } def

   290 /BeginOL { dup (all) eq exch TheOL eq or { IfVisible not { Visible

   291 /IfVisible true def } if } { IfVisible { Invisible /IfVisible false def

   292 } if } ifelse } def

   293 /InitOL { /OLUnit [ 3000 3000 matrix defaultmatrix dtransform ] cvx def

   294 /Visible { CP OLUnit idtransform T moveto } def /Invisible { CP OLUnit

   295 neg exch neg exch idtransform T moveto } def /BOL { BeginOL } def

   296 /IfVisible true def } def

   297 end

   298 % END pstricks.pro

   299 

   300 %%EndProcSet

   301 %%BeginProcSet: pst-dots.pro 0 0

   302 %!PS-Adobe-2.0

   303 %%Title: Dot Font for PSTricks

   304 %%Creator: Timothy Van Zandt <tvz@Princeton.EDU>

   305 %%Creation Date: May 7, 1993

   306 %% Version 97 patch 1, 99/12/16

   307 %% Modified by Etienne Riga <etienne.riga@skynet.be> - Dec. 16, 1999

   308 %% to add /Diamond, /SolidDiamond and /BoldDiamond

   309 10 dict dup begin

   310   /FontType 3 def

   311   /FontMatrix [ .001 0 0 .001 0 0 ] def

   312   /FontBBox [ 0 0 0 0 ] def

   313   /Encoding 256 array def

   314   0 1 255 { Encoding exch /.notdef put } for

   315   Encoding

   316     dup (b) 0 get /Bullet put

   317     dup (c) 0 get /Circle put

   318     dup (C) 0 get /BoldCircle put

   319     dup (u) 0 get /SolidTriangle put

   320     dup (t) 0 get /Triangle put

   321     dup (T) 0 get /BoldTriangle put

   322     dup (r) 0 get /SolidSquare put

   323     dup (s) 0 get /Square put

   324     dup (S) 0 get /BoldSquare put

   325     dup (q) 0 get /SolidPentagon put

   326     dup (p) 0 get /Pentagon put

   327     dup (P) 0 get /BoldPentagon put

   328 % DG/SR modification begin - Dec. 16, 1999 - From Etienne Riga

   329     dup (l) 0 get /SolidDiamond put

   330     dup (d) 0 get /Diamond put

   331         (D) 0 get /BoldDiamond put

   332 % DG/SR modification end

   333   /Metrics 13 dict def

   334   Metrics begin

   335     /Bullet        1000   def

   336     /Circle        1000   def

   337     /BoldCircle    1000   def

   338     /SolidTriangle 1344   def

   339     /Triangle      1344   def

   340     /BoldTriangle  1344   def

   341     /SolidSquare    886   def

   342     /Square         886   def

   343     /BoldSquare     886   def

   344     /SolidPentagon 1093.2 def

   345     /Pentagon      1093.2 def

   346     /BoldPentagon  1093.2 def

   347 % DG/SR modification begin - Dec. 16, 1999 - From Etienne Riga

   348     /SolidDiamond  1008   def

   349     /Diamond       1008   def

   350     /BoldDiamond   1008   def

   351 % DG/SR modification end

   352     /.notdef 0 def

   353   end

   354   /BBoxes 13 dict def

   355   BBoxes begin

   356     /Circle        { -550 -550 550 550 } def

   357     /BoldCircle    /Circle load def

   358     /Bullet        /Circle load def

   359     /Triangle      { -571.5 -330 571.5 660 } def

   360     /BoldTriangle  /Triangle load def

   361     /SolidTriangle /Triangle load def

   362     /Square        { -450 -450 450 450 } def

   363     /BoldSquare    /Square load def

   364     /SolidSquare   /Square load def

   365     /Pentagon      { -546.6 -465 546.6 574.7 } def

   366     /BoldPentagon  /Pentagon load def

   367     /SolidPentagon /Pentagon load def

   368 % DG/SR modification begin - Dec. 16, 1999 - From Etienne Riga

   369     /Diamond       { -428.5 -742.5 428.5 742.5 } def

   370     /BoldDiamond   /Diamond load def

   371     /SolidDiamond  /Diamond load def

   372 % DG/SR modification end

   373     /.notdef { 0 0 0 0 } def

   374   end

   375   /CharProcs 20 dict def

   376   CharProcs begin

   377     /Adjust {

   378       2 copy dtransform floor .5 add exch floor .5 add exch idtransform

   379       3 -1 roll div 3 1 roll exch div exch scale

   380     } def

   381     /CirclePath    { 0 0 500 0 360 arc closepath } def

   382     /Bullet        { 500 500 Adjust CirclePath fill } def

   383     /Circle        { 500 500 Adjust CirclePath .9 .9 scale CirclePath

   384                      eofill } def

   385     /BoldCircle    { 500 500 Adjust CirclePath .8 .8 scale CirclePath

   386                      eofill } def

   387     /BoldCircle    { CirclePath .8 .8 scale CirclePath eofill } def

   388     /TrianglePath  { 0  660 moveto -571.5 -330 lineto 571.5 -330 lineto

   389                      closepath } def

   390     /SolidTriangle { TrianglePath fill } def

   391     /Triangle      { TrianglePath .85 .85 scale TrianglePath eofill } def

   392     /BoldTriangle  { TrianglePath .7 .7 scale TrianglePath eofill } def

   393     /SquarePath    { -450 450 moveto 450 450 lineto 450 -450 lineto

   394                      -450 -450 lineto closepath } def

   395     /SolidSquare   { SquarePath fill } def

   396     /Square        { SquarePath .89 .89 scale SquarePath eofill } def

   397     /BoldSquare    { SquarePath .78 .78 scale SquarePath eofill } def

   398     /PentagonPath  {

   399       -337.8 -465   moveto

   400        337.8 -465   lineto

   401        546.6  177.6 lineto

   402          0    574.7 lineto

   403       -546.6  177.6 lineto

   404       closepath

   405     } def

   406     /SolidPentagon { PentagonPath fill } def

   407     /Pentagon      { PentagonPath .89 .89 scale PentagonPath eofill } def

   408     /BoldPentagon  { PentagonPath .78 .78 scale PentagonPath eofill } def

   409 % DG/SR modification begin - Dec. 16, 1999 - From Etienne Riga

   410     /DiamondPath   { 0 742.5 moveto -428.5 0 lineto 0 -742.5 lineto

   411                      428.5 0 lineto closepath } def

   412     /SolidDiamond  { DiamondPath fill } def

   413     /Diamond       { DiamondPath .85 .85 scale DiamondPath eofill } def

   414     /BoldDiamond   { DiamondPath .7 .7 scale DiamondPath eofill } def

   415 % DG/SR modification end

   416     /.notdef { } def

   417   end

   418   /BuildGlyph {

   419     exch

   420     begin

   421       Metrics 1 index get exec 0

   422       BBoxes 3 index get exec

   423       setcachedevice

   424       CharProcs begin load exec end

   425     end

   426   } def

   427   /BuildChar {

   428     1 index /Encoding get exch get

   429     1 index /BuildGlyph get exec

   430   } bind def

   431 end

   432 /PSTricksDotFont exch definefont pop

   433 %END pst-dots.pro

   434 

   435 %%EndProcSet

   436 %%BeginProcSet: pst-node.pro 0 0

   437 %!

   438 % PostScript prologue for pst-node.tex.

   439 % Version 97 patch 1, 97/05/09.

   440 % For distribution, see pstricks.tex.

   441 %

   442 /tx@NodeDict 400 dict def tx@NodeDict begin

   443 tx@Dict begin /T /translate load def end

   444 /NewNode { gsave /next ED dict dup 3 1 roll def exch { dup 3 1 roll def }

   445 if begin tx@Dict begin STV CP T exec end /NodeMtrx CM def next end

   446 grestore } def

   447 /InitPnode { /Y ED /X ED /NodePos { NodeSep Cos mul NodeSep Sin mul } def

   448 } def

   449 /InitCnode { /r ED /Y ED /X ED /NodePos { NodeSep r add dup Cos mul exch

   450 Sin mul } def } def

   451 /GetRnodePos { Cos 0 gt { /dx r NodeSep add def } { /dx l NodeSep sub def

   452 } ifelse Sin 0 gt { /dy u NodeSep add def } { /dy d NodeSep sub def }

   453 ifelse dx Sin mul abs dy Cos mul abs gt { dy Cos mul Sin div dy } { dx

   454 dup Sin mul Cos Div } ifelse } def

   455 /InitRnode { /Y ED /X ED X sub /r ED /l X neg def Y add neg /d ED Y sub

   456 /u ED /NodePos { GetRnodePos } def } def

   457 /DiaNodePos { w h mul w Sin mul abs h Cos mul abs add Div NodeSep add dup

   458 Cos mul exch Sin mul } def

   459 /TriNodePos { Sin s lt { d NodeSep sub dup Cos mul Sin Div exch } { w h

   460 mul w Sin mul h Cos abs mul add Div NodeSep add dup Cos mul exch Sin mul

   461 } ifelse } def

   462 /InitTriNode { sub 2 div exch 2 div exch 2 copy T 2 copy 4 index index /d

   463 ED pop pop pop pop -90 mul rotate /NodeMtrx CM def /X 0 def /Y 0 def d

   464 sub abs neg /d ED d add /h ED 2 div h mul h d sub Div /w ED /s d w Atan

   465 sin def /NodePos { TriNodePos } def } def

   466 /OvalNodePos { /ww w NodeSep add def /hh h NodeSep add def Sin ww mul Cos

   467 hh mul Atan dup cos ww mul exch sin hh mul } def

   468 /GetCenter { begin X Y NodeMtrx transform CM itransform end } def

   469 /XYPos { dup sin exch cos Do /Cos ED /Sin ED /Dist ED Cos 0 gt { Dist

   470 Dist Sin mul Cos div } { Cos 0 lt { Dist neg Dist Sin mul Cos div neg }

   471 { 0 Dist Sin mul } ifelse } ifelse Do } def

   472 /GetEdge { dup 0 eq { pop begin 1 0 NodeMtrx dtransform CM idtransform

   473 exch atan sub dup sin /Sin ED cos /Cos ED /NodeSep ED NodePos NodeMtrx

   474 dtransform CM idtransform end } { 1 eq {{exch}} {{}} ifelse /Do ED pop

   475 XYPos } ifelse } def

   476 /AddOffset { 1 index 0 eq { pop pop } { 2 copy 5 2 roll cos mul add 4 1

   477 roll sin mul sub exch } ifelse } def

   478 /GetEdgeA { NodeSepA AngleA NodeA NodeSepTypeA GetEdge OffsetA AngleA

   479 AddOffset yA add /yA1 ED xA add /xA1 ED } def

   480 /GetEdgeB { NodeSepB AngleB NodeB NodeSepTypeB GetEdge OffsetB AngleB

   481 AddOffset yB add /yB1 ED xB add /xB1 ED } def

   482 /GetArmA { ArmTypeA 0 eq { /xA2 ArmA AngleA cos mul xA1 add def /yA2 ArmA

   483 AngleA sin mul yA1 add def } { ArmTypeA 1 eq {{exch}} {{}} ifelse /Do ED

   484 ArmA AngleA XYPos OffsetA AngleA AddOffset yA add /yA2 ED xA add /xA2 ED

   485 } ifelse } def

   486 /GetArmB { ArmTypeB 0 eq { /xB2 ArmB AngleB cos mul xB1 add def /yB2 ArmB

   487 AngleB sin mul yB1 add def } { ArmTypeB 1 eq {{exch}} {{}} ifelse /Do ED

   488 ArmB AngleB XYPos OffsetB AngleB AddOffset yB add /yB2 ED xB add /xB2 ED

   489 } ifelse } def

   490 /InitNC { /b ED /a ED /NodeSepTypeB ED /NodeSepTypeA ED /NodeSepB ED

   491 /NodeSepA ED /OffsetB ED /OffsetA ED tx@NodeDict a known tx@NodeDict b

   492 known and dup { /NodeA a load def /NodeB b load def NodeA GetCenter /yA

   493 ED /xA ED NodeB GetCenter /yB ED /xB ED } if } def

   494 /LPutLine { 4 copy 3 -1 roll sub neg 3 1 roll sub Atan /NAngle ED 1 t sub

   495 mul 3 1 roll 1 t sub mul 4 1 roll t mul add /Y ED t mul add /X ED } def

   496 /LPutLines { mark LPutVar counttomark 2 div 1 sub /n ED t floor dup n gt

   497 { pop n 1 sub /t 1 def } { dup t sub neg /t ED } ifelse cvi 2 mul { pop

   498 } repeat LPutLine cleartomark } def

   499 /BezierMidpoint { /y3 ED /x3 ED /y2 ED /x2 ED /y1 ED /x1 ED /y0 ED /x0 ED

   500 /t ED /cx x1 x0 sub 3 mul def /cy y1 y0 sub 3 mul def /bx x2 x1 sub 3

   501 mul cx sub def /by y2 y1 sub 3 mul cy sub def /ax x3 x0 sub cx sub bx

   502 sub def /ay y3 y0 sub cy sub by sub def ax t 3 exp mul bx t t mul mul

   503 add cx t mul add x0 add ay t 3 exp mul by t t mul mul add cy t mul add

   504 y0 add 3 ay t t mul mul mul 2 by t mul mul add cy add 3 ax t t mul mul

   505 mul 2 bx t mul mul add cx add atan /NAngle ED /Y ED /X ED } def

   506 /HPosBegin { yB yA ge { /t 1 t sub def } if /Y yB yA sub t mul yA add def

   507 } def

   508 /HPosEnd { /X Y yyA sub yyB yyA sub Div xxB xxA sub mul xxA add def

   509 /NAngle yyB yyA sub xxB xxA sub Atan def } def

   510 /HPutLine { HPosBegin /yyA ED /xxA ED /yyB ED /xxB ED HPosEnd  } def

   511 /HPutLines { HPosBegin yB yA ge { /check { le } def } { /check { ge } def

   512 } ifelse /xxA xA def /yyA yA def mark xB yB LPutVar { dup Y check { exit

   513 } { /yyA ED /xxA ED } ifelse } loop /yyB ED /xxB ED cleartomark HPosEnd 

   514 } def

   515 /VPosBegin { xB xA lt { /t 1 t sub def } if /X xB xA sub t mul xA add def

   516 } def

   517 /VPosEnd { /Y X xxA sub xxB xxA sub Div yyB yyA sub mul yyA add def

   518 /NAngle yyB yyA sub xxB xxA sub Atan def } def

   519 /VPutLine { VPosBegin /yyA ED /xxA ED /yyB ED /xxB ED VPosEnd  } def

   520 /VPutLines { VPosBegin xB xA ge { /check { le } def } { /check { ge } def

   521 } ifelse /xxA xA def /yyA yA def mark xB yB LPutVar { 1 index X check {

   522 exit } { /yyA ED /xxA ED } ifelse } loop /yyB ED /xxB ED cleartomark

   523 VPosEnd  } def

   524 /HPutCurve { gsave newpath /SaveLPutVar /LPutVar load def LPutVar 8 -2

   525 roll moveto curveto flattenpath /LPutVar [ {} {} {} {} pathforall ] cvx

   526 def grestore exec /LPutVar /SaveLPutVar load def } def

   527 /NCCoor { /AngleA yB yA sub xB xA sub Atan def /AngleB AngleA 180 add def

   528 GetEdgeA GetEdgeB /LPutVar [ xB1 yB1 xA1 yA1 ] cvx def /LPutPos {

   529 LPutVar LPutLine } def /HPutPos { LPutVar HPutLine } def /VPutPos {

   530 LPutVar VPutLine } def LPutVar } def

   531 /NCLine { NCCoor tx@Dict begin ArrowA CP 4 2 roll ArrowB lineto pop pop

   532 end } def

   533 /NCLines { false NArray n 0 eq { NCLine } { 2 copy yA sub exch xA sub

   534 Atan /AngleA ED n 2 mul dup index exch index yB sub exch xB sub Atan

   535 /AngleB ED GetEdgeA GetEdgeB /LPutVar [ xB1 yB1 n 2 mul 4 add 4 roll xA1

   536 yA1 ] cvx def mark LPutVar tx@Dict begin false Line end /LPutPos {

   537 LPutLines } def /HPutPos { HPutLines } def /VPutPos { VPutLines } def }

   538 ifelse } def

   539 /NCCurve { GetEdgeA GetEdgeB xA1 xB1 sub yA1 yB1 sub Pyth 2 div dup 3 -1

   540 roll mul /ArmA ED mul /ArmB ED /ArmTypeA 0 def /ArmTypeB 0 def GetArmA

   541 GetArmB xA2 yA2 xA1 yA1 tx@Dict begin ArrowA end xB2 yB2 xB1 yB1 tx@Dict

   542 begin ArrowB end curveto /LPutVar [ xA1 yA1 xA2 yA2 xB2 yB2 xB1 yB1 ]

   543 cvx def /LPutPos { t LPutVar BezierMidpoint } def /HPutPos { { HPutLines

   544 } HPutCurve } def /VPutPos { { VPutLines } HPutCurve } def } def

   545 /NCAngles { GetEdgeA GetEdgeB GetArmA GetArmB /mtrx AngleA matrix rotate

   546 def xA2 yA2 mtrx transform pop xB2 yB2 mtrx transform exch pop mtrx

   547 itransform /y0 ED /x0 ED mark ArmB 0 ne { xB1 yB1 } if xB2 yB2 x0 y0 xA2

   548 yA2 ArmA 0 ne { xA1 yA1 } if tx@Dict begin false Line end /LPutVar [ xB1

   549 yB1 xB2 yB2 x0 y0 xA2 yA2 xA1 yA1 ] cvx def /LPutPos { LPutLines } def

   550 /HPutPos { HPutLines } def /VPutPos { VPutLines } def } def

   551 /NCAngle { GetEdgeA GetEdgeB GetArmB /mtrx AngleA matrix rotate def xB2

   552 yB2 mtrx itransform pop xA1 yA1 mtrx itransform exch pop mtrx transform

   553 /y0 ED /x0 ED mark ArmB 0 ne { xB1 yB1 } if xB2 yB2 x0 y0 xA1 yA1

   554 tx@Dict begin false Line end /LPutVar [ xB1 yB1 xB2 yB2 x0 y0 xA1 yA1 ]

   555 cvx def /LPutPos { LPutLines } def /HPutPos { HPutLines } def /VPutPos {

   556 VPutLines } def } def

   557 /NCBar { GetEdgeA GetEdgeB GetArmA GetArmB /mtrx AngleA matrix rotate def

   558 xA2 yA2 mtrx itransform pop xB2 yB2 mtrx itransform pop sub dup 0 mtrx

   559 transform 3 -1 roll 0 gt { /yB2 exch yB2 add def /xB2 exch xB2 add def }

   560 { /yA2 exch neg yA2 add def /xA2 exch neg xA2 add def } ifelse mark ArmB

   561 0 ne { xB1 yB1 } if xB2 yB2 xA2 yA2 ArmA 0 ne { xA1 yA1 } if tx@Dict

   562 begin false Line end /LPutVar [ xB1 yB1 xB2 yB2 xA2 yA2 xA1 yA1 ] cvx

   563 def /LPutPos { LPutLines } def /HPutPos { HPutLines } def /VPutPos {

   564 VPutLines } def } def

   565 /NCDiag { GetEdgeA GetEdgeB GetArmA GetArmB mark ArmB 0 ne { xB1 yB1 } if

   566 xB2 yB2 xA2 yA2 ArmA 0 ne { xA1 yA1 } if tx@Dict begin false Line end

   567 /LPutVar [ xB1 yB1 xB2 yB2 xA2 yA2 xA1 yA1 ] cvx def /LPutPos {

   568 LPutLines } def /HPutPos { HPutLines } def /VPutPos { VPutLines } def }

   569 def

   570 /NCDiagg { GetEdgeA GetArmA yB yA2 sub xB xA2 sub Atan 180 add /AngleB ED

   571 GetEdgeB mark xB1 yB1 xA2 yA2 ArmA 0 ne { xA1 yA1 } if tx@Dict begin

   572 false Line end /LPutVar [ xB1 yB1 xA2 yA2 xA1 yA1 ] cvx def /LPutPos {

   573 LPutLines } def /HPutPos { HPutLines } def /VPutPos { VPutLines } def }

   574 def

   575 /NCLoop { GetEdgeA GetEdgeB GetArmA GetArmB /mtrx AngleA matrix rotate

   576 def xA2 yA2 mtrx transform loopsize add /yA3 ED /xA3 ED /xB3 xB2 yB2

   577 mtrx transform pop def xB3 yA3 mtrx itransform /yB3 ED /xB3 ED xA3 yA3

   578 mtrx itransform /yA3 ED /xA3 ED mark ArmB 0 ne { xB1 yB1 } if xB2 yB2

   579 xB3 yB3 xA3 yA3 xA2 yA2 ArmA 0 ne { xA1 yA1 } if tx@Dict begin false

   580 Line end /LPutVar [ xB1 yB1 xB2 yB2 xB3 yB3 xA3 yA3 xA2 yA2 xA1 yA1 ]

   581 cvx def /LPutPos { LPutLines } def /HPutPos { HPutLines } def /VPutPos {

   582 VPutLines } def } def

   583 % DG/SR modification begin - May 9, 1997 - Patch 1

   584 %/NCCircle { 0 0 NodesepA nodeA \tx@GetEdge pop xA sub 2 div dup 2 exp r

   585 %r mul sub abs sqrt atan 2 mul /a ED r AngleA 90 add PtoC yA add exch xA add

   586 %exch 2 copy /LPutVar [ 4 2 roll r AngleA ] cvx def /LPutPos { LPutVar t 360

   587 %mul add dup 5 1 roll 90 sub \tx@PtoC 3 -1 roll add /Y ED add /X ED /NAngle ED

   588 /NCCircle { NodeSepA 0 NodeA 0 GetEdge pop 2 div dup 2 exp r

   589 r mul sub abs sqrt atan 2 mul /a ED r AngleA 90 add PtoC yA add exch xA add

   590 exch 2 copy /LPutVar [ 4 2 roll r AngleA ] cvx def /LPutPos { LPutVar t 360

   591 mul add dup 5 1 roll 90 sub PtoC 3 -1 roll add /Y ED add /X ED /NAngle ED

   592 % DG/SR modification end

   593 } def /HPutPos { LPutPos } def /VPutPos { LPutPos } def r AngleA 90 sub a add

   594 AngleA 270 add a sub tx@Dict begin /angleB ED /angleA ED /r ED /c 57.2957 r

   595 Div def /y ED /x ED } def

   596 /NCBox { /d ED /h ED /AngleB yB yA sub xB xA sub Atan def /AngleA AngleB

   597 180 add def GetEdgeA GetEdgeB /dx d AngleB sin mul def /dy d AngleB cos

   598 mul neg def /hx h AngleB sin mul neg def /hy h AngleB cos mul def

   599 /LPutVar [ xA1 hx add yA1 hy add xB1 hx add yB1 hy add xB1 dx add yB1 dy

   600 add xA1 dx add yA1 dy add ] cvx def /LPutPos { LPutLines } def /HPutPos

   601 { xB yB xA yA LPutLine } def /VPutPos { HPutPos } def mark LPutVar

   602 tx@Dict begin false Polygon end } def

   603 /NCArcBox { /l ED neg /d ED /h ED /a ED /AngleA yB yA sub xB xA sub Atan

   604 def /AngleB AngleA 180 add def /tA AngleA a sub 90 add def /tB tA a 2

   605 mul add def /r xB xA sub tA cos tB cos sub Div dup 0 eq { pop 1 } if def

   606 /x0 xA r tA cos mul add def /y0 yA r tA sin mul add def /c 57.2958 r div

   607 def /AngleA AngleA a sub 180 add def /AngleB AngleB a add 180 add def

   608 GetEdgeA GetEdgeB /AngleA tA 180 add yA yA1 sub xA xA1 sub Pyth c mul

   609 sub def /AngleB tB 180 add yB yB1 sub xB xB1 sub Pyth c mul add def l 0

   610 eq { x0 y0 r h add AngleA AngleB arc x0 y0 r d add AngleB AngleA arcn }

   611 { x0 y0 translate /tA AngleA l c mul add def /tB AngleB l c mul sub def

   612 0 0 r h add tA tB arc r h add AngleB PtoC r d add AngleB PtoC 2 copy 6 2

   613 roll l arcto 4 { pop } repeat r d add tB PtoC l arcto 4 { pop } repeat 0

   614 0 r d add tB tA arcn r d add AngleA PtoC r h add AngleA PtoC 2 copy 6 2

   615 roll l arcto 4 { pop } repeat r h add tA PtoC l arcto 4 { pop } repeat }

   616 ifelse closepath /LPutVar [ x0 y0 r AngleA AngleB h d ] cvx def /LPutPos

   617 { LPutVar /d ED /h ED /AngleB ED /AngleA ED /r ED /y0 ED /x0 ED t 1 le {

   618 r h add AngleA 1 t sub mul AngleB t mul add dup 90 add /NAngle ED PtoC }

   619 { t 2 lt { /NAngle AngleB 180 add def r 2 t sub h mul t 1 sub d mul add

   620 add AngleB PtoC } { t 3 lt { r d add AngleB 3 t sub mul AngleA 2 t sub

   621 mul add dup 90 sub /NAngle ED PtoC } { /NAngle AngleA 180 add def r 4 t

   622 sub d mul t 3 sub h mul add add AngleA PtoC } ifelse } ifelse } ifelse

   623 y0 add /Y ED x0 add /X ED } def /HPutPos { LPutPos } def /VPutPos {

   624 LPutPos } def } def

   625 /Tfan { /AngleA yB yA sub xB xA sub Atan def GetEdgeA w xA1 xB sub yA1 yB

   626 sub Pyth Pyth w Div CLW 2 div mul 2 div dup AngleA sin mul yA1 add /yA1

   627 ED AngleA cos mul xA1 add /xA1 ED /LPutVar [ xA1 yA1 m { xB w add yB xB

   628 w sub yB } { xB yB w sub xB yB w add } ifelse xA1 yA1 ] cvx def /LPutPos

   629 { LPutLines } def /VPutPos@ { LPutVar flag { 8 4 roll pop pop pop pop }

   630 { pop pop pop pop 4 2 roll } ifelse } def /VPutPos { VPutPos@ VPutLine }

   631 def /HPutPos { VPutPos@ HPutLine } def mark LPutVar tx@Dict begin

   632 /ArrowA { moveto } def /ArrowB { } def false Line closepath end } def

   633 /LPutCoor { NAngle tx@Dict begin /NAngle ED end gsave CM STV CP Y sub neg

   634 exch X sub neg exch moveto setmatrix CP grestore } def

   635 /LPut { tx@NodeDict /LPutPos known { LPutPos } { CP /Y ED /X ED /NAngle 0

   636 def } ifelse LPutCoor  } def

   637 /HPutAdjust { Sin Cos mul 0 eq { 0 } { d Cos mul Sin div flag not { neg }

   638 if h Cos mul Sin div flag { neg } if 2 copy gt { pop } { exch pop }

   639 ifelse } ifelse s add flag { r add neg } { l add } ifelse X add /X ED }

   640 def

   641 /VPutAdjust { Sin Cos mul 0 eq { 0 } { l Sin mul Cos div flag { neg } if

   642 r Sin mul Cos div flag not { neg } if 2 copy gt { pop } { exch pop }

   643 ifelse } ifelse s add flag { d add } { h add neg } ifelse Y add /Y ED }

   644 def

   645 end

   646 % END pst-node.pro

   647 

   648 %%EndProcSet

   649 %%BeginProcSet: 8r.enc 0 0

   650 % File 8r.enc  TeX Base 1 Encoding  Revision 2.0  2002-10-30

   651 %

   652 % @@psencodingfile@{

   653 %   author    = "S. Rahtz, P. MacKay, Alan Jeffrey, B. Horn, K. Berry,

   654 %                W. Schmidt, P. Lehman",

   655 %   version   = "2.0",

   656 %   date      = "30 October 2002",

   657 %   filename  = "8r.enc",

   658 %   email     = "tex-fonts@@tug.org",

   659 %   docstring = "This is the encoding vector for Type1 and TrueType

   660 %                fonts to be used with TeX.  This file is part of the

   661 %                PSNFSS bundle, version 9"

   662 % @}

   663 % 

   664 % The idea is to have all the characters normally included in Type 1 fonts

   665 % available for typesetting. This is effectively the characters in Adobe

   666 % Standard encoding, ISO Latin 1, Windows ANSI including the euro symbol,

   667 % MacRoman, and some extra characters from Lucida.

   668 % 

   669 % Character code assignments were made as follows:

   670 % 

   671 % (1) the Windows ANSI characters are almost all in their Windows ANSI

   672 % positions, because some Windows users cannot easily reencode the

   673 % fonts, and it makes no difference on other systems. The only Windows

   674 % ANSI characters not available are those that make no sense for

   675 % typesetting -- rubout (127 decimal), nobreakspace (160), softhyphen

   676 % (173). quotesingle and grave are moved just because it's such an

   677 % irritation not having them in TeX positions.

   678 % 

   679 % (2) Remaining characters are assigned arbitrarily to the lower part

   680 % of the range, avoiding 0, 10 and 13 in case we meet dumb software.

   681 % 

   682 % (3) Y&Y Lucida Bright includes some extra text characters; in the

   683 % hopes that other PostScript fonts, perhaps created for public

   684 % consumption, will include them, they are included starting at 0x12.

   685 % These are /dotlessj /ff /ffi /ffl.

   686 % 

   687 % (4) hyphen appears twice for compatibility with both ASCII and Windows.

   688 %

   689 % (5) /Euro was assigned to 128, as in Windows ANSI

   690 %

   691 % (6) Missing characters from MacRoman encoding incorporated as follows:

   692 %

   693 %     PostScript      MacRoman        TeXBase1

   694 %     --------------  --------------  --------------

   695 %     /notequal       173             0x16

   696 %     /infinity       176             0x17

   697 %     /lessequal      178             0x18

   698 %     /greaterequal   179             0x19

   699 %     /partialdiff    182             0x1A

   700 %     /summation      183             0x1B

   701 %     /product        184             0x1C

   702 %     /pi             185             0x1D

   703 %     /integral       186             0x81

   704 %     /Omega          189             0x8D

   705 %     /radical        195             0x8E

   706 %     /approxequal    197             0x8F

   707 %     /Delta          198             0x9D

   708 %     /lozenge        215             0x9E

   709 %

   710 /TeXBase1Encoding [

   711 % 0x00

   712  /.notdef /dotaccent /fi /fl

   713  /fraction /hungarumlaut /Lslash /lslash

   714  /ogonek /ring /.notdef /breve

   715  /minus /.notdef /Zcaron /zcaron

   716 % 0x10

   717  /caron /dotlessi /dotlessj /ff

   718  /ffi /ffl /notequal /infinity

   719  /lessequal /greaterequal /partialdiff /summation

   720  /product /pi /grave /quotesingle

   721 % 0x20

   722  /space /exclam /quotedbl /numbersign

   723  /dollar /percent /ampersand /quoteright

   724  /parenleft /parenright /asterisk /plus

   725  /comma /hyphen /period /slash

   726 % 0x30

   727  /zero /one /two /three

   728  /four /five /six /seven

   729  /eight /nine /colon /semicolon

   730  /less /equal /greater /question

   731 % 0x40

   732  /at /A /B /C

   733  /D /E /F /G

   734  /H /I /J /K

   735  /L /M /N /O

   736 % 0x50

   737  /P /Q /R /S

   738  /T /U /V /W

   739  /X /Y /Z /bracketleft

   740  /backslash /bracketright /asciicircum /underscore

   741 % 0x60

   742  /quoteleft /a /b /c

   743  /d /e /f /g

   744  /h /i /j /k

   745  /l /m /n /o

   746 % 0x70

   747  /p /q /r /s

   748  /t /u /v /w

   749  /x /y /z /braceleft

   750  /bar /braceright /asciitilde /.notdef

   751 % 0x80

   752  /Euro /integral /quotesinglbase /florin

   753  /quotedblbase /ellipsis /dagger /daggerdbl

   754  /circumflex /perthousand /Scaron /guilsinglleft

   755  /OE /Omega /radical /approxequal

   756 % 0x90

   757  /.notdef /.notdef /.notdef /quotedblleft

   758  /quotedblright /bullet /endash /emdash

   759  /tilde /trademark /scaron /guilsinglright

   760  /oe /Delta /lozenge /Ydieresis

   761 % 0xA0

   762  /.notdef /exclamdown /cent /sterling

   763  /currency /yen /brokenbar /section

   764  /dieresis /copyright /ordfeminine /guillemotleft

   765  /logicalnot /hyphen /registered /macron

   766 % 0xD0

   767  /degree /plusminus /twosuperior /threesuperior

   768  /acute /mu /paragraph /periodcentered

   769  /cedilla /onesuperior /ordmasculine /guillemotright

   770  /onequarter /onehalf /threequarters /questiondown

   771 % 0xC0

   772  /Agrave /Aacute /Acircumflex /Atilde

   773  /Adieresis /Aring /AE /Ccedilla

   774  /Egrave /Eacute /Ecircumflex /Edieresis

   775  /Igrave /Iacute /Icircumflex /Idieresis

   776 % 0xD0

   777  /Eth /Ntilde /Ograve /Oacute

   778  /Ocircumflex /Otilde /Odieresis /multiply

   779  /Oslash /Ugrave /Uacute /Ucircumflex

   780  /Udieresis /Yacute /Thorn /germandbls

   781 % 0xE0

   782  /agrave /aacute /acircumflex /atilde

   783  /adieresis /aring /ae /ccedilla

   784  /egrave /eacute /ecircumflex /edieresis

   785  /igrave /iacute /icircumflex /idieresis

   786 % 0xF0

   787  /eth /ntilde /ograve /oacute

   788  /ocircumflex /otilde /odieresis /divide

   789  /oslash /ugrave /uacute /ucircumflex

   790  /udieresis /yacute /thorn /ydieresis

   791 ] def

   792 

   793 

   794 %%EndProcSet

   795 %%BeginProcSet: texps.pro 0 0

   796 %!

   797 TeXDict begin/rf{findfont dup length 1 add dict begin{1 index/FID ne 2

   798 index/UniqueID ne and{def}{pop pop}ifelse}forall[1 index 0 6 -1 roll

   799 exec 0 exch 5 -1 roll VResolution Resolution div mul neg 0 0]FontType 0

   800 ne{/Metrics exch def dict begin Encoding{exch dup type/integertype ne{

   801 pop pop 1 sub dup 0 le{pop}{[}ifelse}{FontMatrix 0 get div Metrics 0 get

   802 div def}ifelse}forall Metrics/Metrics currentdict end def}{{1 index type

   803 /nametype eq{exit}if exch pop}loop}ifelse[2 index currentdict end

   804 definefont 3 -1 roll makefont/setfont cvx]cvx def}def/ObliqueSlant{dup

   805 sin S cos div neg}B/SlantFont{4 index mul add}def/ExtendFont{3 -1 roll

   806 mul exch}def/ReEncodeFont{CharStrings rcheck{/Encoding false def dup[

   807 exch{dup CharStrings exch known not{pop/.notdef/Encoding true def}if}

   808 forall Encoding{]exch pop}{cleartomark}ifelse}if/Encoding exch def}def

   809 end

   810 

   811 %%EndProcSet

   812 %%BeginProcSet: special.pro 0 0

   813 %!

   814 TeXDict begin/SDict 200 dict N SDict begin/@SpecialDefaults{/hs 612 N

   815 /vs 792 N/ho 0 N/vo 0 N/hsc 1 N/vsc 1 N/ang 0 N/CLIP 0 N/rwiSeen false N

   816 /rhiSeen false N/letter{}N/note{}N/a4{}N/legal{}N}B/@scaleunit 100 N

   817 /@hscale{@scaleunit div/hsc X}B/@vscale{@scaleunit div/vsc X}B/@hsize{

   818 /hs X/CLIP 1 N}B/@vsize{/vs X/CLIP 1 N}B/@clip{/CLIP 2 N}B/@hoffset{/ho

   819 X}B/@voffset{/vo X}B/@angle{/ang X}B/@rwi{10 div/rwi X/rwiSeen true N}B

   820 /@rhi{10 div/rhi X/rhiSeen true N}B/@llx{/llx X}B/@lly{/lly X}B/@urx{

   821 /urx X}B/@ury{/ury X}B/magscale true def end/@MacSetUp{userdict/md known

   822 {userdict/md get type/dicttype eq{userdict begin md length 10 add md

   823 maxlength ge{/md md dup length 20 add dict copy def}if end md begin

   824 /letter{}N/note{}N/legal{}N/od{txpose 1 0 mtx defaultmatrix dtransform S

   825 atan/pa X newpath clippath mark{transform{itransform moveto}}{transform{

   826 itransform lineto}}{6 -2 roll transform 6 -2 roll transform 6 -2 roll

   827 transform{itransform 6 2 roll itransform 6 2 roll itransform 6 2 roll

   828 curveto}}{{closepath}}pathforall newpath counttomark array astore/gc xdf

   829 pop ct 39 0 put 10 fz 0 fs 2 F/|______Courier fnt invertflag{PaintBlack}

   830 if}N/txpose{pxs pys scale ppr aload pop por{noflips{pop S neg S TR pop 1

   831 -1 scale}if xflip yflip and{pop S neg S TR 180 rotate 1 -1 scale ppr 3

   832 get ppr 1 get neg sub neg ppr 2 get ppr 0 get neg sub neg TR}if xflip

   833 yflip not and{pop S neg S TR pop 180 rotate ppr 3 get ppr 1 get neg sub

   834 neg 0 TR}if yflip xflip not and{ppr 1 get neg ppr 0 get neg TR}if}{

   835 noflips{TR pop pop 270 rotate 1 -1 scale}if xflip yflip and{TR pop pop

   836 90 rotate 1 -1 scale ppr 3 get ppr 1 get neg sub neg ppr 2 get ppr 0 get

   837 neg sub neg TR}if xflip yflip not and{TR pop pop 90 rotate ppr 3 get ppr

   838 1 get neg sub neg 0 TR}if yflip xflip not and{TR pop pop 270 rotate ppr

   839 2 get ppr 0 get neg sub neg 0 S TR}if}ifelse scaleby96{ppr aload pop 4

   840 -1 roll add 2 div 3 1 roll add 2 div 2 copy TR .96 dup scale neg S neg S

   841 TR}if}N/cp{pop pop showpage pm restore}N end}if}if}N/normalscale{

   842 Resolution 72 div VResolution 72 div neg scale magscale{DVImag dup scale

   843 }if 0 setgray}N/psfts{S 65781.76 div N}N/startTexFig{/psf$SavedState

   844 save N userdict maxlength dict begin/magscale true def normalscale

   845 currentpoint TR/psf$ury psfts/psf$urx psfts/psf$lly psfts/psf$llx psfts

   846 /psf$y psfts/psf$x psfts currentpoint/psf$cy X/psf$cx X/psf$sx psf$x

   847 psf$urx psf$llx sub div N/psf$sy psf$y psf$ury psf$lly sub div N psf$sx

   848 psf$sy scale psf$cx psf$sx div psf$llx sub psf$cy psf$sy div psf$ury sub

   849 TR/showpage{}N/erasepage{}N/setpagedevice{pop}N/copypage{}N/p 3 def

   850 @MacSetUp}N/doclip{psf$llx psf$lly psf$urx psf$ury currentpoint 6 2 roll

   851 newpath 4 copy 4 2 roll moveto 6 -1 roll S lineto S lineto S lineto

   852 closepath clip newpath moveto}N/endTexFig{end psf$SavedState restore}N

   853 /@beginspecial{SDict begin/SpecialSave save N gsave normalscale

   854 currentpoint TR @SpecialDefaults count/ocount X/dcount countdictstack N}

   855 N/@setspecial{CLIP 1 eq{newpath 0 0 moveto hs 0 rlineto 0 vs rlineto hs

   856 neg 0 rlineto closepath clip}if ho vo TR hsc vsc scale ang rotate

   857 rwiSeen{rwi urx llx sub div rhiSeen{rhi ury lly sub div}{dup}ifelse

   858 scale llx neg lly neg TR}{rhiSeen{rhi ury lly sub div dup scale llx neg

   859 lly neg TR}if}ifelse CLIP 2 eq{newpath llx lly moveto urx lly lineto urx

   860 ury lineto llx ury lineto closepath clip}if/showpage{}N/erasepage{}N

   861 /setpagedevice{pop}N/copypage{}N newpath}N/@endspecial{count ocount sub{

   862 pop}repeat countdictstack dcount sub{end}repeat grestore SpecialSave

   863 restore end}N/@defspecial{SDict begin}N/@fedspecial{end}B/li{lineto}B

   864 /rl{rlineto}B/rc{rcurveto}B/np{/SaveX currentpoint/SaveY X N 1

   865 setlinecap newpath}N/st{stroke SaveX SaveY moveto}N/fil{fill SaveX SaveY

   866 moveto}N/ellipse{/endangle X/startangle X/yrad X/xrad X/savematrix

   867 matrix currentmatrix N TR xrad yrad scale 0 0 1 startangle endangle arc

   868 savematrix setmatrix}N end

   869 

   870 %%EndProcSet

   871 %%BeginProcSet: color.pro 0 0

   872 %!

   873 TeXDict begin/setcmykcolor where{pop}{/setcmykcolor{dup 10 eq{pop

   874 setrgbcolor}{1 sub 4 1 roll 3{3 index add neg dup 0 lt{pop 0}if 3 1 roll

   875 }repeat setrgbcolor pop}ifelse}B}ifelse/TeXcolorcmyk{setcmykcolor}def

   876 /TeXcolorrgb{setrgbcolor}def/TeXcolorgrey{setgray}def/TeXcolorgray{

   877 setgray}def/TeXcolorhsb{sethsbcolor}def/currentcmykcolor where{pop}{

   878 /currentcmykcolor{currentrgbcolor 10}B}ifelse/DC{exch dup userdict exch

   879 known{pop pop}{X}ifelse}B/GreenYellow{0.15 0 0.69 0 setcmykcolor}DC

   880 /Yellow{0 0 1 0 setcmykcolor}DC/Goldenrod{0 0.10 0.84 0 setcmykcolor}DC

   881 /Dandelion{0 0.29 0.84 0 setcmykcolor}DC/Apricot{0 0.32 0.52 0

   882 setcmykcolor}DC/Peach{0 0.50 0.70 0 setcmykcolor}DC/Melon{0 0.46 0.50 0

   883 setcmykcolor}DC/YellowOrange{0 0.42 1 0 setcmykcolor}DC/Orange{0 0.61

   884 0.87 0 setcmykcolor}DC/BurntOrange{0 0.51 1 0 setcmykcolor}DC

   885 /Bittersweet{0 0.75 1 0.24 setcmykcolor}DC/RedOrange{0 0.77 0.87 0

   886 setcmykcolor}DC/Mahogany{0 0.85 0.87 0.35 setcmykcolor}DC/Maroon{0 0.87

   887 0.68 0.32 setcmykcolor}DC/BrickRed{0 0.89 0.94 0.28 setcmykcolor}DC/Red{

   888 0 1 1 0 setcmykcolor}DC/OrangeRed{0 1 0.50 0 setcmykcolor}DC/RubineRed{

   889 0 1 0.13 0 setcmykcolor}DC/WildStrawberry{0 0.96 0.39 0 setcmykcolor}DC

   890 /Salmon{0 0.53 0.38 0 setcmykcolor}DC/CarnationPink{0 0.63 0 0

   891 setcmykcolor}DC/Magenta{0 1 0 0 setcmykcolor}DC/VioletRed{0 0.81 0 0

   892 setcmykcolor}DC/Rhodamine{0 0.82 0 0 setcmykcolor}DC/Mulberry{0.34 0.90

   893 0 0.02 setcmykcolor}DC/RedViolet{0.07 0.90 0 0.34 setcmykcolor}DC

   894 /Fuchsia{0.47 0.91 0 0.08 setcmykcolor}DC/Lavender{0 0.48 0 0

   895 setcmykcolor}DC/Thistle{0.12 0.59 0 0 setcmykcolor}DC/Orchid{0.32 0.64 0

   896 0 setcmykcolor}DC/DarkOrchid{0.40 0.80 0.20 0 setcmykcolor}DC/Purple{

   897 0.45 0.86 0 0 setcmykcolor}DC/Plum{0.50 1 0 0 setcmykcolor}DC/Violet{

   898 0.79 0.88 0 0 setcmykcolor}DC/RoyalPurple{0.75 0.90 0 0 setcmykcolor}DC

   899 /BlueViolet{0.86 0.91 0 0.04 setcmykcolor}DC/Periwinkle{0.57 0.55 0 0

   900 setcmykcolor}DC/CadetBlue{0.62 0.57 0.23 0 setcmykcolor}DC

   901 /CornflowerBlue{0.65 0.13 0 0 setcmykcolor}DC/MidnightBlue{0.98 0.13 0

   902 0.43 setcmykcolor}DC/NavyBlue{0.94 0.54 0 0 setcmykcolor}DC/RoyalBlue{1

   903 0.50 0 0 setcmykcolor}DC/Blue{1 1 0 0 setcmykcolor}DC/Cerulean{0.94 0.11

   904 0 0 setcmykcolor}DC/Cyan{1 0 0 0 setcmykcolor}DC/ProcessBlue{0.96 0 0 0

   905 setcmykcolor}DC/SkyBlue{0.62 0 0.12 0 setcmykcolor}DC/Turquoise{0.85 0

   906 0.20 0 setcmykcolor}DC/TealBlue{0.86 0 0.34 0.02 setcmykcolor}DC

   907 /Aquamarine{0.82 0 0.30 0 setcmykcolor}DC/BlueGreen{0.85 0 0.33 0

   908 setcmykcolor}DC/Emerald{1 0 0.50 0 setcmykcolor}DC/JungleGreen{0.99 0

   909 0.52 0 setcmykcolor}DC/SeaGreen{0.69 0 0.50 0 setcmykcolor}DC/Green{1 0

   910 1 0 setcmykcolor}DC/ForestGreen{0.91 0 0.88 0.12 setcmykcolor}DC

   911 /PineGreen{0.92 0 0.59 0.25 setcmykcolor}DC/LimeGreen{0.50 0 1 0

   912 setcmykcolor}DC/YellowGreen{0.44 0 0.74 0 setcmykcolor}DC/SpringGreen{

   913 0.26 0 0.76 0 setcmykcolor}DC/OliveGreen{0.64 0 0.95 0.40 setcmykcolor}

   914 DC/RawSienna{0 0.72 1 0.45 setcmykcolor}DC/Sepia{0 0.83 1 0.70

   915 setcmykcolor}DC/Brown{0 0.81 1 0.60 setcmykcolor}DC/Tan{0.14 0.42 0.56 0

   916 setcmykcolor}DC/Gray{0 0 0 0.50 setcmykcolor}DC/Black{0 0 0 1

   917 setcmykcolor}DC/White{0 0 0 0 setcmykcolor}DC end

   918 

   919 %%EndProcSet

   920 TeXDict begin 39139632 55387786 1000 600 600 (last.dvi)

   921 @start

   922 %DVIPSBitmapFont: Fa msbm10 12 1

   923 /Fa 1 68 df<00000001FFE000300000003FFFFC0078000001FFFFFF007800000FFFFFFF

   924 C0F800003FFFC07FF8F80000FFFE000FFFF80001FFF80003FFF80007FBF00001FFF8000F

   925 E7E000007FF8001F87C000003F78003F0F8000001F78007E1F8000000FF800FC1F000000

   926 0FF801F83E00000007F803F03E00000003F807E07C00000003F807C07C00000001F80F80

   927 7800000001F80F80F800000000F81F00F800000000F81F00F000000000783E01F0000000

   928 00783E01F000000000783C01E000000000787C01E000000000307C01E000000000007801

   929 E000000000007803E00000000000F803E00000000000F803C00000000000F003C0000000

   930 0000F003C00000000000F003C00000000000F003C00000000000F003C00000000000F003

   931 C00000000000F003C00000000000F003C00000000000F003C00000000000F003C0000000

   932 0000F003C00000000000F003C00000000000F803C00000000000F803C000000000007803

   933 E000000000007803E000000000007C01E000000000007C01E000000000003C01E0000000

   934 00003E01F000000000003E01F000000000001F00F000000000001F00F000000000000F80

   935 F800000000000F80F8000000000607C07C000000000F07E07C000000001F03F03E000000

   936 003F01F83E000000007E00FC1F000000007C007E1F80000000FC003F0F80000001F8001F

   937 87C0000007F0000FE7E000000FE00007FBF800003FC00001FFFE0001FF800000FFFFC00F

   938 FE0000003FFFFFFFFC0000000FFFFFFFF000000001FFFFFFC0000000003FFFFE00000000

   939 0001FFF0000040487CC52E>67 D E

   940 %EndDVIPSBitmapFont

   941 %DVIPSBitmapFont: Fb cmbx12 12 7

   942 /Fb 7 122 df<000000001F8000000000000000001F8000000000000000003FC0000000

   943 00000000003FC000000000000000007FE000000000000000007FE000000000000000007F

   944 E00000000000000000FFF00000000000000000FFF00000000000000001FFF80000000000

   945 000001FFF80000000000000001FFF80000000000000003FFFC0000000000000003FFFC00

   946 00000000000007FFFE0000000000000007FFFE0000000000000007FFFE00000000000000

   947 0FFFFF000000000000000F9FFF000000000000001F9FFF800000000000001F1FFF800000

   948 000000001F0FFF800000000000003F0FFFC00000000000003E07FFC00000000000007E07

   949 FFE00000000000007C07FFE00000000000007C03FFE0000000000000FC03FFF000000000

   950 0000F801FFF0000000000001F801FFF8000000000001F001FFF8000000000001F000FFF8

   951 000000000003F000FFFC000000000003E0007FFC000000000007E0007FFE000000000007

   952 C0007FFE000000000007C0003FFE00000000000FC0003FFF00000000000F80001FFF0000

   953 0000001F80001FFF80000000001F00000FFF80000000001F00000FFF80000000003F0000

   954 0FFFC0000000003E000007FFC0000000007E000007FFE0000000007FFFFFFFFFE0000000

   955 007FFFFFFFFFE000000000FFFFFFFFFFF000000000FFFFFFFFFFF000000001FFFFFFFFFF

   956 F800000001F0000000FFF800000001F0000000FFF800000003F0000000FFFC00000003E0

   957 0000007FFC00000007E00000007FFE00000007C00000003FFE00000007C00000003FFE00

   958 00000F800000003FFF0000000F800000001FFF0000001F800000001FFF8000001F000000

   959 000FFF8000003F000000000FFFC000003E000000000FFFC000007E0000000007FFC000FF

   960 FFFF00000FFFFFFFF0FFFFFF00000FFFFFFFF0FFFFFF00000FFFFFFFF0FFFFFF00000FFF

   961 FFFFF0FFFFFF00000FFFFFFFF04C457CC455>65 D<FFFFFFFFFFFF000000FFFFFFFFFFFF

   962 F00000FFFFFFFFFFFFFE0000FFFFFFFFFFFFFF8000FFFFFFFFFFFFFFE000001FFF00000F

   963 FFF000001FFF000001FFF800001FFF0000007FFC00001FFF0000003FFE00001FFF000000

   964 1FFF00001FFF0000000FFF80001FFF0000000FFF80001FFF0000000FFFC0001FFF000000

   965 07FFC0001FFF00000007FFC0001FFF00000007FFE0001FFF00000007FFE0001FFF000000

   966 07FFE0001FFF00000007FFE0001FFF00000007FFE0001FFF00000007FFE0001FFF000000

   967 07FFE0001FFF00000007FFE0001FFF00000007FFE0001FFF00000007FFC0001FFF000000

   968 07FFC0001FFF0000000FFF80001FFF0000000FFF80001FFF0000000FFF00001FFF000000

   969 1FFF00001FFF0000003FFE00001FFF0000007FFC00001FFF000001FFF800001FFF00000F

   970 FFF000001FFFFFFFFFFFC000001FFFFFFFFFFF0000001FFFFFFFFFFC0000001FFFFFFFFF

   971 C00000001FFF000000000000001FFF000000000000001FFF000000000000001FFF000000

   972 000000001FFF000000000000001FFF000000000000001FFF000000000000001FFF000000

   973 000000001FFF000000000000001FFF000000000000001FFF000000000000001FFF000000

   974 000000001FFF000000000000001FFF000000000000001FFF000000000000001FFF000000

   975 000000001FFF000000000000001FFF000000000000001FFF000000000000001FFF000000

   976 000000001FFF000000000000001FFF000000000000001FFF000000000000001FFF000000

   977 000000001FFF000000000000FFFFFFFFE000000000FFFFFFFFE000000000FFFFFFFFE000

   978 000000FFFFFFFFE000000000FFFFFFFFE00000000043447DC34D>80

   979 D<007FC000FFFFC000FFFFC000FFFFC000FFFFC000FFFFC00003FFC00001FFC00001FFC0

   980 0001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC0

   981 0001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC0

   982 0001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC0

   983 0001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC0

   984 0001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC0

   985 0001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC00001FFC0

   986 0001FFC000FFFFFF80FFFFFF80FFFFFF80FFFFFF80FFFFFF8019457CC420>108

   987 D<00001FFC0000000001FFFFC000000007FFFFF00000001FFFFFFC0000007FF80FFF0000

   988 00FFC001FF800001FF8000FFC00003FE00003FE00007FE00003FF0000FFC00001FF8000F

   989 F800000FF8001FF800000FFC001FF800000FFC003FF800000FFE003FF0000007FE007FF0

   990 000007FF007FF0000007FF007FF0000007FF007FF0000007FF00FFF0000007FF80FFF000

   991 0007FF80FFF0000007FF80FFF0000007FF80FFF0000007FF80FFF0000007FF80FFF00000

   992 07FF80FFF0000007FF80FFF0000007FF80FFF0000007FF807FF0000007FF007FF0000007

   993 FF007FF0000007FF007FF0000007FF003FF800000FFE003FF800000FFE001FF800000FFC

   994 001FFC00001FFC000FFC00001FF80007FE00003FF00007FE00003FF00003FF8000FFE000

   995 01FFC001FFC000007FF80FFF0000003FFFFFFE0000000FFFFFF800000001FFFFC0000000

   996 001FFC000000312F7DAD38>111 D<0001E000000001E000000001E000000001E0000000

   997 01E000000003E000000003E000000003E000000003E000000007E000000007E00000000F

   998 E00000000FE00000001FE00000001FE00000003FE00000007FE0000000FFE0000003FFE0

   999 00000FFFFFFF80FFFFFFFF80FFFFFFFF80FFFFFFFF80FFFFFFFF8000FFE0000000FFE000

  1000 0000FFE0000000FFE0000000FFE0000000FFE0000000FFE0000000FFE0000000FFE00000

  1001 00FFE0000000FFE0000000FFE0000000FFE0000000FFE0000000FFE0000000FFE0000000

  1002 FFE0000000FFE0000000FFE0000000FFE0000000FFE0000000FFE001E000FFE001E000FF

  1003 E001E000FFE001E000FFE001E000FFE001E000FFE001E000FFE001E000FFE001E000FFE0

  1004 03E000FFF003C0007FF003C0007FF007C0003FF80F80001FFC1F00000FFFFF000007FFFC

  1005 000001FFF80000003FE00023407EBE2C>116 D<007FC00001FF00FFFFC003FFFF00FFFF

  1006 C003FFFF00FFFFC003FFFF00FFFFC003FFFF00FFFFC003FFFF0003FFC0000FFF0001FFC0

  1007 0007FF0001FFC00007FF0001FFC00007FF0001FFC00007FF0001FFC00007FF0001FFC000

  1008 07FF0001FFC00007FF0001FFC00007FF0001FFC00007FF0001FFC00007FF0001FFC00007

  1009 FF0001FFC00007FF0001FFC00007FF0001FFC00007FF0001FFC00007FF0001FFC00007FF

  1010 0001FFC00007FF0001FFC00007FF0001FFC00007FF0001FFC00007FF0001FFC00007FF00

  1011 01FFC00007FF0001FFC00007FF0001FFC00007FF0001FFC00007FF0001FFC00007FF0001

  1012 FFC0000FFF0001FFC0000FFF0001FFC0001FFF0001FFC0001FFF0001FFC0003FFF0000FF

  1013 C0003FFF0000FFE0007FFF80007FE001F7FFFE007FF807E7FFFE003FFFFFC7FFFE000FFF

  1014 FF07FFFE0003FFFE07FFFE00007FF007FC00372E7CAC3E>I<FFFFFF0003FFFCFFFFFF00

  1015 03FFFCFFFFFF0003FFFCFFFFFF0003FFFCFFFFFF0003FFFC01FFE000003E0000FFE00000

  1016 3C0000FFF000003C00007FF000007800007FF800007800007FF80000F800003FF80000F0

  1017 00003FFC0001F000001FFC0001E000001FFE0003E000000FFE0003C000000FFF0007C000

  1018 0007FF000780000007FF800F80000003FF800F00000003FFC00F00000003FFC01F000000

  1019 01FFE01E00000001FFE03E00000000FFE03C00000000FFF07C000000007FF07800000000

  1020 7FF8F8000000003FF8F0000000003FFDF0000000001FFDE0000000001FFFE0000000000F

  1021 FFC0000000000FFFC0000000000FFFC00000000007FF800000000007FF800000000003FF

  1022 000000000003FF000000000001FE000000000001FE000000000000FC000000000000FC00

  1023 00000000007800000000000078000000000000F8000000000000F0000000000001F00000

  1024 00000001E00000001F0003E00000003F8003C00000007FC007C0000000FFE00780000000

  1025 FFE00F80000000FFE00F00000000FFE01F00000000FFE03E00000000FFC07C000000007F

  1026 C1F8000000007F07F0000000003FFFE0000000001FFFC00000000007FF000000000001FC

  1027 000000000036407EAB3B>121 D E

  1028 %EndDVIPSBitmapFont

  1029 %DVIPSBitmapFont: Fc cmmi5 5 3

  1030 /Fc 3 68 df<00000380000000038000000007800000000F800000000FC00000001FC000

  1031 000037C000000037C000000067C0000000C7E0000000C7E000000183E000000303E00000

  1032 0303E000000603E000000C03F000000C03F000001801F000003FFFF000007FFFF0000060

  1033 01F00000C001F80001C000F800018000F800030000F800070000F8000F0000F800FFC00F

  1034 FFC0FFC00FFF80221D7C9C2B>65 D<03FFFFF80003FFFFFE00003E001F80003E000FC000

  1035 3E0007C0003E0003C0007C0003C0007C0007C0007C0007C0007C000F8000F8001F0000F8

  1036 007E0000FFFFF80000FFFFF00001F001F80001F0007E0001F0003E0001F0001F0003E000

  1037 1F0003E0001F0003E0001F0003E0001E0007C0003E0007C0007C0007C000F80007C007F0

  1038 00FFFFFFC000FFFFFE0000221C7C9B2B>I<00007F80400007FFE0C0001FC071C0003E00

  1039 1B8000F8000F8001E0000F8003C000078007800007000F000007001F000007003E000007

  1040 003E000006007C000000007C000000007C00000000F800000000F800000000F800000000

  1041 F800000000F800001800F800001800780000180078000030003C000060003C0000E0001E

  1042 0001C0000F8007000007E01E000001FFF80000003FC00000221E7C9C29>I

  1043 E

  1044 %EndDVIPSBitmapFont

  1045 %DVIPSBitmapFont: Fd cmr6 6 2

  1046 /Fd 2 106 df<00000F000000FF000000FF0000001F0000000F0000000F0000000F0000

  1047 000F0000000F0000000F0000000F0000000F0000000F0000FF0F0003FFCF0007C0FF000F

  1048 003F001E001F003C000F007C000F0078000F00F8000F00F8000F00F8000F00F8000F00F8

  1049 000F00F8000F00F8000F0078000F007C000F003C000F003E001F001F003F800FC1EFF003

  1050 FF8FF000FE0F001C247DA222>100 D<0C003F003F003F003F000C000000000000000000

  1051 0000000000000F00FF00FF001F000F000F000F000F000F000F000F000F000F000F000F00

  1052 0F000F000F000F000F00FFE0FFE00B237DA212>105 D E

  1053 %EndDVIPSBitmapFont

  1054 %DVIPSBitmapFont: Fe cmmi6 6 1

  1055 /Fe 1 106 df<0038007C007C00780070000000000000000000000000000007801FC038

  1056 E030E060F0C1E0C1E0C1E003C003C003C0078007800F000F040F061E0C1E0C1E181C181E

  1057 700FE007800F237DA116>105 D E

  1058 %EndDVIPSBitmapFont

  1059 %DVIPSBitmapFont: Ff cmex10 10 2

  1060 /Ff 2 88 df<0000000E000000000000001F000000000000003F000000000000003F0000

  1061 00000000007F800000000000007F800000000000007F80000000000000FFC00000000000

  1062 00FFC0000000000000FFC0000000000001FFE0000000000001FFE0000000000001FFE000

  1063 0000000003FFF0000000000003F3F0000000000003F3F0000000000007F3F80000000000

  1064 07E1F8000000000007E1F800000000000FE1FC00000000000FC0FC00000000000FC0FC00

  1065 000000001FC0FE00000000001F807E00000000001F807E00000000003F807F0000000000

  1066 3F003F00000000003F003F00000000007F003F80000000007E001F80000000007E001F80

  1067 00000000FE001FC000000000FC000FC000000000FC000FC000000001FC000FE000000001

  1068 F80007E000000001F80007E000000003F80007F000000003F00003F000000003F00003F0

  1069 00000007F00003F800000007E00001F80000000FE00001FC0000000FC00000FC0000000F

  1070 C00000FC0000001FC00000FE0000001F8000007E0000001F8000007E0000003F8000007F

  1071 0000003F0000003F0000003F0000003F0000007F0000003F8000007E0000001F8000007E

  1072 0000001F800000FE0000001FC00000FC0000000FC00000FC0000000FC00001FC0000000F

  1073 E00001F800000007E00001F800000007E00003F800000007F00003F000000003F00003F0

  1074 00000003F00007F000000003F80007E000000001F80007E000000001F8000FE000000001

  1075 FC000FC000000000FC000FC000000000FC001FC000000000FE001F80000000007E001F80

  1076 000000007E003F80000000007F003F00000000003F003F00000000003F007F0000000000

  1077 3F807E00000000001F807E00000000001F80FE00000000001FC0FC00000000000FC0FC00

  1078 000000000FC0F8000000000007C078000000000003803A537B7F45>86

  1079 D<7800000000000380F8000000000007C0FC00000000000FC0FC00000000000FC0FE0000

  1080 0000001FC07E00000000001F807E00000000001F807F00000000003F803F00000000003F

  1081 003F00000000003F003F80000000007F001F80000000007E001F80000000007E001FC000

  1082 000000FE000FC000000000FC000FC000000000FC000FE000000001FC0007E000000001F8

  1083 0007E000000001F80007F000000003F80003F000000003F00003F000000003F00003F800

  1084 000007F00001F800000007E00001F800000007E00001FC0000000FE00000FC0000000FC0

  1085 0000FC0000000FC00000FE0000001FC000007E0000001F8000007E0000001F8000007F00

  1086 00003F8000003F0000003F0000003F0000003F0000003F8000007F0000001F8000007E00

  1087 00001F8000007E0000001FC00000FE0000000FC00000FC0000000FC00000FC0000000FE0

  1088 0001FC00000007E00001F800000007F00003F800000003F00003F000000003F00003F000

  1089 000003F80007F000000001F80007E000000001F80007E000000001FC000FE000000000FC

  1090 000FC000000000FC000FC000000000FE001FC0000000007E001F80000000007E001F8000

  1091 0000007F003F80000000003F003F00000000003F003F00000000003F807F00000000001F

  1092 807E00000000001F807E00000000001FC0FE00000000000FC0FC00000000000FC0FC0000

  1093 0000000FE1FC000000000007E1F8000000000007E1F8000000000007F3F8000000000003

  1094 F3F0000000000003F3F0000000000003FFF0000000000001FFE0000000000001FFE00000

  1095 00000001FFE0000000000000FFC0000000000000FFC0000000000000FFC0000000000000

  1096 7F800000000000007F800000000000007F800000000000003F000000000000003F000000

  1097 000000001F000000000000000E000000003A537B7F45>I E

  1098 %EndDVIPSBitmapFont

  1099 %DVIPSBitmapFont: Fg cmsy6 6 2

  1100 /Fg 2 49 df<006000007000006000006000406020E06070F861F07E67E01FFF8007FE00

  1101 00F00007FE001FFF807E67E0F861F0E0607040602000600000600000700000600014157B

  1102 9620>3 D<01E003F003F003F003F007E007E007C00FC00FC00F800F801F001F001E001E

  1103 003E003C003C007800780078007000F000E00060000C1A7E9B12>48

  1104 D E

  1105 %EndDVIPSBitmapFont

  1106 %DVIPSBitmapFont: Fh cmsy10 10.95 5

  1107 /Fh 5 97 df<7FFFFFFFFFFFFFE0FFFFFFFFFFFFFFF0FFFFFFFFFFFFFFF07FFFFFFFFFFF

  1108 FFE00000000F000000000000000F000000000000000F000000000000000F000000000000

  1109 000F000000000000000F000000000000000F000000000000000F000000000000000F0000

  1110 00000000000F000000000000000F000000000000000F000000000000000F000000000000

  1111 000F000000000000000F000000000000000F000000000000000F000000000000000F0000

  1112 00000000000F000000000000000F000000000000000F000000000000000F000000000000

  1113 000F000000000000000F000000000000000F000000000000000F000000000000000F0000

  1114 00000000000F000000000000000F000000000000000F000000000000000F000000000000

  1115 000F000000000000000F000000000000000F000000000000000F000000000000000F0000

  1116 00000000000F000000000000000F000000000000000F000000000000000F000000000000

  1117 000F000000000000000F000000000000000F000000000000000F000000000000000F0000

  1118 00000000000F000000000000000F000000000000000F000000000000000F000000000000

  1119 000F000000000000000F000000000000000F000000000000000F000000000000000F0000

  1120 00000000000F0000000000000006000000003C3C7BBB47>62 D<00000006000000000000

  1121 000F000000000000000F000000000000000F000000000000000F000000000000000F0000

  1122 00000000000F000000000000000F000000000000000F000000000000000F000000000000

  1123 000F000000000000000F000000000000000F000000000000000F000000000000000F0000

  1124 00000000000F000000000000000F000000000000000F000000000000000F000000000000

  1125 000F000000000000000F000000000000000F000000000000000F000000000000000F0000

  1126 00000000000F000000000000000F000000000000000F000000000000000F000000000000

  1127 000F000000000000000F000000000000000F000000000000000F000000000000000F0000

  1128 00000000000F000000000000000F000000000000000F000000000000000F000000000000

  1129 000F000000000000000F000000000000000F000000000000000F000000000000000F0000

  1130 00000000000F000000000000000F000000000000000F000000000000000F000000000000

  1131 000F000000000000000F000000000000000F000000000000000F000000000000000F0000

  1132 00000000000F000000000000000F000000000000000F000000000000000F000000000000

  1133 000F000000007FFFFFFFFFFFFFE0FFFFFFFFFFFFFFF0FFFFFFFFFFFFFFF07FFFFFFFFFFF

  1134 FFE03C3C7BBB47>I<000000C0000000000001E0000000000003F0000000000003F00000

  1135 00000007F8000000000007F8000000000007F800000000000FFC00000000000FFC000000