|
Packit |
575503 |
%!PS-Adobe-3.0 EPSF-3.0
|
|
Packit |
575503 |
%%Title: api-figure2.fig
|
|
Packit |
575503 |
%%Creator: fig2dev Version 3.2 Patchlevel 5d
|
|
Packit |
575503 |
%%CreationDate: Thu Apr 25 22:22:07 2013
|
|
Packit |
575503 |
%%BoundingBox: 0 0 363 179
|
|
Packit |
575503 |
%Magnification: 1.0000
|
|
Packit |
575503 |
%%EndComments
|
|
Packit |
575503 |
%%BeginProlog
|
|
Packit |
575503 |
/MyAppDict 100 dict dup begin def
|
|
Packit |
575503 |
/$F2psDict 200 dict def
|
|
Packit |
575503 |
$F2psDict begin
|
|
Packit |
575503 |
$F2psDict /mtrx matrix put
|
|
Packit |
575503 |
/col-1 {0 setgray} bind def
|
|
Packit |
575503 |
/col0 {0.000 0.000 0.000 srgb} bind def
|
|
Packit |
575503 |
/col1 {0.000 0.000 1.000 srgb} bind def
|
|
Packit |
575503 |
/col2 {0.000 1.000 0.000 srgb} bind def
|
|
Packit |
575503 |
/col3 {0.000 1.000 1.000 srgb} bind def
|
|
Packit |
575503 |
/col4 {1.000 0.000 0.000 srgb} bind def
|
|
Packit |
575503 |
/col5 {1.000 0.000 1.000 srgb} bind def
|
|
Packit |
575503 |
/col6 {1.000 1.000 0.000 srgb} bind def
|
|
Packit |
575503 |
/col7 {1.000 1.000 1.000 srgb} bind def
|
|
Packit |
575503 |
/col8 {0.000 0.000 0.560 srgb} bind def
|
|
Packit |
575503 |
/col9 {0.000 0.000 0.690 srgb} bind def
|
|
Packit |
575503 |
/col10 {0.000 0.000 0.820 srgb} bind def
|
|
Packit |
575503 |
/col11 {0.530 0.810 1.000 srgb} bind def
|
|
Packit |
575503 |
/col12 {0.000 0.560 0.000 srgb} bind def
|
|
Packit |
575503 |
/col13 {0.000 0.690 0.000 srgb} bind def
|
|
Packit |
575503 |
/col14 {0.000 0.820 0.000 srgb} bind def
|
|
Packit |
575503 |
/col15 {0.000 0.560 0.560 srgb} bind def
|
|
Packit |
575503 |
/col16 {0.000 0.690 0.690 srgb} bind def
|
|
Packit |
575503 |
/col17 {0.000 0.820 0.820 srgb} bind def
|
|
Packit |
575503 |
/col18 {0.560 0.000 0.000 srgb} bind def
|
|
Packit |
575503 |
/col19 {0.690 0.000 0.000 srgb} bind def
|
|
Packit |
575503 |
/col20 {0.820 0.000 0.000 srgb} bind def
|
|
Packit |
575503 |
/col21 {0.560 0.000 0.560 srgb} bind def
|
|
Packit |
575503 |
/col22 {0.690 0.000 0.690 srgb} bind def
|
|
Packit |
575503 |
/col23 {0.820 0.000 0.820 srgb} bind def
|
|
Packit |
575503 |
/col24 {0.500 0.190 0.000 srgb} bind def
|
|
Packit |
575503 |
/col25 {0.630 0.250 0.000 srgb} bind def
|
|
Packit |
575503 |
/col26 {0.750 0.380 0.000 srgb} bind def
|
|
Packit |
575503 |
/col27 {1.000 0.500 0.500 srgb} bind def
|
|
Packit |
575503 |
/col28 {1.000 0.630 0.630 srgb} bind def
|
|
Packit |
575503 |
/col29 {1.000 0.750 0.750 srgb} bind def
|
|
Packit |
575503 |
/col30 {1.000 0.880 0.880 srgb} bind def
|
|
Packit |
575503 |
/col31 {1.000 0.840 0.000 srgb} bind def
|
|
Packit |
575503 |
|
|
Packit |
575503 |
end
|
|
Packit |
575503 |
|
|
Packit |
575503 |
% This junk string is used by the show operators
|
|
Packit |
575503 |
/PATsstr 1 string def
|
|
Packit |
575503 |
/PATawidthshow { % cx cy cchar rx ry string
|
|
Packit |
575503 |
% Loop over each character in the string
|
|
Packit |
575503 |
{ % cx cy cchar rx ry char
|
|
Packit |
575503 |
% Show the character
|
|
Packit |
575503 |
dup % cx cy cchar rx ry char char
|
|
Packit |
575503 |
PATsstr dup 0 4 -1 roll put % cx cy cchar rx ry char (char)
|
|
Packit |
575503 |
false charpath % cx cy cchar rx ry char
|
|
Packit |
575503 |
/clip load PATdraw
|
|
Packit |
575503 |
% Move past the character (charpath modified the
|
|
Packit |
575503 |
% current point)
|
|
Packit |
575503 |
currentpoint % cx cy cchar rx ry char x y
|
|
Packit |
575503 |
newpath
|
|
Packit |
575503 |
moveto % cx cy cchar rx ry char
|
|
Packit |
575503 |
% Reposition by cx,cy if the character in the string is cchar
|
|
Packit |
575503 |
3 index eq { % cx cy cchar rx ry
|
|
Packit |
575503 |
4 index 4 index rmoveto
|
|
Packit |
575503 |
} if
|
|
Packit |
575503 |
% Reposition all characters by rx ry
|
|
Packit |
575503 |
2 copy rmoveto % cx cy cchar rx ry
|
|
Packit |
575503 |
} forall
|
|
Packit |
575503 |
pop pop pop pop pop % -
|
|
Packit |
575503 |
currentpoint
|
|
Packit |
575503 |
newpath
|
|
Packit |
575503 |
moveto
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
/PATcg {
|
|
Packit |
575503 |
7 dict dup begin
|
|
Packit |
575503 |
/lw currentlinewidth def
|
|
Packit |
575503 |
/lc currentlinecap def
|
|
Packit |
575503 |
/lj currentlinejoin def
|
|
Packit |
575503 |
/ml currentmiterlimit def
|
|
Packit |
575503 |
/ds [ currentdash ] def
|
|
Packit |
575503 |
/cc [ currentrgbcolor ] def
|
|
Packit |
575503 |
/cm matrix currentmatrix def
|
|
Packit |
575503 |
end
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
% PATdraw - calculates the boundaries of the object and
|
|
Packit |
575503 |
% fills it with the current pattern
|
|
Packit |
575503 |
/PATdraw { % proc
|
|
Packit |
575503 |
save exch
|
|
Packit |
575503 |
PATpcalc % proc nw nh px py
|
|
Packit |
575503 |
5 -1 roll exec % nw nh px py
|
|
Packit |
575503 |
newpath
|
|
Packit |
575503 |
PATfill % -
|
|
Packit |
575503 |
restore
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
% PATfill - performs the tiling for the shape
|
|
Packit |
575503 |
/PATfill { % nw nh px py PATfill -
|
|
Packit |
575503 |
PATDict /CurrentPattern get dup begin
|
|
Packit |
575503 |
setfont
|
|
Packit |
575503 |
% Set the coordinate system to Pattern Space
|
|
Packit |
575503 |
PatternGState PATsg
|
|
Packit |
575503 |
% Set the color for uncolored pattezns
|
|
Packit |
575503 |
PaintType 2 eq { PATDict /PColor get PATsc } if
|
|
Packit |
575503 |
% Create the string for showing
|
|
Packit |
575503 |
3 index string % nw nh px py str
|
|
Packit |
575503 |
% Loop for each of the pattern sources
|
|
Packit |
575503 |
0 1 Multi 1 sub { % nw nh px py str source
|
|
Packit |
575503 |
% Move to the starting location
|
|
Packit |
575503 |
3 index 3 index % nw nh px py str source px py
|
|
Packit |
575503 |
moveto % nw nh px py str source
|
|
Packit |
575503 |
% For multiple sources, set the appropriate color
|
|
Packit |
575503 |
Multi 1 ne { dup PC exch get PATsc } if
|
|
Packit |
575503 |
% Set the appropriate string for the source
|
|
Packit |
575503 |
0 1 7 index 1 sub { 2 index exch 2 index put } for pop
|
|
Packit |
575503 |
% Loop over the number of vertical cells
|
|
Packit |
575503 |
3 index % nw nh px py str nh
|
|
Packit |
575503 |
{ % nw nh px py str
|
|
Packit |
575503 |
currentpoint % nw nh px py str cx cy
|
|
Packit |
575503 |
2 index oldshow % nw nh px py str cx cy
|
|
Packit |
575503 |
YStep add moveto % nw nh px py str
|
|
Packit |
575503 |
} repeat % nw nh px py str
|
|
Packit |
575503 |
} for
|
|
Packit |
575503 |
5 { pop } repeat
|
|
Packit |
575503 |
end
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
|
|
Packit |
575503 |
% PATkshow - kshow with the current pattezn
|
|
Packit |
575503 |
/PATkshow { % proc string
|
|
Packit |
575503 |
exch bind % string proc
|
|
Packit |
575503 |
1 index 0 get % string proc char
|
|
Packit |
575503 |
% Loop over all but the last character in the string
|
|
Packit |
575503 |
0 1 4 index length 2 sub {
|
|
Packit |
575503 |
% string proc char idx
|
|
Packit |
575503 |
% Find the n+1th character in the string
|
|
Packit |
575503 |
3 index exch 1 add get % string proc char char+1
|
|
Packit |
575503 |
exch 2 copy % strinq proc char+1 char char+1 char
|
|
Packit |
575503 |
% Now show the nth character
|
|
Packit |
575503 |
PATsstr dup 0 4 -1 roll put % string proc chr+1 chr chr+1 (chr)
|
|
Packit |
575503 |
false charpath % string proc char+1 char char+1
|
|
Packit |
575503 |
/clip load PATdraw
|
|
Packit |
575503 |
% Move past the character (charpath modified the current point)
|
|
Packit |
575503 |
currentpoint newpath moveto
|
|
Packit |
575503 |
% Execute the user proc (should consume char and char+1)
|
|
Packit |
575503 |
mark 3 1 roll % string proc char+1 mark char char+1
|
|
Packit |
575503 |
4 index exec % string proc char+1 mark...
|
|
Packit |
575503 |
cleartomark % string proc char+1
|
|
Packit |
575503 |
} for
|
|
Packit |
575503 |
% Now display the last character
|
|
Packit |
575503 |
PATsstr dup 0 4 -1 roll put % string proc (char+1)
|
|
Packit |
575503 |
false charpath % string proc
|
|
Packit |
575503 |
/clip load PATdraw
|
|
Packit |
575503 |
neewath
|
|
Packit |
575503 |
pop pop % -
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
% PATmp - the makepattern equivalent
|
|
Packit |
575503 |
/PATmp { % patdict patmtx PATmp patinstance
|
|
Packit |
575503 |
exch dup length 7 add % We will add 6 new entries plus 1 FID
|
|
Packit |
575503 |
dict copy % Create a new dictionary
|
|
Packit |
575503 |
begin
|
|
Packit |
575503 |
% Matrix to install when painting the pattern
|
|
Packit |
575503 |
TilingType PATtcalc
|
|
Packit |
575503 |
/PatternGState PATcg def
|
|
Packit |
575503 |
PatternGState /cm 3 -1 roll put
|
|
Packit |
575503 |
% Check for multi pattern sources (Level 1 fast color patterns)
|
|
Packit |
575503 |
currentdict /Multi known not { /Multi 1 def } if
|
|
Packit |
575503 |
% Font dictionary definitions
|
|
Packit |
575503 |
/FontType 3 def
|
|
Packit |
575503 |
% Create a dummy encoding vector
|
|
Packit |
575503 |
/Encoding 256 array def
|
|
Packit |
575503 |
3 string 0 1 255 {
|
|
Packit |
575503 |
Encoding exch dup 3 index cvs cvn put } for pop
|
|
Packit |
575503 |
/FontMatrix matrix def
|
|
Packit |
575503 |
/FontBBox BBox def
|
|
Packit |
575503 |
/BuildChar {
|
|
Packit |
575503 |
mark 3 1 roll % mark dict char
|
|
Packit |
575503 |
exch begin
|
|
Packit |
575503 |
Multi 1 ne {PaintData exch get}{pop} ifelse % mark [paintdata]
|
|
Packit |
575503 |
PaintType 2 eq Multi 1 ne or
|
|
Packit |
575503 |
{ XStep 0 FontBBox aload pop setcachedevice }
|
|
Packit |
575503 |
{ XStep 0 setcharwidth } ifelse
|
|
Packit |
575503 |
currentdict % mark [paintdata] dict
|
|
Packit |
575503 |
/PaintProc load % mark [paintdata] dict paintproc
|
|
Packit |
575503 |
end
|
|
Packit |
575503 |
gsave
|
|
Packit |
575503 |
false PATredef exec true PATredef
|
|
Packit |
575503 |
grestore
|
|
Packit |
575503 |
cleartomark % -
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
currentdict
|
|
Packit |
575503 |
end % newdict
|
|
Packit |
575503 |
/foo exch % /foo newlict
|
|
Packit |
575503 |
definefont % newfont
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
% PATpcalc - calculates the starting point and width/height
|
|
Packit |
575503 |
% of the tile fill for the shape
|
|
Packit |
575503 |
/PATpcalc { % - PATpcalc nw nh px py
|
|
Packit |
575503 |
PATDict /CurrentPattern get begin
|
|
Packit |
575503 |
gsave
|
|
Packit |
575503 |
% Set up the coordinate system to Pattern Space
|
|
Packit |
575503 |
% and lock down pattern
|
|
Packit |
575503 |
PatternGState /cm get setmatrix
|
|
Packit |
575503 |
BBox aload pop pop pop translate
|
|
Packit |
575503 |
% Determine the bounding box of the shape
|
|
Packit |
575503 |
pathbbox % llx lly urx ury
|
|
Packit |
575503 |
grestore
|
|
Packit |
575503 |
% Determine (nw, nh) the # of cells to paint width and height
|
|
Packit |
575503 |
PatHeight div ceiling % llx lly urx qh
|
|
Packit |
575503 |
4 1 roll % qh llx lly urx
|
|
Packit |
575503 |
PatWidth div ceiling % qh llx lly qw
|
|
Packit |
575503 |
4 1 roll % qw qh llx lly
|
|
Packit |
575503 |
PatHeight div floor % qw qh llx ph
|
|
Packit |
575503 |
4 1 roll % ph qw qh llx
|
|
Packit |
575503 |
PatWidth div floor % ph qw qh pw
|
|
Packit |
575503 |
4 1 roll % pw ph qw qh
|
|
Packit |
575503 |
2 index sub cvi abs % pw ph qs qh-ph
|
|
Packit |
575503 |
exch 3 index sub cvi abs exch % pw ph nw=qw-pw nh=qh-ph
|
|
Packit |
575503 |
% Determine the starting point of the pattern fill
|
|
Packit |
575503 |
%(px, py)
|
|
Packit |
575503 |
4 2 roll % nw nh pw ph
|
|
Packit |
575503 |
PatHeight mul % nw nh pw py
|
|
Packit |
575503 |
exch % nw nh py pw
|
|
Packit |
575503 |
PatWidth mul exch % nw nh px py
|
|
Packit |
575503 |
end
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
|
|
Packit |
575503 |
% Save the original routines so that we can use them later on
|
|
Packit |
575503 |
/oldfill /fill load def
|
|
Packit |
575503 |
/oldeofill /eofill load def
|
|
Packit |
575503 |
/oldstroke /stroke load def
|
|
Packit |
575503 |
/oldshow /show load def
|
|
Packit |
575503 |
/oldashow /ashow load def
|
|
Packit |
575503 |
/oldwidthshow /widthshow load def
|
|
Packit |
575503 |
/oldawidthshow /awidthshow load def
|
|
Packit |
575503 |
/oldkshow /kshow load def
|
|
Packit |
575503 |
|
|
Packit |
575503 |
% These defs are necessary so that subsequent procs don't bind in
|
|
Packit |
575503 |
% the originals
|
|
Packit |
575503 |
/fill { oldfill } bind def
|
|
Packit |
575503 |
/eofill { oldeofill } bind def
|
|
Packit |
575503 |
/stroke { oldstroke } bind def
|
|
Packit |
575503 |
/show { oldshow } bind def
|
|
Packit |
575503 |
/ashow { oldashow } bind def
|
|
Packit |
575503 |
/widthshow { oldwidthshow } bind def
|
|
Packit |
575503 |
/awidthshow { oldawidthshow } bind def
|
|
Packit |
575503 |
/kshow { oldkshow } bind def
|
|
Packit |
575503 |
/PATredef {
|
|
Packit |
575503 |
MyAppDict begin
|
|
Packit |
575503 |
{
|
|
Packit |
575503 |
/fill { /clip load PATdraw newpath } bind def
|
|
Packit |
575503 |
/eofill { /eoclip load PATdraw newpath } bind def
|
|
Packit |
575503 |
/stroke { PATstroke } bind def
|
|
Packit |
575503 |
/show { 0 0 null 0 0 6 -1 roll PATawidthshow } bind def
|
|
Packit |
575503 |
/ashow { 0 0 null 6 3 roll PATawidthshow }
|
|
Packit |
575503 |
bind def
|
|
Packit |
575503 |
/widthshow { 0 0 3 -1 roll PATawidthshow }
|
|
Packit |
575503 |
bind def
|
|
Packit |
575503 |
/awidthshow { PATawidthshow } bind def
|
|
Packit |
575503 |
/kshow { PATkshow } bind def
|
|
Packit |
575503 |
} {
|
|
Packit |
575503 |
/fill { oldfill } bind def
|
|
Packit |
575503 |
/eofill { oldeofill } bind def
|
|
Packit |
575503 |
/stroke { oldstroke } bind def
|
|
Packit |
575503 |
/show { oldshow } bind def
|
|
Packit |
575503 |
/ashow { oldashow } bind def
|
|
Packit |
575503 |
/widthshow { oldwidthshow } bind def
|
|
Packit |
575503 |
/awidthshow { oldawidthshow } bind def
|
|
Packit |
575503 |
/kshow { oldkshow } bind def
|
|
Packit |
575503 |
} ifelse
|
|
Packit |
575503 |
end
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
false PATredef
|
|
Packit |
575503 |
% Conditionally define setcmykcolor if not available
|
|
Packit |
575503 |
/setcmykcolor where { pop } {
|
|
Packit |
575503 |
/setcmykcolor {
|
|
Packit |
575503 |
1 sub 4 1 roll
|
|
Packit |
575503 |
3 {
|
|
Packit |
575503 |
3 index add neg dup 0 lt { pop 0 } if 3 1 roll
|
|
Packit |
575503 |
} repeat
|
|
Packit |
575503 |
setrgbcolor - pop
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
} ifelse
|
|
Packit |
575503 |
/PATsc { % colorarray
|
|
Packit |
575503 |
aload length % c1 ... cn length
|
|
Packit |
575503 |
dup 1 eq { pop setgray } { 3 eq { setrgbcolor } { setcmykcolor
|
|
Packit |
575503 |
} ifelse } ifelse
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
/PATsg { % dict
|
|
Packit |
575503 |
begin
|
|
Packit |
575503 |
lw setlinewidth
|
|
Packit |
575503 |
lc setlinecap
|
|
Packit |
575503 |
lj setlinejoin
|
|
Packit |
575503 |
ml setmiterlimit
|
|
Packit |
575503 |
ds aload pop setdash
|
|
Packit |
575503 |
cc aload pop setrgbcolor
|
|
Packit |
575503 |
cm setmatrix
|
|
Packit |
575503 |
end
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
|
|
Packit |
575503 |
/PATDict 3 dict def
|
|
Packit |
575503 |
/PATsp {
|
|
Packit |
575503 |
true PATredef
|
|
Packit |
575503 |
PATDict begin
|
|
Packit |
575503 |
/CurrentPattern exch def
|
|
Packit |
575503 |
% If it's an uncolored pattern, save the color
|
|
Packit |
575503 |
CurrentPattern /PaintType get 2 eq {
|
|
Packit |
575503 |
/PColor exch def
|
|
Packit |
575503 |
} if
|
|
Packit |
575503 |
/CColor [ currentrgbcolor ] def
|
|
Packit |
575503 |
end
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
% PATstroke - stroke with the current pattern
|
|
Packit |
575503 |
/PATstroke {
|
|
Packit |
575503 |
countdictstack
|
|
Packit |
575503 |
save
|
|
Packit |
575503 |
mark
|
|
Packit |
575503 |
{
|
|
Packit |
575503 |
currentpoint strokepath moveto
|
|
Packit |
575503 |
PATpcalc % proc nw nh px py
|
|
Packit |
575503 |
clip newpath PATfill
|
|
Packit |
575503 |
} stopped {
|
|
Packit |
575503 |
(*** PATstroke Warning: Path is too complex, stroking
|
|
Packit |
575503 |
with gray) =
|
|
Packit |
575503 |
cleartomark
|
|
Packit |
575503 |
restore
|
|
Packit |
575503 |
countdictstack exch sub dup 0 gt
|
|
Packit |
575503 |
{ { end } repeat } { pop } ifelse
|
|
Packit |
575503 |
gsave 0.5 setgray oldstroke grestore
|
|
Packit |
575503 |
} { pop restore pop } ifelse
|
|
Packit |
575503 |
newpath
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
/PATtcalc { % modmtx tilingtype PATtcalc tilematrix
|
|
Packit |
575503 |
% Note: tiling types 2 and 3 are not supported
|
|
Packit |
575503 |
gsave
|
|
Packit |
575503 |
exch concat % tilingtype
|
|
Packit |
575503 |
matrix currentmatrix exch % cmtx tilingtype
|
|
Packit |
575503 |
% Tiling type 1 and 3: constant spacing
|
|
Packit |
575503 |
2 ne {
|
|
Packit |
575503 |
% Distort the pattern so that it occupies
|
|
Packit |
575503 |
% an integral number of device pixels
|
|
Packit |
575503 |
dup 4 get exch dup 5 get exch % tx ty cmtx
|
|
Packit |
575503 |
XStep 0 dtransform
|
|
Packit |
575503 |
round exch round exch % tx ty cmtx dx.x dx.y
|
|
Packit |
575503 |
XStep div exch XStep div exch % tx ty cmtx a b
|
|
Packit |
575503 |
0 YStep dtransform
|
|
Packit |
575503 |
round exch round exch % tx ty cmtx a b dy.x dy.y
|
|
Packit |
575503 |
YStep div exch YStep div exch % tx ty cmtx a b c d
|
|
Packit |
575503 |
7 -3 roll astore % { a b c d tx ty }
|
|
Packit |
575503 |
} if
|
|
Packit |
575503 |
grestore
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
/PATusp {
|
|
Packit |
575503 |
false PATredef
|
|
Packit |
575503 |
PATDict begin
|
|
Packit |
575503 |
CColor PATsc
|
|
Packit |
575503 |
end
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
|
|
Packit |
575503 |
% right30
|
|
Packit |
575503 |
11 dict begin
|
|
Packit |
575503 |
/PaintType 1 def
|
|
Packit |
575503 |
/PatternType 1 def
|
|
Packit |
575503 |
/TilingType 1 def
|
|
Packit |
575503 |
/BBox [0 0 1 1] def
|
|
Packit |
575503 |
/XStep 1 def
|
|
Packit |
575503 |
/YStep 1 def
|
|
Packit |
575503 |
/PatWidth 1 def
|
|
Packit |
575503 |
/PatHeight 1 def
|
|
Packit |
575503 |
/Multi 2 def
|
|
Packit |
575503 |
/PaintData [
|
|
Packit |
575503 |
{ clippath } bind
|
|
Packit |
575503 |
{ 32 16 true [ 32 0 0 -16 0 16 ]
|
|
Packit |
575503 |
{<00030003000c000c0030003000c000c0030003000c000c00
|
|
Packit |
575503 |
30003000c000c00000030003000c000c0030003000c000c0
|
|
Packit |
575503 |
030003000c000c0030003000c000c000>}
|
|
Packit |
575503 |
imagemask } bind
|
|
Packit |
575503 |
] def
|
|
Packit |
575503 |
/PaintProc {
|
|
Packit |
575503 |
pop
|
|
Packit |
575503 |
exec fill
|
|
Packit |
575503 |
} def
|
|
Packit |
575503 |
currentdict
|
|
Packit |
575503 |
end
|
|
Packit |
575503 |
/P2 exch def
|
|
Packit |
575503 |
|
|
Packit |
575503 |
% crosshatch45
|
|
Packit |
575503 |
11 dict begin
|
|
Packit |
575503 |
/PaintType 1 def
|
|
Packit |
575503 |
/PatternType 1 def
|
|
Packit |
575503 |
/TilingType 1 def
|
|
Packit |
575503 |
/BBox [0 0 1 1] def
|
|
Packit |
575503 |
/XStep 1 def
|
|
Packit |
575503 |
/YStep 1 def
|
|
Packit |
575503 |
/PatWidth 1 def
|
|
Packit |
575503 |
/PatHeight 1 def
|
|
Packit |
575503 |
/Multi 2 def
|
|
Packit |
575503 |
/PaintData [
|
|
Packit |
575503 |
{ clippath } bind
|
|
Packit |
575503 |
{ 20 20 true [ 20 0 0 -20 0 20 ]
|
|
Packit |
575503 |
{<8020004050102088201104400a02800401000a02
|
|
Packit |
575503 |
8011044020882040501080200040501020882011
|
|
Packit |
575503 |
04400a02800401000a0280110440208820405010>}
|
|
Packit |
575503 |
imagemask } bind
|
|
Packit |
575503 |
] def
|
|
Packit |
575503 |
/PaintProc {
|
|
Packit |
575503 |
pop
|
|
Packit |
575503 |
exec fill
|
|
Packit |
575503 |
} def
|
|
Packit |
575503 |
currentdict
|
|
Packit |
575503 |
end
|
|
Packit |
575503 |
/P6 exch def
|
|
Packit |
575503 |
|
|
Packit |
575503 |
/cp {closepath} bind def
|
|
Packit |
575503 |
/ef {eofill} bind def
|
|
Packit |
575503 |
/gr {grestore} bind def
|
|
Packit |
575503 |
/gs {gsave} bind def
|
|
Packit |
575503 |
/sa {save} bind def
|
|
Packit |
575503 |
/rs {restore} bind def
|
|
Packit |
575503 |
/l {lineto} bind def
|
|
Packit |
575503 |
/m {moveto} bind def
|
|
Packit |
575503 |
/rm {rmoveto} bind def
|
|
Packit |
575503 |
/n {newpath} bind def
|
|
Packit |
575503 |
/s {stroke} bind def
|
|
Packit |
575503 |
/sh {show} bind def
|
|
Packit |
575503 |
/slc {setlinecap} bind def
|
|
Packit |
575503 |
/slj {setlinejoin} bind def
|
|
Packit |
575503 |
/slw {setlinewidth} bind def
|
|
Packit |
575503 |
/srgb {setrgbcolor} bind def
|
|
Packit |
575503 |
/rot {rotate} bind def
|
|
Packit |
575503 |
/sc {scale} bind def
|
|
Packit |
575503 |
/sd {setdash} bind def
|
|
Packit |
575503 |
/ff {findfont} bind def
|
|
Packit |
575503 |
/sf {setfont} bind def
|
|
Packit |
575503 |
/scf {scalefont} bind def
|
|
Packit |
575503 |
/sw {stringwidth} bind def
|
|
Packit |
575503 |
/tr {translate} bind def
|
|
Packit |
575503 |
/tnt {dup dup currentrgbcolor
|
|
Packit |
575503 |
4 -2 roll dup 1 exch sub 3 -1 roll mul add
|
|
Packit |
575503 |
4 -2 roll dup 1 exch sub 3 -1 roll mul add
|
|
Packit |
575503 |
4 -2 roll dup 1 exch sub 3 -1 roll mul add srgb}
|
|
Packit |
575503 |
bind def
|
|
Packit |
575503 |
/shd {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul
|
|
Packit |
575503 |
4 -2 roll mul srgb} bind def
|
|
Packit |
575503 |
/$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def
|
|
Packit |
575503 |
/$F2psEnd {$F2psEnteredState restore end} def
|
|
Packit |
575503 |
|
|
Packit |
575503 |
/pageheader {
|
|
Packit |
575503 |
save
|
|
Packit |
575503 |
newpath 0 179 moveto 0 0 lineto 363 0 lineto 363 179 lineto closepath clip newpath
|
|
Packit |
575503 |
-194.8 350.2 translate
|
|
Packit |
575503 |
1 -1 scale
|
|
Packit |
575503 |
$F2psBegin
|
|
Packit |
575503 |
10 setmiterlimit
|
|
Packit |
575503 |
0 slj 0 slc
|
|
Packit |
575503 |
0.06299 0.06299 sc
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
/pagefooter {
|
|
Packit |
575503 |
$F2psEnd
|
|
Packit |
575503 |
restore
|
|
Packit |
575503 |
} bind def
|
|
Packit |
575503 |
%%EndProlog
|
|
Packit |
575503 |
pageheader
|
|
Packit |
575503 |
%
|
|
Packit |
575503 |
% Fig objects follow
|
|
Packit |
575503 |
%
|
|
Packit |
575503 |
%
|
|
Packit |
575503 |
% here starts figure with depth 50
|
|
Packit |
575503 |
% Arc
|
|
Packit |
575503 |
7.500 slw
|
|
Packit |
575503 |
0 slc
|
|
Packit |
575503 |
gs clippath
|
|
Packit |
575503 |
3662 4014 m 3567 4132 l 3613 4170 l 3708 4052 l 3708 4052 l 3610 4127 l 3662 4014 l cp
|
|
Packit |
575503 |
eoclip
|
|
Packit |
575503 |
n 5895.0 5917.5 2902.8 -37.7581 -142.2419 arcn
|
|
Packit |
575503 |
gs col0 s gr
|
|
Packit |
575503 |
gr
|
|
Packit |
575503 |
|
|
Packit |
575503 |
% arrowhead
|
|
Packit |
575503 |
0 slj
|
|
Packit |
575503 |
n 3662 4014 m 3610 4127 l 3708 4052 l 3662 4014 l cp gs 0.00 setgray ef gr col0 s
|
|
Packit |
575503 |
% Polyline
|
|
Packit |
575503 |
n 3105 4140 m 6660 4140 l 6660 5085 l 3105 5085 l
|
|
Packit |
575503 |
cp gs col0 s gr
|
|
Packit |
575503 |
% Polyline
|
|
Packit |
575503 |
n 6660 4140 m 8730 4140 l 8730 5085 l 6660 5085 l
|
|
Packit |
575503 |
cp gs col7 0.50 shd ef gr gs col0 s gr
|
|
Packit |
575503 |
% Polyline
|
|
Packit |
575503 |
n 3510 4140 m 3780 4140 l 3780 5085 l 3510 5085 l
|
|
Packit |
575503 |
cp gs /PC [[1.00 1.00 1.00] [0.00 0.00 0.00]] def
|
|
Packit |
575503 |
15.00 15.00 sc P2 [16 0 0 -8 234.00 276.00] PATmp PATsp ef gr PATusp gs col0 s gr
|
|
Packit |
575503 |
% Polyline
|
|
Packit |
575503 |
n 4365 4140 m 4635 4140 l 4635 5085 l 4365 5085 l
|
|
Packit |
575503 |
cp gs /PC [[1.00 1.00 1.00] [0.00 0.00 0.00]] def
|
|
Packit |
575503 |
15.00 15.00 sc P2 [16 0 0 -8 291.00 276.00] PATmp PATsp ef gr PATusp gs col0 s gr
|
|
Packit |
575503 |
% Polyline
|
|
Packit |
575503 |
n 4905 4140 m 5265 4140 l 5265 5085 l 4905 5085 l
|
|
Packit |
575503 |
cp gs /PC [[1.00 1.00 1.00] [0.00 0.00 0.00]] def
|
|
Packit |
575503 |
15.00 15.00 sc P2 [16 0 0 -8 327.00 276.00] PATmp PATsp ef gr PATusp gs col0 s gr
|
|
Packit |
575503 |
% Polyline
|
|
Packit |
575503 |
n 7965 4140 m 8370 4140 l 8370 5085 l 7965 5085 l
|
|
Packit |
575503 |
cp gs /PC [[1.00 1.00 1.00] [0.00 0.00 0.00]] def
|
|
Packit |
575503 |
15.00 15.00 sc P6 [16 0 0 -16 531.00 276.00] PATmp PATsp ef gr PATusp gs col0 s gr
|
|
Packit |
575503 |
/Times-Roman ff 180.00 scf sf
|
|
Packit |
575503 |
3510 5490 m
|
|
Packit |
575503 |
gs 1 -1 sc (gawk Main Program Address Space) col0 sh gr
|
|
Packit |
575503 |
/Times-Roman ff 180.00 scf sf
|
|
Packit |
575503 |
7290 5490 m
|
|
Packit |
575503 |
gs 1 -1 sc (Extension) col0 sh gr
|
|
Packit |
575503 |
/Courier-Bold ff 180.00 scf sf
|
|
Packit |
575503 |
3420 2880 m
|
|
Packit |
575503 |
gs 1 -1 sc (register_ext_func\({ "chdir", do_chdir, 1 }\);) col0 sh gr
|
|
Packit |
575503 |
% here ends figure;
|
|
Packit |
575503 |
pagefooter
|
|
Packit |
575503 |
showpage
|
|
Packit |
575503 |
%%Trailer
|
|
Packit |
575503 |
end
|
|
Packit |
575503 |
%EOF
|