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