From a69c78c0f6df77af2afbcd41e241a17b3a7210e3 Mon Sep 17 00:00:00 2001 From: michel <michel@ac1d8469-bf42-47a9-8791-bf33cf982152> Date: Wed, 28 Dec 2005 10:54:44 +0000 Subject: [PATCH] v3, dr1.m: added test of existence of gensylv git-svn-id: https://www.dynare.org/svn/dynare/dynare_v3@566 ac1d8469-bf42-47a9-8791-bf33cf982152 --- matlab/dr1.m | 13 ++++++++----- 1 file changed, 8 insertions(+), 5 deletions(-) diff --git a/matlab/dr1.m b/matlab/dr1.m index 34d002cfbd..81dae7de1f 100644 --- a/matlab/dr1.m +++ b/matlab/dr1.m @@ -425,12 +425,15 @@ for i=1:ykmax_-1 k0 = k1; offset = offset + n1; end -%C = kron(hx,hx); -C = hx; D = [rhs; zeros(n-endo_nbr,size(rhs,2))]; -%x0 = sylvester3(A,B,C,D); -%dr.ghxx = sylvester3a(x0,A,B,C,D); -dr.ghxx = gensylv(2,A,B,C,D); +if exist('gensylv') + C = hx; + dr.ghxx = gensylv(2,A,B,C,D); +else + C = kron(hx,hx); + x0 = sylvester3(A,B,C,D); + dr.ghxx = sylvester3a(x0,A,B,C,D); +end %ghxu %rhs -- GitLab