Remove unused steadystate_partial option and related inline function restricted_steadystate.m

kalman-mex
Johannes Pfeifer 2023-09-18 21:28:43 +02:00 committed by Sébastien Villemot
parent bf7ac27fd7
commit 6d8927775b
No known key found for this signature in database
GPG Key ID: 2CECE9350ECEBE4A
3 changed files with 1 additions and 20 deletions

View File

@ -205,7 +205,6 @@ options_mom_.solve_tolx = options_.solve_tolx;
options_mom_.steady = options_.steady;
options_mom_.steadystate = options_.steadystate;
options_mom_.steadystate_flag = options_.steadystate_flag;
%options_mom_.steadystate_partial
options_mom_.threads = options_.threads; % needed by resol
options_mom_.debug = options_.debug; % debug option needed by some functions, e.g. check_plot

View File

@ -89,7 +89,6 @@ elseif exist([M_.fname '_steadystate.m'],'file')
else
options_.steadystate_flag = 0;
end
options_.steadystate_partial = [];
options_.steadystate.nocheck = false;
% subset of the estimated deep parameters

View File

@ -114,21 +114,4 @@ if steady_state_checkflag
info(1) = 22;
return
end
elseif ~isempty(options.steadystate_partial)
ssvar = options.steadystate_partial.ssvar;
nov = length(ssvar);
indv = zeros(nov,1);
for i = 1:nov
indv(i) = strmatch(ssvar(i), M.endo_names, 'exact');
end
ys = dynare_solve(@restricted_steadystate, ys(indv), options.steady.maxit, options.dynatol.f, options.dynatol.x, options, exo_ss, indv);
end
function [sR,sG] = restricted_steadystate(y,x,indx)
global options_ M_ oo_
inde = options_.steadystate_partial.sseqn;
ss = oo_.steady_state;
ss(indx) = y;
[R,G] = feval([M_.fname '.static'], ss, x, M_.params);
sR = R(inde);
sG = G(inde,indx);
end