A Cardiovascular Simulator for Research 1.0.0

File: <base>/doc/epsfig/rc.eps (5,131 bytes)
%!PS-Adobe-2.0 EPSF-2.0
%%Title: rc.eps
%%Creator: fig2dev Version 3.2.3 Patchlevel 
%%CreationDate: Sat Oct 14 16:33:44 2000
%%For: rmukkama@cvsim.mit.edu (Ramakrishna Mukkamala,,E25-505,85406,)
%%BoundingBox: 0 0 169 123
%%Magnification: 0.4000
%%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 123 moveto 0 0 lineto 169 0 lineto 169 123 lineto closepath clip newpath
% Fill background color
0 0 moveto 169 0 lineto 169 123 lineto 0 123 lineto
closepath 1.00 1.00 1.00 setrgbcolor fill

-38.0 126.0 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
%%Page: 1 1
10 setmiterlimit
 0.02400 0.02400 sc
/Times-Roman ff 360.00 scf sf
4725 2100 m
gs 1 -1 sc (R) col-1 sh gr
/Times-Roman ff 300.00 scf sf
5025 2175 m
gs 1 -1 sc (air) col-1 sh gr
/Times-Roman ff 300.00 scf sf
2400 4800 m
gs 1 -1 sc (th) col-1 sh gr
/Times-Roman ff 360.00 scf sf
2175 4725 m
gs 1 -1 sc (P   \(t\)) col-1 sh gr
/Times-Roman ff 300.00 scf sf
2250 2625 m
gs 1 -1 sc (atm) col-1 sh gr
/Times-Roman ff 360.00 scf sf
2025 2550 m
gs 1 -1 sc (P     \(t\)) col-1 sh gr
/Times-Roman ff 360.00 scf sf
7650 3525 m
gs 1 -1 sc (C) col-1 sh gr
/Times-Roman ff 300.00 scf sf
7950 3600 m
gs 1 -1 sc (lu) col-1 sh gr
/Times-Roman ff 300.00 scf sf
6975 2325 m
gs 1 -1 sc (alv) col-1 sh gr
/Times-Roman ff 360.00 scf sf
6750 2250 m
gs 1 -1 sc (P    \(t\)) col-1 sh gr
7.500 slw
% Ellipse
n 3225 2475 75 75 0 360 DrawEllipse gs col-1 s gr

% Ellipse
n 3225 4575 75 75 0 360 DrawEllipse gs col-1 s gr

% Polyline
gs  clippath
6165 1530 m 6165 1470 l 6013 1470 l 6133 1500 l 6013 1530 l cp
eoclip
n 3900 1500 m
 6150 1500 l gs col-1 s gr gr

% arrowhead
n 6013 1530 m 6133 1500 l 6013 1470 l  col-1 s
% Polyline
n 3300 2475 m
 4500 2475 l gs col-1 s gr 
% Polyline
n 4500 2475 m 4650 2325 l 4800 2625 l 4950 2325 l 5100 2625 l 5250 2325 l
 5400 2625 l 5550 2475 l
 6600 2475 l gs col-1 s gr 
% Polyline
n 6600 2475 m 7200 2475 l
 7200 3075 l gs col-1 s gr 
% Polyline
n 7200 3825 m
 7200 4275 l gs col-1 s gr 
% Polyline
n 7200 4275 m
 7200 4575 l gs col-1 s gr 
% Polyline
n 6900 3375 m
 7500 3375 l gs col-1 s gr 
% Polyline
n 6900 3525 m
 7500 3525 l gs col-1 s gr 
% Polyline
n 7200 3075 m
 7200 3375 l gs col-1 s gr 
% Polyline
n 7200 3525 m
 7200 3825 l gs col-1 s gr 
% Polyline
n 3300 4575 m
 7200 4575 l gs col-1 s gr 
% Polyline
15.000 slw
n 4575 1050 m
 5625 1050 l gs col-1 s gr 
/Times-Roman ff 300.00 scf sf
5100 975 m
gs 1 -1 sc (lu) col-1 sh gr
/Times-Roman ff 360.00 scf sf
4950 1350 m
gs 1 -1 sc (dt) col-1 sh gr
/Times-Roman ff 360.00 scf sf
4575 900 m
gs 1 -1 sc (dQ    \(t\)) col-1 sh gr
$F2psEnd
rs