% this is file pressflowplots.m   
% It plots pressures and flows in subwindows of the graphics
% must be called after setup.m has been run

subplot(2,1,1)
 plot(Time,Ap,'b-',Time,Vp,'r-');
 grid on 
 ylabel('Pressure')
 title('Blue: Aortic  Red: Ventricular')
 axis([min(Time) max(Time) min(min(Ap), min(Vp)) max(max(Ap), max(Vp))])
 
subplot(2,1,2)
 plot(Time,Af,'b-');
 grid on 
 ylabel('Flow in ml/min')
 xlabel('time (sec)')
 title('Aortic Flow')
 axis([min(Time) max(Time) min(Af) max(Af)])