zheev - compute all eigenvalues and, optionally, eigenvectors of a complex Hermitian matrix A
SUBROUTINE ZHEEV( JOBZ, UPLO, N, A, LDA, W, WORK, LDWORK, WORK2, * INFO) CHARACTER * 1 JOBZ, UPLO DOUBLE COMPLEX A(LDA,*), WORK(*) INTEGER N, LDA, LDWORK, INFO DOUBLE PRECISION W(*), WORK2(*)
SUBROUTINE ZHEEV_64( JOBZ, UPLO, N, A, LDA, W, WORK, LDWORK, WORK2, * INFO) CHARACTER * 1 JOBZ, UPLO DOUBLE COMPLEX A(LDA,*), WORK(*) INTEGER*8 N, LDA, LDWORK, INFO DOUBLE PRECISION W(*), WORK2(*)
SUBROUTINE HEEV( JOBZ, UPLO, [N], A, [LDA], W, [WORK], [LDWORK], * [WORK2], [INFO]) CHARACTER(LEN=1) :: JOBZ, UPLO COMPLEX(8), DIMENSION(:) :: WORK COMPLEX(8), DIMENSION(:,:) :: A INTEGER :: N, LDA, LDWORK, INFO REAL(8), DIMENSION(:) :: W, WORK2
SUBROUTINE HEEV_64( JOBZ, UPLO, [N], A, [LDA], W, [WORK], [LDWORK], * [WORK2], [INFO]) CHARACTER(LEN=1) :: JOBZ, UPLO COMPLEX(8), DIMENSION(:) :: WORK COMPLEX(8), DIMENSION(:,:) :: A INTEGER(8) :: N, LDA, LDWORK, INFO REAL(8), DIMENSION(:) :: W, WORK2
#include <sunperf.h>
void zheev(char jobz, char uplo, int n, doublecomplex *a, int lda, double *w, int *info);
void zheev_64(char jobz, char uplo, long n, doublecomplex *a, long lda, double *w, long *info);
zheev 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.