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

Fixes issue #1607.

time-shift
Stéphane Adjemian(Charybdis) 2018-05-05 10:29:37 +02:00
parent 891e3ba7be
commit fa67aeb7a6
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
matlab/dyn_first_order_solver.m
View File

@ -204,13 +204,12 @@ else
nba = nd-sdim;
if task == 1
if task==1
if rcond(w(npred+nboth+1:end,npred+nboth+1:end)) < 1e-9
dr.full_rank = 0;
else
dr.full_rank = 1;
end
return
end
if nba ~= nsfwrd
@ -225,8 +224,11 @@ else
info(2) = temp'*temp;
return
end
if task==1, return, end
%First order approximation
indx_stable_root = 1: (nd - nsfwrd); %=> index of stable roots
indx_stable_root = 1: (nd - nsfwrd); %=> index of stable roots
indx_explosive_root = npred + nboth + 1:nd; %=> index of explosive roots
% derivatives with respect to dynamic state variables
% forward variables