next up previous contents index
Next: Purpose Up: Symmetric Indefinite Linear Systems Previous: Example (from Program LA_SYSVX_EXAMPLE)   Contents   Index


LA_SPSV / LA_HPSV


SUBROUTINE LA_SPSV / LA_HESV( AP, B, UPLO=uplo, & 

IPIV=ipiv, INFO=info )
type(wp), INTENT(INOUT) :: AP(:), rhs
CHARACTER(LEN=1), INTENT(IN), OPTIONAL :: UPLO
INTEGER, INTENT(OUT), OPTIONAL :: IPIV(:)
INTEGER, INTENT(OUT), OPTIONAL :: INFO
where
type ::= REAL $\mid$ COMPLEX
wp ::= KIND(1.0) $\mid$ KIND(1.0D0)
rhs ::= B(:,:) $\mid$ B(:)




Susan Blackford 2001-08-19