summaryrefslogtreecommitdiff
path: root/SRC/zggevx.f
diff options
context:
space:
mode:
Diffstat (limited to 'SRC/zggevx.f')
-rw-r--r--SRC/zggevx.f4
1 files changed, 4 insertions, 0 deletions
diff --git a/SRC/zggevx.f b/SRC/zggevx.f
index eb621968..f3e53898 100644
--- a/SRC/zggevx.f
+++ b/SRC/zggevx.f
@@ -102,6 +102,7 @@
* The leading dimension of B. LDB >= max(1,N).
*
* ALPHA (output) COMPLEX*16 array, dimension (N)
+*
* BETA (output) COMPLEX*16 array, dimension (N)
* On exit, ALPHA(j)/BETA(j), j=1,...,N, will be the generalized
* eigenvalues.
@@ -138,6 +139,7 @@
* if JOBVR = 'V', LDVR >= N.
*
* ILO (output) INTEGER
+*
* IHI (output) INTEGER
* ILO and IHI are integer values such that on exit
* A(i,j) = 0 and B(i,j) = 0 if i > j and
@@ -245,6 +247,8 @@
* For further explanation of the reciprocal condition numbers RCONDE
* and RCONDV, see section 4.11 of LAPACK User's Guide.
*
+* =====================================================================
+*
* .. Parameters ..
DOUBLE PRECISION ZERO, ONE
PARAMETER ( ZERO = 0.0D+0, ONE = 1.0D+0 )