Fixed bug in steady state check (issue with mean preserving spread corrections).

time-shift
Stéphane Adjemian (Charybdis) 2012-06-01 18:28:13 +02:00
parent 3cbd702b3e
commit a341a4f8a3
1 changed files with 6 additions and 9 deletions

View File

@ -36,28 +36,25 @@ if nargin && ischar(junk)
tagname = junk;
end
tags = M_.equations_tags;
istag = 0;
if length(tags)
istag = 1;
end
steady_state_old = oo_.steady_state;
info = 0;
if options_.steadystate_flag
[oo_.steady_state,M.params,info] = ...
evaluate_steady_state(oo_.steady_state,M_,options_,oo_,0);
end
% Keep of a copy of M_.Sigma_e
Sigma_e = M_.Sigma_e;
% Set M_.Sigma_e=0 (we evaluate the *deterministic* static model)
M_.Sigma_e = zeros(size(Sigma_e));
info = 0;
if options_.steadystate_flag
[oo_.steady_state,M.params,info] = ...
evaluate_steady_state(oo_.steady_state,M_,options_,oo_,0);
end
% Compute the residuals
if options_.block && ~options_.bytecode
@ -120,4 +117,4 @@ if info(1)
end
oo_.steady_state = steady_state_old;
oo_.steady_state = steady_state_old;