Shock in money supply
Posted: Fri Nov 19, 2010 10:29 am
Dear all,
I am just doing my first steps in Dynare. I have a system comprising of a new keynesian phillips curve, an aggregate demand and a money demand. I estimated this system in some econometric software and I want to solve it in Dynare and shock money permanently. Now any such model will predict that the price level in the end of the period will have an equiproportional increase with the money shock (i.e. if a 10% increase in money is introduced the price level jumps up by 10%). I get all other results-responses fine but not this one. Below I write my module. Any thoughts? Warmest thanks in advance.
var p, y, tbill;
varexo yp, m1, unkpc, uad, umd;
parameters c1, c2, c3, c4, c5, c6, c7, c8, c9;
c1 = 0.4252097;
c2 = 0.5506059;
c3 = 0.0035550;
c4 = 0.0024613;
c5 = -0.3728166;
c6 = -0.0292797;
c7 = 0.0394045;
c8 = 0.5395523;
c9 = 0.1652910;
model;
p = p(-4)+c1*(p(+1)-p(-3))+c2*(p(-1)-p(-5))+c3*(y-yp)+unkpc;
y = c4+y(+1) + c5*tbill-c5*(0.435748*(p(+1)-p(-3))+0.564252*(p(-1)-p(-5)))+uad;
m1 = p+m1(-1)+p(-1)+c6*(m1(-1)-p(-1)+1.996070-0.490928*y(-1))+c7*tbill(-1)+c8*(m1(-1)-p(-1)-m1(-2)+p(-2))+c9*(m1(-2)-p(-2)-m1(-3)+p(-3))+umd;
end;
initval;
p = 4.058371902;
y = 8.731896101;
tbill = 0.09516666667;
yp = 8.656415858;
m1 = 6.245129422;
unkpc = -0.00010429110196597;
uad = -0.00125188907392726;
umd = -0.0119632003673317;
end;
steady;
endval;
p = 4.058371902;
y = 8.731896101;
tbill = 0.09516666667;
yp = 8.656415858;
m1 = 6.255129422;
unkpc = -0.00010429110196597;
uad = -0.00125188907392726;
umd = -0.0119632003673317;
end;
steady;
shocks;
var m1 = 0.01;
end;
stoch_simul(periods=2000);
I am just doing my first steps in Dynare. I have a system comprising of a new keynesian phillips curve, an aggregate demand and a money demand. I estimated this system in some econometric software and I want to solve it in Dynare and shock money permanently. Now any such model will predict that the price level in the end of the period will have an equiproportional increase with the money shock (i.e. if a 10% increase in money is introduced the price level jumps up by 10%). I get all other results-responses fine but not this one. Below I write my module. Any thoughts? Warmest thanks in advance.
var p, y, tbill;
varexo yp, m1, unkpc, uad, umd;
parameters c1, c2, c3, c4, c5, c6, c7, c8, c9;
c1 = 0.4252097;
c2 = 0.5506059;
c3 = 0.0035550;
c4 = 0.0024613;
c5 = -0.3728166;
c6 = -0.0292797;
c7 = 0.0394045;
c8 = 0.5395523;
c9 = 0.1652910;
model;
p = p(-4)+c1*(p(+1)-p(-3))+c2*(p(-1)-p(-5))+c3*(y-yp)+unkpc;
y = c4+y(+1) + c5*tbill-c5*(0.435748*(p(+1)-p(-3))+0.564252*(p(-1)-p(-5)))+uad;
m1 = p+m1(-1)+p(-1)+c6*(m1(-1)-p(-1)+1.996070-0.490928*y(-1))+c7*tbill(-1)+c8*(m1(-1)-p(-1)-m1(-2)+p(-2))+c9*(m1(-2)-p(-2)-m1(-3)+p(-3))+umd;
end;
initval;
p = 4.058371902;
y = 8.731896101;
tbill = 0.09516666667;
yp = 8.656415858;
m1 = 6.245129422;
unkpc = -0.00010429110196597;
uad = -0.00125188907392726;
umd = -0.0119632003673317;
end;
steady;
endval;
p = 4.058371902;
y = 8.731896101;
tbill = 0.09516666667;
yp = 8.656415858;
m1 = 6.255129422;
unkpc = -0.00010429110196597;
uad = -0.00125188907392726;
umd = -0.0119632003673317;
end;
steady;
shocks;
var m1 = 0.01;
end;
stoch_simul(periods=2000);