fixes bug0027: removed incorrect description of output of H (they are not in standard...

diff --git a/SRC/dhgeqz.f b/SRC/dhgeqz.f
index 97f78f2..1070d1c 100644 (file)
--- a/SRC/dhgeqz.f
+++ b/SRC/dhgeqz.f
@@ -109,10 +109,7 @@
 *  H       (input/output) DOUBLE PRECISION array, dimension (LDH, N)
 *          On entry, the N-by-N upper Hessenberg matrix H.
 *          On exit, if JOB = 'S', H contains the upper quasi-triangular
-*          matrix S from the generalized Schur factorization;
-*          2-by-2 diagonal blocks (corresponding to complex conjugate
-*          pairs of eigenvalues) are returned in standard form, with
-*          H(i,i) = H(i+1,i+1) and H(i+1,i)*H(i,i+1) < 0.
+*          matrix S from the generalized Schur factorization.
 *          If JOB = 'E', the diagonal blocks of H match those of S, but
 *          the rest of H is unspecified.
 *

diff --git a/SRC/shgeqz.f b/SRC/shgeqz.f
index ecce7be..eb2a35e 100644 (file)
--- a/SRC/shgeqz.f
+++ b/SRC/shgeqz.f
@@ -109,10 +109,7 @@
 *  H       (input/output) REAL array, dimension (LDH, N)
 *          On entry, the N-by-N upper Hessenberg matrix H.
 *          On exit, if JOB = 'S', H contains the upper quasi-triangular
-*          matrix S from the generalized Schur factorization;
-*          2-by-2 diagonal blocks (corresponding to complex conjugate
-*          pairs of eigenvalues) are returned in standard form, with
-*          H(i,i) = H(i+1,i+1) and H(i+1,i)*H(i,i+1) < 0.
+*          matrix S from the generalized Schur factorization.
 *          If JOB = 'E', the diagonal blocks of H match those of S, but
 *          the rest of H is unspecified.
 *