Update unit test by adding also auxiliary variables on exogenous variables
parent
38a0941d69
commit
3d6af995bc
|
@ -5,7 +5,7 @@
|
||||||
* MONFISPOL FP7 project SSH-225149, Deliverable 1.1.2
|
* MONFISPOL FP7 project SSH-225149, Deliverable 1.1.2
|
||||||
*/
|
*/
|
||||||
|
|
||||||
var pai, c, n, r, a, junk_backward,junk_forward,junk_expectation;
|
var pai, c, n, r, a, junk_endo_backward,junk_endo_forward,junk_expectation,junk_exo_backward,junk_exo_forward;
|
||||||
varexo u;
|
varexo u;
|
||||||
parameters beta, rho, epsilon, omega, phi, gamma;
|
parameters beta, rho, epsilon, omega, phi, gamma;
|
||||||
|
|
||||||
|
@ -20,9 +20,11 @@ model;
|
||||||
a = rho*a(-1)+u;
|
a = rho*a(-1)+u;
|
||||||
1/c = beta*r/(c(+1)*pai(+1));
|
1/c = beta*r/(c(+1)*pai(+1));
|
||||||
pai*(pai-1)/c = beta*pai(+1)*(pai(+1)-1)/c(+1)+epsilon*phi*n^(gamma+1)/omega -exp(a)*n*(epsilon-1)/(omega*c);
|
pai*(pai-1)/c = beta*pai(+1)*(pai(+1)-1)/c(+1)+epsilon*phi*n^(gamma+1)/omega -exp(a)*n*(epsilon-1)/(omega*c);
|
||||||
junk_backward=c(+2);
|
junk_endo_backward=c(+2);
|
||||||
junk_forward=c(-2);
|
junk_endo_forward=c(-2);
|
||||||
junk_expectation=EXPECTATION(-1)(c(+1));
|
junk_expectation=EXPECTATION(-1)(c(+1));
|
||||||
|
junk_exo_backward=u(-2);
|
||||||
|
junk_exo_forward=u(+2);
|
||||||
exp(a)*n = c+(omega/2)*(pai-1)^2;
|
exp(a)*n = c+(omega/2)*(pai-1)^2;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
@ -35,9 +37,11 @@ a = 0;
|
||||||
pai = beta*r;
|
pai = beta*r;
|
||||||
c = find_c(0.96,pai,beta,epsilon,phi,gamma,omega);
|
c = find_c(0.96,pai,beta,epsilon,phi,gamma,omega);
|
||||||
n = c+(omega/2)*(pai-1)^2;
|
n = c+(omega/2)*(pai-1)^2;
|
||||||
junk_backward=c;
|
junk_endo_backward=c;
|
||||||
junk_forward=c;
|
junk_endo_forward=c;
|
||||||
junk_expectation=c;
|
junk_expectation=c;
|
||||||
|
junk_exo_backward=0;
|
||||||
|
junk_exo_forward=0;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
shocks;
|
shocks;
|
||||||
|
|
Loading…
Reference in New Issue