source: anuga_work/publications/anuga_2007/step-five.eps @ 7077

%!PS-Adobe-2.0 EPSF-2.0
%%Title: step-five.fig
%%Creator: fig2dev Version 3.2 Patchlevel 4
%%CreationDate: Fri Aug 18 17:13:42 2006
%%For: roberts@Bruise (Steve Roberts,U-MSI\roberts,S-1-5-21-1909104706-1050357574-801553562-1139)
%%BoundingBox: 0 0 198 144
%%Magnification: 1.0000
%%EndComments
/$F2psDict 200 dict def
$F2psDict begin
$F2psDict /mtrx matrix put
/col-1 {0 setgray} bind def
/col0 {0.000 0.000 0.000 srgb} bind def
/col1 {0.000 0.000 1.000 srgb} bind def
/col2 {0.000 1.000 0.000 srgb} bind def
/col3 {0.000 1.000 1.000 srgb} bind def
/col4 {1.000 0.000 0.000 srgb} bind def
/col5 {1.000 0.000 1.000 srgb} bind def
/col6 {1.000 1.000 0.000 srgb} bind def
/col7 {1.000 1.000 1.000 srgb} bind def
/col8 {0.000 0.000 0.560 srgb} bind def
/col9 {0.000 0.000 0.690 srgb} bind def
/col10 {0.000 0.000 0.820 srgb} bind def
/col11 {0.530 0.810 1.000 srgb} bind def
/col12 {0.000 0.560 0.000 srgb} bind def
/col13 {0.000 0.690 0.000 srgb} bind def
/col14 {0.000 0.820 0.000 srgb} bind def
/col15 {0.000 0.560 0.560 srgb} bind def
/col16 {0.000 0.690 0.690 srgb} bind def
/col17 {0.000 0.820 0.820 srgb} bind def
/col18 {0.560 0.000 0.000 srgb} bind def
/col19 {0.690 0.000 0.000 srgb} bind def
/col20 {0.820 0.000 0.000 srgb} bind def
/col21 {0.560 0.000 0.560 srgb} bind def
/col22 {0.690 0.000 0.690 srgb} bind def
/col23 {0.820 0.000 0.820 srgb} bind def
/col24 {0.500 0.190 0.000 srgb} bind def
/col25 {0.630 0.250 0.000 srgb} bind def
/col26 {0.750 0.380 0.000 srgb} bind def
/col27 {1.000 0.500 0.500 srgb} bind def
/col28 {1.000 0.630 0.630 srgb} bind def
/col29 {1.000 0.750 0.750 srgb} bind def
/col30 {1.000 0.880 0.880 srgb} bind def
/col31 {1.000 0.840 0.000 srgb} bind def

end
save
newpath 0 144 moveto 0 0 lineto 198 0 lineto 198 144 lineto closepath clip newpath
-101.3 258.7 translate
1 -1 scale

/cp {closepath} bind def
/ef {eofill} bind def
/gr {grestore} bind def
/gs {gsave} bind def
/sa {save} bind def
/rs {restore} bind def
/l {lineto} bind def
/m {moveto} bind def
/rm {rmoveto} bind def
/n {newpath} bind def
/s {stroke} bind def
/sh {show} bind def
/slc {setlinecap} bind def
/slj {setlinejoin} bind def
/slw {setlinewidth} bind def
/srgb {setrgbcolor} bind def
/rot {rotate} bind def
/sc {scale} bind def
/sd {setdash} bind def
/ff {findfont} bind def
/sf {setfont} bind def
/scf {scalefont} bind def
/sw {stringwidth} bind def
/tr {translate} bind def
/tnt {dup dup currentrgbcolor
  4 -2 roll dup 1 exch sub 3 -1 roll mul add
  4 -2 roll dup 1 exch sub 3 -1 roll mul add
  4 -2 roll dup 1 exch sub 3 -1 roll mul add srgb}
  bind def
/shd {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul
  4 -2 roll mul srgb} bind def
 /DrawEllipse {
        /endangle exch def
        /startangle exch def
        /yrad exch def
        /xrad exch def
        /y exch def
        /x exch def
        /savematrix mtrx currentmatrix def
        x y tr xrad yrad sc 0 0 1 startangle endangle arc
        closepath
        savematrix setmatrix
        } def

/$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def
/$F2psEnd {$F2psEnteredState restore end} def

$F2psBegin
10 setmiterlimit
0 slj 0 slc
 0.06299 0.06299 sc
%
% Fig objects follow
%
% 
% here starts figure with depth 50
% Polyline
7.500 slw
n 2340 3870 m
 3285 4095 l gs col0 s gr 
% Ellipse
n 3330 2700 45 45 0 360 DrawEllipse gs col1 1.00 shd ef gr gs col0 s gr

% Ellipse
n 3960 2250 45 45 0 360 DrawEllipse gs col1 1.00 shd ef gr gs col0 s gr

% Ellipse
n 2160 2790 45 45 0 360 DrawEllipse gs col1 1.00 shd ef gr gs col0 s gr

% Ellipse
n 2295 3330 45 45 0 360 DrawEllipse gs col1 1.00 shd ef gr gs col0 s gr

% Ellipse
n 2835 3600 45 45 0 360 DrawEllipse gs col1 1.00 shd ef gr gs col0 s gr

% Ellipse
n 3375 3330 45 45 0 360 DrawEllipse gs col1 1.00 shd ef gr gs col0 s gr

% Ellipse
n 3960 3600 45 45 0 360 DrawEllipse gs col1 1.00 shd ef gr gs col0 s gr

% Ellipse
n 4365 2880 45 45 0 360 DrawEllipse gs col1 1.00 shd ef gr gs col0 s gr

% Polyline
n 1980 2340 m 3150 2115 l
 2880 3060 l gs col0 s gr 
% Polyline
n 2880 3060 m 3285 4095 l
 3960 2835 l gs col0 s gr 
% Polyline
n 3150 2115 m 4725 1845 l
 3960 2835 l gs col0 s gr 
% Polyline
n 3960 2835 m 4545 4095 l
 4725 1845 l gs col0 s gr 
% Polyline
n 3285 4095 m
 4545 4095 l gs col0 s gr 
% Polyline
n 1620 3060 m 2340 3870 l
 2880 3060 l gs col0 s gr 
% Polyline
n 1980 2340 m 2880 3060 l 1620 3060 l
 1980 2340 l  cp gs col0 s gr 
% Polyline
n 3150 2115 m 3960 2835 l
 2880 3060 l gs col0 s gr 
% Ellipse
n 2655 2520 45 45 0 360 DrawEllipse gs col1 1.00 shd ef gr gs col0 s gr

% here ends figure;
$F2psEnd
rs
showpage