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

Fix wrong count of forward looking vars in check with block option 

Bug introduced in c121aa14b1
time-shift
Sébastien Villemot 2012-12-11 18:10:01 +01:00
parent bcb59e373d
commit 9ec22085b0
1 changed files with 11 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
matlab/check.m
View File

@ -80,10 +80,18 @@ eigenvalues_ = dr.eigval;
[m_lambda,i]=sort(abs(eigenvalues_));
n_explod = nnz(abs(eigenvalues_) > options.qz_criterium);
nsfwrd = M.nsfwrd
% Count number of forward looking variables
if ~options.block
nyf = M.nsfwrd;
else
nyf = 0;
for j = 1:length(M.block_structure.block)
nyf = nyf + M.block_structure.block(j).n_forward + M.block_structure.block(j).n_mixed;
end
end
result = 0;
if (nsfwrd == n_explod) && (dr.full_rank)
if (nyf == n_explod) && (dr.full_rank)
result = 1;
end
@ -94,7 +102,7 @@ if options.noprint == 0
z=[m_lambda real(eigenvalues_(i)) imag(eigenvalues_(i))]';
disp(sprintf('%16.4g %16.4g %16.4g\n',z))
disp(sprintf('\nThere are %d eigenvalue(s) larger than 1 in modulus ', n_explod));
disp(sprintf('for %d forward-looking variable(s)',nsfwrd));
disp(sprintf('for %d forward-looking variable(s)',nyf));
disp(' ')
if result
disp('The rank condition is verified.')