stepan
/
dynare
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Merge branch 'cmr_steady_issue_2' into 'master' 

evaluate_steady_state_file.m: Remove redundant setting of auxiliary variables

Closes #1175

See merge request Dynare/dynare!1635
time-shift
Sébastien Villemot 2018-11-16 14:28:23 +00:00
parent 3b69635200 4ecbcbb136
commit 7cbd3ecbf7
1 changed files with 0 additions and 40 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

40
matlab/evaluate_steady_state_file.m
View File

@ -36,8 +36,6 @@ function [ys,params,info] = evaluate_steady_state_file(ys_init,exo_ss,M,options,
% You should have received a copy of the GNU General Public License
% along with Dynare. If not, see <http://www.gnu.org/licenses/>.
debug = false;
ys = [];
params = M.params;
info = 0;
@ -102,49 +100,11 @@ end
% adding values for auxiliary variables
if length(M.aux_vars) > 0 && ~options.ramsey_policy
if debug
ys0 = ys;
end
if M.set_auxiliary_variables
ys = h_set_auxiliary_variables(ys,exo_ss,params);
end
if debug
ys1 = ys;
end
if M.set_auxiliary_variables
ys = h_set_auxiliary_variables(ys,exo_ss,params);
end
if debug
ys2 = ys;
end
if debug
if M.set_auxiliary_variables
ys = h_set_auxiliary_variables(ys,exo_ss,params);
end
ys3 = ys;
idx = find(abs(ys0-ys1(1:M.orig_endo_nbr))>0);
if ~isempty(idx)
M.endo_names{idx}
else
disp('1-invariant')
end
idx = find(abs(ys2-ys1)>0);
if ~isempty(idx)
M.endo_names{idx}
else
disp('2-invariant')
end
idx = find(abs(ys3-ys2)>0);
if ~isempty(idx)
M.endo_names{idx}
else
disp('3-invariant')
end
pause
end
end
check1 = 0;
if steady_state_checkflag
% Check whether the steady state obtained from the _steadystate file is a steady state.
[residuals, check] = evaluate_static_model(ys, exo_ss, params, M, options);