cheev - compute all eigenvalues and, optionally, eigenvectors of a complex Hermitian matrix A
SUBROUTINE CHEEV( JOBZ, UPLO, N, A, LDA, W, WORK, LDWORK, WORK2, * INFO) CHARACTER * 1 JOBZ, UPLO COMPLEX A(LDA,*), WORK(*) INTEGER N, LDA, LDWORK, INFO REAL W(*), WORK2(*)
SUBROUTINE CHEEV_64( JOBZ, UPLO, N, A, LDA, W, WORK, LDWORK, WORK2, * INFO) CHARACTER * 1 JOBZ, UPLO COMPLEX A(LDA,*), WORK(*) INTEGER*8 N, LDA, LDWORK, INFO REAL W(*), WORK2(*)
SUBROUTINE HEEV( JOBZ, UPLO, [N], A, [LDA], W, [WORK], [LDWORK], * [WORK2], [INFO]) CHARACTER(LEN=1) :: JOBZ, UPLO COMPLEX, DIMENSION(:) :: WORK COMPLEX, DIMENSION(:,:) :: A INTEGER :: N, LDA, LDWORK, INFO REAL, DIMENSION(:) :: W, WORK2
SUBROUTINE HEEV_64( JOBZ, UPLO, [N], A, [LDA], W, [WORK], [LDWORK], * [WORK2], [INFO]) CHARACTER(LEN=1) :: JOBZ, UPLO COMPLEX, DIMENSION(:) :: WORK COMPLEX, DIMENSION(:,:) :: A INTEGER(8) :: N, LDA, LDWORK, INFO REAL, DIMENSION(:) :: W, WORK2
#include <sunperf.h>
void cheev(char jobz, char uplo, int n, complex *a, int lda, float *w, int *info);
void cheev_64(char jobz, char uplo, long n, complex *a, long lda, float *w, long *info);
cheev computes all eigenvalues and, optionally, eigenvectors of a complex Hermitian matrix A.
= 'N': Compute eigenvalues only;
= 'V': Compute eigenvalues and eigenvectors.
= 'U': Upper triangle of A is stored;
= 'L': Lower triangle of A is stored.
WORK(1)
returns the optimal LDWORK.
If LDWORK = -1, then a workspace query is assumed; the routine only calculates the optimal size of the WORK array, returns this value as the first entry of the WORK array, and no error message related to LDWORK is issued by XERBLA.
dimension(max(1,3*N-2))
= 0: successful exit
< 0: if INFO = -i, the i-th argument had an illegal value
> 0: if INFO = i, the algorithm failed to converge; i off-diagonal elements of an intermediate tridiagonal form did not converge to zero.