Moved use_qzdiv in options_ (defined in global_initialization.m), so that we do not have to test the mjdgges file and define use_qzdiv each time dr1.m is called.
git-svn-id: https://www.dynare.org/svn/dynare/dynare_v4@1940 ac1d8469-bf42-47a9-8791-bf33cf982152time-shift
parent
20fb13f7c2
commit
b99a83d1be
|
@ -270,13 +270,6 @@ function [dr,info,M_,options_,oo_] = dr1(dr,task,M_,options_,oo_)
|
|||
end
|
||||
end
|
||||
|
||||
|
||||
if exist('mjdgges')==2
|
||||
use_qzdiv = 1;
|
||||
else
|
||||
use_qzdiv = 0;
|
||||
end
|
||||
|
||||
[ss,tt,w,sdim,dr.eigval,info1] = mjdgges(e,d,options_.qz_criterium);
|
||||
|
||||
if info1
|
||||
|
@ -373,7 +366,7 @@ function [dr,info,M_,options_,oo_] = dr1(dr,task,M_,options_,oo_)
|
|||
end
|
||||
|
||||
%% Necessary when using Sims' routines for QZ
|
||||
if use_qzdiv
|
||||
if options_.use_qzdiv
|
||||
gx = real(gx);
|
||||
hx = real(hx);
|
||||
dr.ghx = real(dr.ghx);
|
||||
|
|
|
@ -98,7 +98,14 @@ function global_initialization()
|
|||
options_.replic = 50;
|
||||
options_.drop = 100;
|
||||
options_.simul_algo = 0;
|
||||
|
||||
if exist('mjdgges')==2
|
||||
options_.use_qzdiv = 1;
|
||||
else
|
||||
options_.use_qzdiv = 0;
|
||||
end
|
||||
|
||||
|
||||
|
||||
% Ramsey policy
|
||||
options_.planner_discount = 1.0;
|
||||
options_.ramsey_policy = 0;
|
||||
|
|
Loading…
Reference in New Issue