In CHECK, use the eigenvalues as computed by the reordered real

generalized Schur decomposition, rather than the ones computed by
eig()
time-shift
Michel Juillard 2012-09-10 14:27:56 +02:00
parent a22d1d415a
commit 92833d3ceb
2 changed files with 0 additions and 8 deletions

View File

@ -462,9 +462,6 @@ for i = 1:Size;
data(i).rank = rank(w(nd-nyf+1:end,nd-nyf+1:end));
dr.full_rank = dr.full_rank && (rcond(w(nd-nyf+1:end,nd- ...
nyf+1:end)) > 1e-9);
if ~exist('OCTAVE_VERSION','builtin')
data(i).eigval = eig(E,D);
end
dr.eigval = [dr.eigval ; data(i).eigval];
end
if (verbose)

View File

@ -238,11 +238,6 @@ else
else
dr.full_rank = 1;
end
% 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
end