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