manual/plots/nstric.eps

   1 %!PS-Adobe-2.0 EPSF-2.0
   2 %%Title: pbctric2.fig
   3 %%Creator: /home/hess/transfig.3.2.1/fig2dev/fig2dev Version 3.2 Patchlevel 1
   4 %%CreationDate: Thu Feb 10 15:05:06 2000
   5 %%For: hess@rugmd28.chem.rug.nl (Berk Hess,Room 17.14,4327)
   6 %%Orientation: Portrait
   7 %%BoundingBox: 0 0 317 252
   8 %%Pages: 0
   9 %%BeginSetup
  10 %%EndSetup
  11 %%Magnification: 1.0000
  12 %%EndComments
  13 /MyAppDict 100 dict dup begin def
  14 /$F2psDict 200 dict def
  15 $F2psDict begin
  16 $F2psDict /mtrx matrix put
  17 /col-1 {0 setgray} bind def
  18 /col0 {0.000 0.000 0.000 srgb} bind def
  19 /col1 {0.000 0.000 1.000 srgb} bind def
  20 /col2 {0.000 1.000 0.000 srgb} bind def
  21 /col3 {0.000 1.000 1.000 srgb} bind def
  22 /col4 {1.000 0.000 0.000 srgb} bind def
  23 /col5 {1.000 0.000 1.000 srgb} bind def
  24 /col6 {1.000 1.000 0.000 srgb} bind def
  25 /col7 {1.000 1.000 1.000 srgb} bind def
  26 /col8 {0.000 0.000 0.560 srgb} bind def
  27 /col9 {0.000 0.000 0.690 srgb} bind def
  28 /col10 {0.000 0.000 0.820 srgb} bind def
  29 /col11 {0.530 0.810 1.000 srgb} bind def
  30 /col12 {0.000 0.560 0.000 srgb} bind def
  31 /col13 {0.000 0.690 0.000 srgb} bind def
  32 /col14 {0.000 0.820 0.000 srgb} bind def
  33 /col15 {0.000 0.560 0.560 srgb} bind def
  34 /col16 {0.000 0.690 0.690 srgb} bind def
  35 /col17 {0.000 0.820 0.820 srgb} bind def
  36 /col18 {0.560 0.000 0.000 srgb} bind def
  37 /col19 {0.690 0.000 0.000 srgb} bind def
  38 /col20 {0.820 0.000 0.000 srgb} bind def
  39 /col21 {0.560 0.000 0.560 srgb} bind def
  40 /col22 {0.690 0.000 0.690 srgb} bind def
  41 /col23 {0.820 0.000 0.820 srgb} bind def
  42 /col24 {0.500 0.190 0.000 srgb} bind def
  43 /col25 {0.630 0.250 0.000 srgb} bind def
  44 /col26 {0.750 0.380 0.000 srgb} bind def
  45 /col27 {1.000 0.500 0.500 srgb} bind def
  46 /col28 {1.000 0.630 0.630 srgb} bind def
  47 /col29 {1.000 0.750 0.750 srgb} bind def
  48 /col30 {1.000 0.880 0.880 srgb} bind def
  49 /col31 {1.000 0.840 0.000 srgb} bind def
  50
  51 end
  52 save
  53 -25.0 286.0 translate
  54 1 -1 scale
  55 .9 .9 scale % to make patterns same scale as in xfig
  56
  57 % This junk string is used by the show operators
  58 /PATsstr 1 string def
  59 /PATawidthshow {        % cx cy cchar rx ry string
  60   % Loop over each character in the string
  61   {  % cx cy cchar rx ry char
  62     % Show the character
  63     dup                         % cx cy cchar rx ry char char
  64     PATsstr dup 0 4 -1 roll put % cx cy cchar rx ry char (char)
  65     false charpath              % cx cy cchar rx ry char
  66     /clip load PATdraw
  67     % Move past the character (charpath modified the
  68     % current point)
  69     currentpoint                        % cx cy cchar rx ry char x y
  70     newpath
  71     moveto                      % cx cy cchar rx ry char
  72     % Reposition by cx,cy if the character in the string is cchar
  73     3 index eq {                        % cx cy cchar rx ry
  74       4 index 4 index rmoveto
  75     } if
  76     % Reposition all characters by rx ry
  77     2 copy rmoveto              % cx cy cchar rx ry
  78   } forall
  79   pop pop pop pop pop           % -
  80   currentpoint
  81   newpath
  82   moveto
  83 } bind def
  84 /PATcg {
  85   7 dict dup begin
  86     /lw currentlinewidth def
  87     /lc currentlinecap def
  88     /lj currentlinejoin def
  89     /ml currentmiterlimit def
  90     /ds [ currentdash ] def
  91     /cc [ currentrgbcolor ] def
  92     /cm matrix currentmatrix def
  93   end
  94 } bind def
  95 % PATdraw - calculates the boundaries of the object and
  96 % fills it with the current pattern
  97 /PATdraw {                      % proc
  98   save exch
  99     PATpcalc                    % proc nw nh px py
 100     5 -1 roll exec              % nw nh px py
 101     newpath
 102     PATfill                     % -
 103   restore
 104 } bind def
 105 % PATfill - performs the tiling for the shape
 106 /PATfill { % nw nh px py PATfill -
 107   PATDict /CurrentPattern get dup begin
 108     setfont
 109     % Set the coordinate system to Pattern Space
 110     PatternGState PATsg
 111     % Set the color for uncolored pattezns
 112     PaintType 2 eq { PATDict /PColor get PATsc } if
 113     % Create the string for showing
 114     3 index string              % nw nh px py str
 115     % Loop for each of the pattern sources
 116     0 1 Multi 1 sub {           % nw nh px py str source
 117         % Move to the starting location
 118         3 index 3 index         % nw nh px py str source px py
 119         moveto                  % nw nh px py str source
 120         % For multiple sources, set the appropriate color
 121         Multi 1 ne { dup PC exch get PATsc } if
 122         % Set the appropriate string for the source
 123         0 1 7 index 1 sub { 2 index exch 2 index put } for pop
 124         % Loop over the number of vertical cells
 125         3 index                 % nw nh px py str nh
 126         {                       % nw nh px py str
 127           currentpoint          % nw nh px py str cx cy
 128           2 index show          % nw nh px py str cx cy
 129           YStep add moveto      % nw nh px py str
 130         } repeat                % nw nh px py str
 131     } for
 132     5 { pop } repeat
 133   end
 134 } bind def
 135
 136 % PATkshow - kshow with the current pattezn
 137 /PATkshow {                     % proc string
 138   exch bind                     % string proc
 139   1 index 0 get                 % string proc char
 140   % Loop over all but the last character in the string
 141   0 1 4 index length 2 sub {
 142                                 % string proc char idx
 143     % Find the n+1th character in the string
 144     3 index exch 1 add get      % string proe char char+1
 145     exch 2 copy                 % strinq proc char+1 char char+1 char
 146     % Now show the nth character
 147     PATsstr dup 0 4 -1 roll put % string proc chr+1 chr chr+1 (chr)
 148     false charpath              % string proc char+1 char char+1
 149     /clip load PATdraw
 150     % Move past the character (charpath modified the current point)
 151     currentpoint newpath moveto
 152     % Execute the user proc (should consume char and char+1)
 153     mark 3 1 roll               % string proc char+1 mark char char+1
 154     4 index exec                % string proc char+1 mark...
 155     cleartomark                 % string proc char+1
 156   } for
 157   % Now display the last character
 158   PATsstr dup 0 4 -1 roll put   % string proc (char+1)
 159   false charpath                % string proc
 160   /clip load PATdraw
 161   neewath
 162   pop pop                       % -
 163 } bind def
 164 % PATmp - the makepattern equivalent
 165 /PATmp {                        % patdict patmtx PATmp patinstance
 166   exch dup length 7 add         % We will add 6 new entries plus 1 FID
 167   dict copy                     % Create a new dictionary
 168   begin
 169     % Matrix to install when painting the pattern
 170     TilingType PATtcalc
 171     /PatternGState PATcg def
 172     PatternGState /cm 3 -1 roll put
 173     % Check for multi pattern sources (Level 1 fast color patterns)
 174     currentdict /Multi known not { /Multi 1 def } if
 175     % Font dictionary definitions
 176     /FontType 3 def
 177     % Create a dummy encoding vector
 178     /Encoding 256 array def
 179     3 string 0 1 255 {
 180       Encoding exch dup 3 index cvs cvn put } for pop
 181     /FontMatrix matrix def
 182     /FontBBox BBox def
 183     /BuildChar {
 184         mark 3 1 roll           % mark dict char
 185         exch begin
 186         Multi 1 ne {PaintData exch get}{pop} ifelse  % mark [paintdata]
 187           PaintType 2 eq Multi 1 ne or
 188           { XStep 0 FontBBox aload pop setcachedevice }
 189           { XStep 0 setcharwidth } ifelse
 190           currentdict           % mark [paintdata] dict
 191           /PaintProc load       % mark [paintdata] dict paintproc
 192         end
 193         gsave
 194           false PATredef exec true PATredef
 195         grestore
 196         cleartomark             % -
 197     } bind def
 198     currentdict
 199   end                           % newdict
 200   /foo exch                     % /foo newlict
 201   definefont                    % newfont
 202 } bind def
 203 % PATpcalc - calculates the starting point and width/height
 204 % of the tile fill for the shape
 205 /PATpcalc {     % - PATpcalc nw nh px py
 206   PATDict /CurrentPattern get begin
 207     gsave
 208         % Set up the coordinate system to Pattern Space
 209         % and lock down pattern
 210         PatternGState /cm get setmatrix
 211         BBox aload pop pop pop translate
 212         % Determine the bounding box of the shape
 213         pathbbox                        % llx lly urx ury
 214     grestore
 215     % Determine (nw, nh) the # of cells to paint width and height
 216     PatHeight div ceiling               % llx lly urx qh
 217     4 1 roll                            % qh llx lly urx
 218     PatWidth div ceiling                % qh llx lly qw
 219     4 1 roll                            % qw qh llx lly
 220     PatHeight div floor                 % qw qh llx ph
 221     4 1 roll                            % ph qw qh llx
 222     PatWidth div floor                  % ph qw qh pw
 223     4 1 roll                            % pw ph qw qh
 224     2 index sub cvi abs                 % pw ph qs qh-ph
 225     exch 3 index sub cvi abs exch       % pw ph nw=qw-pw nh=qh-ph
 226     % Determine the starting point of the pattern fill
 227     %(px, py)
 228     4 2 roll                            % nw nh pw ph
 229     PatHeight mul                       % nw nh pw py
 230     exch                                % nw nh py pw
 231     PatWidth mul exch                   % nw nh px py
 232   end
 233 } bind def
 234
 235 % Save the original routines so that we can use them later on
 236 /oldfill        /fill load def
 237 /oldeofill      /eofill load def
 238 /oldstroke      /stroke load def
 239 /oldshow        /show load def
 240 /oldashow       /ashow load def
 241 /oldwidthshow   /widthshow load def
 242 /oldawidthshow  /awidthshow load def
 243 /oldkshow       /kshow load def
 244
 245 % These defs are necessary so that subsequent procs don't bind in
 246 % the originals
 247 /fill      { oldfill } bind def
 248 /eofill    { oldeofill } bind def
 249 /stroke    { oldstroke } bind def
 250 /show      { oldshow } bind def
 251 /ashow     { oldashow } bind def
 252 /widthshow { oldwidthshow } bind def
 253 /awidthshow { oldawidthshow } bind def
 254 /kshow     { oldkshow } bind def
 255 /PATredef {
 256   MyAppDict begin
 257     {
 258     /fill { /clip load PATdraw newpath } bind def
 259     /eofill { /eoclip load PATdraw newpath } bind def
 260     /stroke { PATstroke } bind def
 261     /show { 0 0 null 0 0 6 -1 roll PATawidthshow } bind def
 262     /ashow { 0 0 null 6 3 roll PATawidthshow }
 263     bind def
 264     /widthshow { 0 0 3 -1 roll PATawidthshow }
 265     bind def
 266     /awidthshow { PATawidthshow } bind def
 267     /kshow { PATkshow } bind def
 268   } {
 269     /fill   { oldfill } bind def
 270     /eofill { oldeofill } bind def
 271     /stroke { oldstroke } bind def
 272     /show   { oldshow } bind def
 273     /ashow  { oldashow } bind def
 274     /widthshow { oldwidthshow } bind def
 275     /awidthshow { oldawidthshow } bind def
 276     /kshow  { oldkshow } bind def
 277     } ifelse
 278   end
 279 } bind def
 280 false PATredef
 281 % Conditionally define setcmykcolor if not available
 282 /setcmykcolor where { pop } {
 283   /setcmykcolor {
 284     1 sub 4 1 roll
 285     3 {
 286         3 index add neg dup 0 lt { pop 0 } if 3 1 roll
 287     } repeat
 288     setrgbcolor - pop
 289   } bind def
 290 } ifelse
 291 /PATsc {                % colorarray
 292   aload length          % c1 ... cn length
 293     dup 1 eq { pop setgray } { 3 eq { setrgbcolor } { setcmykcolor
 294   } ifelse } ifelse
 295 } bind def
 296 /PATsg {                % dict
 297   begin
 298     lw setlinewidth
 299     lc setlinecap
 300     lj setlinejoin
 301     ml setmiterlimit
 302     ds aload pop setdash
 303     cc aload pop setrgbcolor
 304     cm setmatrix
 305   end
 306 } bind def
 307
 308 /PATDict 3 dict def
 309 /PATsp {
 310   true PATredef
 311   PATDict begin
 312     /CurrentPattern exch def
 313     % If it's an uncolored pattern, save the color
 314     CurrentPattern /PaintType get 2 eq {
 315       /PColor exch def
 316     } if
 317     /CColor [ currentrgbcolor ] def
 318   end
 319 } bind def
 320 % PATstroke - stroke with the current pattern
 321 /PATstroke {
 322   countdictstack
 323   save
 324   mark
 325   {
 326     currentpoint strokepath moveto
 327     PATpcalc                            % proc nw nh px py
 328     clip newpath PATfill
 329     } stopped {
 330         (*** PATstroke Warning: Path is too complex, stroking
 331           with gray) =
 332     cleartomark
 333     restore
 334     countdictstack exch sub dup 0 gt
 335         { { end } repeat } { pop } ifelse
 336     gsave 0.5 setgray oldstroke grestore
 337   } { pop restore pop } ifelse
 338   newpath
 339 } bind def
 340 /PATtcalc {             % modmtx tilingtype PATtcalc tilematrix
 341   % Note: tiling types 2 and 3 are not supported
 342   gsave
 343     exch concat                                 % tilingtype
 344     matrix currentmatrix exch                   % cmtx tilingtype
 345     % Tiling type 1 and 3: constant spacing
 346     2 ne {
 347         % Distort the pattern so that it occupies
 348         % an integral number of device pixels
 349         dup 4 get exch dup 5 get exch           % tx ty cmtx
 350         XStep 0 dtransform
 351         round exch round exch                   % tx ty cmtx dx.x dx.y
 352         XStep div exch XStep div exch           % tx ty cmtx a b
 353         0 YStep dtransform
 354         round exch round exch                   % tx ty cmtx a b dy.x dy.y
 355         YStep div exch YStep div exch           % tx ty cmtx a b c d
 356         7 -3 roll astore                        % { a b c d tx ty }
 357     } if
 358   grestore
 359 } bind def
 360 /PATusp {
 361   false PATredef
 362   PATDict begin
 363     CColor PATsc
 364   end
 365 } bind def
 366
 367 % left45
 368 11 dict begin
 369 /PaintType 1 def
 370 /PatternType 1 def
 371 /TilingType 1 def
 372 /BBox [0 0 1 1] def
 373 /XStep 1 def
 374 /YStep 1 def
 375 /PatWidth 1 def
 376 /PatHeight 1 def
 377 /Multi 2 def
 378 /PaintData [
 379   { clippath } bind
 380   { 32 32 true [ 32 0 0 -32 0 32 ]
 381         {<808080804040404020202020101010100808080804040404
 382         020202020101010180808080404040402020202010101010
 383         080808080404040402020202010101018080808040404040
 384         202020201010101008080808040404040202020201010101
 385         808080804040404020202020101010100808080804040404
 386         0202020201010101>}
 387      imagemask } bind
 388 ] def
 389 /PaintProc {
 390         pop
 391         exec fill
 392 } def
 393 currentdict
 394 end
 395 /P4 exch def
 396
 397 % right45
 398 11 dict begin
 399 /PaintType 1 def
 400 /PatternType 1 def
 401 /TilingType 1 def
 402 /BBox [0 0 1 1] def
 403 /XStep 1 def
 404 /YStep 1 def
 405 /PatWidth 1 def
 406 /PatHeight 1 def
 407 /Multi 2 def
 408 /PaintData [
 409   { clippath } bind
 410   { 32 32 true [ 32 0 0 -32 0 32 ]
 411         {<010101010202020204040404080808081010101020202020
 412         404040408080808001010101020202020404040408080808
 413         101010102020202040404040808080800101010102020202
 414         040404040808080810101010202020204040404080808080
 415         010101010202020204040404080808081010101020202020
 416         4040404080808080>}
 417      imagemask } bind
 418 ] def
 419 /PaintProc {
 420         pop
 421         exec fill
 422 } def
 423 currentdict
 424 end
 425 /P5 exch def
 426
 427 % crosshatch45
 428 11 dict begin
 429 /PaintType 1 def
 430 /PatternType 1 def
 431 /TilingType 1 def
 432 /BBox [0 0 1 1] def
 433 /XStep 1 def
 434 /YStep 1 def
 435 /PatWidth 1 def
 436 /PatHeight 1 def
 437 /Multi 2 def
 438 /PaintData [
 439   { clippath } bind
 440   { 32 32 true [ 32 0 0 -32 0 32 ]
 441         {<828282824444444428282828101010102828282844444444
 442         828282820101010182828282444444442828282810101010
 443         282828284444444482828282010101018282828244444444
 444         282828281010101028282828444444448282828201010101
 445         828282824444444428282828101010102828282844444444
 446         8282828201010101>}
 447      imagemask } bind
 448 ] def
 449 /PaintProc {
 450         pop
 451         exec fill
 452 } def
 453 currentdict
 454 end
 455 /P6 exch def
 456 1.1111 1.1111 scale %restore scale
 457
 458 /cp {closepath} bind def
 459 /ef {eofill} bind def
 460 /gr {grestore} bind def
 461 /gs {gsave} bind def
 462 /sa {save} bind def
 463 /rs {restore} bind def
 464 /l {lineto} bind def
 465 /m {moveto} bind def
 466 /rm {rmoveto} bind def
 467 /n {newpath} bind def
 468 /s {stroke} bind def
 469 /sh {show} bind def
 470 /slc {setlinecap} bind def
 471 /slj {setlinejoin} bind def
 472 /slw {setlinewidth} bind def
 473 /srgb {setrgbcolor} bind def
 474 /rot {rotate} bind def
 475 /sc {scale} bind def
 476 /sd {setdash} bind def
 477 /ff {findfont} bind def
 478 /sf {setfont} bind def
 479 /scf {scalefont} bind def
 480 /sw {stringwidth} bind def
 481 /tr {translate} bind def
 482 /tnt {dup dup currentrgbcolor
 483   4 -2 roll dup 1 exch sub 3 -1 roll mul add
 484   4 -2 roll dup 1 exch sub 3 -1 roll mul add
 485   4 -2 roll dup 1 exch sub 3 -1 roll mul add srgb}
 486   bind def
 487 /shd {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul
 488   4 -2 roll mul srgb} bind def
 489  /DrawEllipse {
 490         /endangle exch def
 491         /startangle exch def
 492         /yrad exch def
 493         /xrad exch def
 494         /y exch def
 495         /x exch def
 496         /savematrix mtrx currentmatrix def
 497         x y tr xrad yrad sc 0 0 1 startangle endangle arc
 498         closepath
 499         savematrix setmatrix
 500         } def
 501
 502 /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def
 503 /$F2psEnd {$F2psEnteredState restore end} def
 504 %%EndProlog
 505
 506 $F2psBegin
 507 10 setmiterlimit
 508 n -1000 5537 m -1000 -1000 l 6415 -1000 l 6415 5537 l cp clip
 509  0.06299 0.06299 sc
 510 % Polyline
 511 7.500 slw
 512 n 4050 2700 m 4950 2700 l 4950 2250 l 4050 2250 l 4050 2700 l  cp gs /PC [[1.00 1.00 1.00] [0.00 0.00 0.00]] def
 513 15.00 15.00 sc P5 [16 0 0 -16 270.00 150.00] PATmp PATsp ef gr PATusp gs col0 s gr
 514 % Polyline
 515 n 3150 2250 m 4950 2250 l 4950 1800 l 3150 1800 l 3150 2250 l  cp gs /PC [[1.00 1.00 1.00] [0.00 0.00 0.00]] def
 516 15.00 15.00 sc P5 [16 0 0 -16 210.00 120.00] PATmp PATsp ef gr PATusp gs col0 s gr
 517 % Polyline
 518 n 1800 3600 m 4050 3600 l 4050 2700 l 1800 2700 l 1800 3600 l  cp gs /PC [[1.00 1.00 1.00] [0.00 0.00 0.00]] def
 519 15.00 15.00 sc P4 [16 0 0 -16 120.00 180.00] PATmp PATsp ef gr PATusp gs col0 s gr
 520 % Polyline
 521 n 2250 2700 m 3600 2700 l 3600 2250 l 2250 2250 l 2250 2700 l  cp gs /PC [[1.00 1.00 1.00] [0.00 0.00 0.00]] def
 522 15.00 15.00 sc P4 [16 0 0 -16 150.00 150.00] PATmp PATsp ef gr PATusp gs col0 s gr
 523 % Polyline
 524 n 1800 2250 m 5400 2250 l gs col0 s gr
 525 % Polyline
 526 n 3600 2700 m 4050 2700 l 4050 2250 l 3600 2250 l 3600 2700 l  cp gs /PC [[1.00 1.00 1.00] [0.00 0.00 0.00]] def
 527 15.00 15.00 sc P6 [16 0 0 -16 240.00 150.00] PATmp PATsp ef gr PATusp gs col0 s gr
 528 /Times-BoldItalic ff 270.00 scf sf
 529 4718 2288 m
 530 gs 1 -1 sc (j) col-1 sh gr
 531 /Times-BoldItalic ff 270.00 scf sf
 532 3135 3428 m
 533 gs 1 -1 sc (i) col-1 sh gr
 534 /Times-BoldItalic ff 270.00 scf sf
 535 4268 1621 m
 536 gs 1 -1 sc (i') col-1 sh gr
 537 % Polyline
 538 n 1793 3143 m 5393 3143 l gs col-1 s gr
 539 % Polyline
 540 15.000 slw
 541 n 1793 3593 m 5393 3593 l 5393 1793 l 1793 1793 l 1793 3593 l  cp gs col-1 s gr
 542 % Polyline
 543 7.500 slw
 544 n 3143 3593 m 3143 1793 l gs col-1 s gr
 545 15.000 slw
 546 % Ellipse
 547 n 3030 3255 68 68 0 360 DrawEllipse gs 0.00 setgray ef gr gs col-1 s gr
 548
 549 % Polyline
 550 7.500 slw
 551 n 1793 2693 m 5393 2693 l gs col-1 s gr
 552 15.000 slw
 553 % Ellipse
 554 n 4605 2130 68 68 0 360 DrawEllipse gs col-1 s gr
 555
 556 7.500 slw
 557  [60] 0 sd
 558 % Ellipse
 559 n 4155 1455 900 900 0 360 DrawEllipse gs col-1 s gr
 560  [] 0 sd
 561  [60] 0 sd
 562 % Ellipse
 563 n 3030 3255 900 900 0 360 DrawEllipse gs col-1 s gr
 564  [] 0 sd
 565 15.000 slw
 566 % Ellipse
 567 n 4155 1455 68 68 0 360 DrawEllipse gs 0.00 setgray ef gr gs col-1 s gr
 568
 569 % Polyline
 570 45.000 slw
 571 gs  clippath
 572 3470 4373 m 3950 4493 l 3470 4613 l 4103 4613 l 4103 4373 l cp
 573 clip
 574 n 443 4493 m 4043 4493 l gs /PC [[1.00 1.00 1.00] [0.00 0.00 0.00]] def
 575 15.00 15.00 sc P6 [16 0 0 -16 29.53 299.53] PATmp PATsp ef gr PATusp gs col-1 s gr gr
 576
 577 % arrowhead
 578 n 3470 4373 m 3950 4493 l 3470 4613 l  col-1 s
 579 % Polyline
 580 7.500 slw
 581 n 2243 3593 m 2243 1793 l gs col-1 s gr
 582 % Polyline
 583 45.000 slw
 584 gs  clippath
 585 1163 3115 m 1518 2771 l 1366 3242 l 1702 2706 l 1498 2579 l cp
 586 clip
 587 n 443 4493 m 1568 2693 l gs /PC [[1.00 1.00 1.00] [0.00 0.00 0.00]] def
 588 15.00 15.00 sc P6 [16 0 0 -16 29.53 179.53] PATmp PATsp ef gr PATusp gs col-1 s gr gr
 589
 590 % arrowhead
 591 n 1163 3115 m 1518 2771 l 1366 3242 l  col-1 s
 592 % Polyline
 593 7.500 slw
 594 n 4943 3593 m 4943 1793 l gs col-1 s gr
 595 % Polyline
 596 n 4493 3593 m 4493 1793 l gs col-1 s gr
 597 % Polyline
 598 n 4043 3593 m 4043 1793 l gs col-1 s gr
 599 % Polyline
 600 n 3593 3593 m 3593 1793 l gs col-1 s gr
 601 % Polyline
 602 n 2693 3593 m 2693 1793 l gs col-1 s gr
 603 $F2psEnd
 604 rs
 605 end