SUBROUTINE LA_SYGV / LA_SYGVD / LA_HEGV / LA_HEGVD( A, B, &
W, ITYPE=itype, JOBZ=jobz, UPLO=uplo, INFO=info )
type(wp), INTENT(INOUT) :: A(:,:), B(:,:)
REAL(wp), INTENT(OUT) :: W(:)
INTEGER, INTENT(IN), OPTIONAL :: ITYPE
CHARACTER(LEN=1), INTENT(IN), OPTIONAL :: JOBZ, UPLO
INTEGER, INTENT(OUT), OPTIONAL :: INFO
where
type ::= REAL COMPLEX
wp ::= KIND(1.0) KIND(1.0D0)