diff --git a/matlab/dr1.m b/matlab/dr1.m index c6f2f3c72..eb6c0f821 100644 --- a/matlab/dr1.m +++ b/matlab/dr1.m @@ -1,4 +1,4 @@ -function [dr,info,options_,oo_] = dr1(dr,task,M_,options_,oo_) +function [dr,info] = dr1(dr,task,M_,options_,oo_) % function [dr,info,M_,options_,oo_] = dr1(dr,task,M_,options_,oo_) % computes the reduced form solution of a rational expectation model (first or second order % approximation of the stochastic model around the deterministic steady state). @@ -21,8 +21,6 @@ function [dr,info,options_,oo_] = dr1(dr,task,M_,options_,oo_) % indeterminacy. % info=5: BK rank condition not satisfied. % info=6: The jacobian matrix evaluated at the steady state is complex. -% options_ [matlab structure] -% oo_ [matlab structure] % % ALGORITHM % ... @@ -70,20 +68,12 @@ iyv = iyv(:); iyr0 = find(iyv) ; it_ = M_.maximum_lag + 1 ; -if M_.exo_nbr == 0 - oo_.exo_steady_state = [] ; -end - klen = M_.maximum_lag + M_.maximum_lead + 1; iyv = lead_lag_incidence'; iyv = iyv(:); iyr0 = find(iyv) ; it_ = M_.maximum_lag + 1 ; -if M_.exo_nbr == 0 - oo_.exo_steady_state = [] ; -end - it_ = M_.maximum_lag + 1; z = repmat(dr.ys,1,klen); if ~options_.bytecode diff --git a/matlab/resol.m b/matlab/resol.m index 8c3b2d12e..1d8fe67f0 100644 --- a/matlab/resol.m +++ b/matlab/resol.m @@ -114,7 +114,7 @@ end if options.block [dr,info,M,options,oo] = dr_block(dr,check_flag,M,options,oo); else - [dr,info,options,oo] = dr1(dr,check_flag,M,options,oo); + [dr,info] = dr1(dr,check_flag,M,options,oo); end if info(1)