next up previous contents index
Next: Purpose Up: Standard Nonsymmetric Eigenvalue Problems Previous: Example 2 (from Program   Contents   Index


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(:)




Susan Blackford 2001-08-19