v4 dr1.m: added use of options_.qz_criterium with ordqz. Important for models with unit root
git-svn-id: https://www.dynare.org/svn/dynare/dynare_v4@1544 ac1d8469-bf42-47a9-8791-bf33cf982152time-shift
parent
cc6fe587ed
commit
4043406781
|
@ -272,9 +272,11 @@ if exist('ordqz')
|
||||||
info1 = 0;
|
info1 = 0;
|
||||||
try
|
try
|
||||||
[ss,tt,q,w]=qz(e,d,'real');
|
[ss,tt,q,w]=qz(e,d,'real');
|
||||||
[ss,tt,q,w]=ordqz(ss,tt,q,w,'udi');
|
eigval = ordeig(ss,tt);
|
||||||
dr.eigval = ordeig(ss,tt);
|
dr.eigval = eigval;
|
||||||
sdim = find(abs(dr.eigval)<1);
|
select = abs(eigval) < options_.qz_criterium;
|
||||||
|
[ss,tt,q,w]=ordqz(ss,tt,q,w,select);
|
||||||
|
sdim = sum(select);
|
||||||
catch
|
catch
|
||||||
info(1) = 2;
|
info(1) = 2;
|
||||||
info(2) = NaN;
|
info(2) = NaN;
|
||||||
|
|
Loading…
Reference in New Issue