diff options
author | OAM <oamarques@users.noreply.github.com> | 2016-10-22 11:59:23 -0700 |
---|---|---|
committer | GitHub <noreply@github.com> | 2016-10-22 11:59:23 -0700 |
commit | 53830fa46fbc16ebae1f72ca763b51c049d399d7 (patch) | |
tree | ed3a6d658085975bfd01ca0e9ba5a35e068909b2 | |
parent | 44f54c02c6242ece672619df26752d27ab5a07c0 (diff) |
Update cheevr.f
-rw-r--r-- | SRC/cheevr.f | 6 |
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 |