LA_GGEV

SUBROUTINE LA_GGEV( A, B, alpha, BETA, VL=vl, & 


VR=vr, INFO=info ) 

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

type(wp), INTENT(OUT) :: alpha(:), BETA(:) 

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


INTEGER, INTENT(OUT), OPTIONAL :: INFO 


where 

type   ::= REAL $\mid$ COMPLEX 

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

alpha  ::= ALPHAR, ALPHAI $\mid$ ALPHA 

alpha(:) ::= ALPHAR(:), ALPHAI(:) $\mid$ ALPHA(:)