Commit 27ef4a84 authored by MichelJuillard's avatar MichelJuillard
Browse files

removing options_ and oo_ from dr1.m output arguments

parent 108444b7
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
......
......@@ -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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment