SUBROUTINE LA_SPEVX / LA_HPEVX( AP, W, UPLO=uplo, Z=z, &
VL=vl, VU=vu, IL=il, IU=iu, M=m, IFAIL=ifail, &
ABSTOL=abstol, INFO=info )
type(wp), INTENT(INOUT) :: AP(:)
REAL(wp), INTENT(OUT) :: W(:)
CHARACTER(LEN=1), INTENT(IN), OPTIONAL :: UPLO
type(wp), INTENT(OUT), OPTIONAL :: Z(:,:)
REAL(wp), INTENT(IN), OPTIONAL :: VL, VU
INTEGER, INTENT(IN), OPTIONAL :: IL, IU
INTEGER, INTENT(OUT), OPTIONAL :: M
INTEGER, INTENT(OUT), OPTIONAL :: IFAIL(:)
REAL(wp), INTENT(IN), OPTIONAL :: ABSTOL
INTEGER, INTENT(OUT), OPTIONAL :: INFO
where
type ::= REAL COMPLEX
wp ::= KIND(1.0) KIND(1.0D0)