LA_GEEVX

SUBROUTINE LA_GEEVX( A, w, VL=vl,VR=vr, BALANC=balanc, ILO=ilo, & 


IHI=ihi, SCALE=scale, ABNRM=abnrm,RCONDE=rconde, & 


RCONDV=rcondv, INFO=info ) 

type(wp), INTENT(INOUT) :: A(:,:) 

type(wp), INTENT(OUT) :: w(:) 

type(wp), INTENT(OUT), OPTIONAL :: VL(:,:), VR(:,:) 


CHARACTER(LEN=1), INTENT(IN), OPTIONAL :: BALANC 


INTEGER, INTENT(OUT), OPTIONAL :: ILO, IHI 


REAL(wp), INTENT(OUT), OPTIONAL :: SCALE(:), ABNRM, & 


RCONDE(:), RCONDV(:) 


INTEGER, INTENT(OUT), OPTIONAL :: INFO 


where 

type ::= REAL $\mid$ COMPLEX 

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

w    ::= WR, WI $\mid$ W 

w(:)   ::= WR(:), WI(:) $\mid$ W(:)