LA_SYGVX / LA_HEGVX

SUBROUTINE LA_SYGVX / LA_HEGVX(A, B,  W, ITYPE= itype, & 


JOBZ= jobz, UPLO= uplo, VL= vl, VU= vu, IL= il, & 


IU= iu, M= m, IFAIL= ifail, ABSTOL= abstol, 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 


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 $\mid$ COMPLEX 

wp   ::= KIND(1.0) $\mid$ KIND(1.0D0)