aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorOAM <oamarques@users.noreply.github.com>2016-10-22 11:59:23 -0700
committerGitHub <noreply@github.com>2016-10-22 11:59:23 -0700
commit53830fa46fbc16ebae1f72ca763b51c049d399d7 (patch)
treeed3a6d658085975bfd01ca0e9ba5a35e068909b2
parent44f54c02c6242ece672619df26752d27ab5a07c0 (diff)
Update cheevr.f
-rw-r--r--SRC/cheevr.f6
1 files changed, 4 insertions, 2 deletions
diff --git a/SRC/cheevr.f b/SRC/cheevr.f
index adcc9d37..31df2cb6 100644
--- a/SRC/cheevr.f
+++ b/SRC/cheevr.f
@@ -257,7 +257,9 @@
*> The support of the eigenvectors in Z, i.e., the indices
*> indicating the nonzero elements in Z. The i-th eigenvector
*> is nonzero only in elements ISUPPZ( 2*i-1 ) through
-*> ISUPPZ( 2*i ).
+*> ISUPPZ( 2*i ). This is an output of CSTEMR (tridiagonal
+*> matrix). The support of the eigenvectors of A is typically
+*> 1:N because of the unitary transformations applied by CUNMTR.
*> Implemented only for RANGE = 'A' or 'I' and IU - IL = N - 1
*> \endverbatim
*>
@@ -624,7 +626,7 @@
$ IWORK, LIWORK, INFO )
*
* Apply unitary matrix used in reduction to tridiagonal
-* form to eigenvectors returned by CSTEIN.
+* form to eigenvectors returned by CSTEMR.
*
IF( WANTZ .AND. INFO.EQ.0 ) THEN
INDWKN = INDWK