From e9be36f6ad229a4a1cd0a8aa720465d01632e0f4 Mon Sep 17 00:00:00 2001 From: sebastien Date: Fri, 4 Jul 2008 09:57:01 +0000 Subject: [PATCH] v4 octave: fixed a problem with infinite eigenvalues in dr1.m git-svn-id: https://www.dynare.org/svn/dynare/dynare_v4@1926 ac1d8469-bf42-47a9-8791-bf33cf982152 --- matlab/dr1.m | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/matlab/dr1.m b/matlab/dr1.m index 570fad397..08be457be 100644 --- a/matlab/dr1.m +++ b/matlab/dr1.m @@ -291,9 +291,9 @@ function [dr,info,M_,options_,oo_] = dr1(dr,task,M_,options_,oo_) if task == 1 dr.rank = rank(w(1:nyf,nd-nyf+1:end)); - if exist('OCTAVE_VERSION') - dr.eigval = qz(e,d); - else + % Under Octave, eig(A,B) doesn't exist, and + % lambda = qz(A,B) won't return infinite eigenvalues + if ~exist('OCTAVE_VERSION') dr.eigval = eig(e,d); end return