Cosmetic change and fixed copyright header.
parent
3679afe849
commit
410f8bd07c
|
@ -48,7 +48,7 @@ function [H,G,retcode]=discretionary_policy_engine(AAlag,AA0,AAlead,BB,bigw,inst
|
||||||
% Dennis, Richard (2007): Optimal policy in rational expectations models: new solution algorithms,
|
% Dennis, Richard (2007): Optimal policy in rational expectations models: new solution algorithms,
|
||||||
% Macroeconomic Dynamics, 11, 3155.
|
% Macroeconomic Dynamics, 11, 3155.
|
||||||
|
|
||||||
% Copyright (C) 2007-2017 Dynare Team
|
% Copyright (C) 2007-2018 Dynare Team
|
||||||
%
|
%
|
||||||
% This file is part of Dynare.
|
% This file is part of Dynare.
|
||||||
%
|
%
|
||||||
|
@ -112,7 +112,7 @@ F1=F10;
|
||||||
while 1
|
while 1
|
||||||
iter=iter+1;
|
iter=iter+1;
|
||||||
P=SylvesterDoubling(W+beta*F1'*Q*F1,beta*H1',H1,discretion_tol,solve_maxit);
|
P=SylvesterDoubling(W+beta*F1'*Q*F1,beta*H1',H1,discretion_tol,solve_maxit);
|
||||||
if any(any(isnan(P))) || any(any(isinf(P)))
|
if any(any(isnan(P))) || any(any(isinf(P)))
|
||||||
P=SylvesterHessenbergSchur(W+beta*F1'*Q*F1,beta*H1',H1);
|
P=SylvesterHessenbergSchur(W+beta*F1'*Q*F1,beta*H1',H1);
|
||||||
if any(any(isnan(P))) || any(any(isinf(P)))
|
if any(any(isnan(P))) || any(any(isinf(P)))
|
||||||
retcode=2;
|
retcode=2;
|
||||||
|
|
Loading…
Reference in New Issue