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

Merge pull request #724 from FerhatMihoubi/fix-dr_block 

Correct the test on the number of eigenvalues
time-shift
MichelJuillard 2014-09-11 20:19:58 +02:00
parent 576ed55dda beee1d2f82
commit bde4bb8232
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
matlab/dr_block.m
View File

@ -463,17 +463,17 @@ for i = 1:Size;
%First order approximation
if task ~= 1
if nba ~= nyf
sorted_roots = sort(abs(dr.eigval));
if isfield(options_,'indeterminacy_continuity')
if options_.indeterminacy_msv == 1
[ss,tt,w,q] = qz(e',d');
[ss,tt,w,q] = qz(E',D');
[ss,tt,w,junk] = reorder(ss,tt,w,q);
ss = ss';
tt = tt';
w = w';
%nba = nyf;
nba = nyf;
end
else
sorted_roots = sort(abs(data(i).eigval));
if nba > nyf
temp = sorted_roots(nd-nba+1:nd-nyf)-1-options_.qz_criterium;
info(1) = 3;