%EXMSIM     Plot simulations generated by example.f90.  See details about
%           model economy in Fortran code.

%           Ellen McGrattan, 3-3-03

load example.dat

s      = example(:,1);
n      = length(s);
t0     = 1;
t1     = t0-1+n;
t      = [t0:t1]';

state  = example(:,1);
k      = example(:,2);
kf     = example(:,3);
cp     = example(:,4);
hr     = example(:,5);
ip     = example(:,6);
gnp    = example(:,7);
w      = example(:,8);
r      = example(:,9);
g      = example(:,10);
taup   = example(:,11);
taud   = example(:,12);
taux   = example(:,13);
z      = example(:,14);
v      = example(:,15);
d      = example(:,16);
v0     = (1-taud).*(1-taux).*kf;

figure(1), plot(t,v,t,v0,'r-')
legend('v','(1-taud)(1-taux)*k')

