DynareでNew IS-LMモデル

　Dynareお勉強メモの一貫ということで、New IS-LMモデルを作成してみました。各モデル式は以下のとおり。金利ルールに利上げショックを与えることでシミュレーションを行っています。

New IS-LMモデル

$y_t = E_t y_{t+1} - {1 \over \theta}(i_t - E_t\pi_{t+1})$
$\pi_t = E_t\pi_{t+1} + {\rho^2 (\lambda + \theta) \over 1 - \rho} y_t$
$i_t = q_1 y_t + q_2 y_t + \xi_t$
$\xi_{t+1} = \phi\xi_t + \epsilon_{t+1}$
$y_t$ :GDPギャップ、 $i_t$ :名目金利、 $\pi_t$ :物価上昇率、その他はパラメータ

New IS-LMモデルの.modファイル

//New IS-LM MODEL 加藤（2006）p75,p78
//Copyright?? econ-econome

//Endogenous variables
var y i pai rda;

//Exogenous variables
varexo e;

//Parameters
parameters sigma rho ramda fhai q1 q2;

sigma = 1.5;
rho = 0.7;
ramda = 2;
fhai = 0.8;
q1 = 0.4;
q2 = 1.2;

model(linear);
y = y(+1)-sigma*(i-pai(+1)); // NEW IS curve
pai =pai(+1)+((rho^2*(1+(1/sigma)))/(1-rho))*y; // NEW Keyinsian Phillips curve
i = q1*y+q2*pai+rda; // interest policy rule
rda =fhai*rda(-1)+e; // ramdam shock
end;

initval;
y = 0;
pai =0;
i=0;
rda =0;
end;

//steady;

// Shocks
// in case of stochastic simulation
shocks;
var e = 0.04;
end;

// in case of stochastic simulation
check;
stoch_simul(irf=25) y i pai;

金利ショックe=0.04の場合のインパルスレスポンスは以下のとおり。

New IS-LMモデル

（kmoriさんからご教示頂いたTeX記法で記載してみました。）