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

@@ -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);
+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