next up previous contents index
Next: Purpose Up: General Linear Systems Previous: Example (from Program LA_GTSV_EXAMPLE)   Contents   Index


LA_GTSVX


SUBROUTINE LA_GTSVX( DL, D, DU, B, X, DLF=dlf,DF=df, DUF=duf, & 

DU2=du2,IPIV=ipiv, FACT=fact, TRANS=trans, FERR=ferr, &
BERR=berr, RCOND=rcond, INFO=info )
type(wp), INTENT(IN) :: DL(:), D(:), DU(:), rhs
type(wp), INTENT(OUT) :: sol
type(wp), INTENT(INOUT), OPTIONAL :: DLF(:), DF(:), DUF(:), DU2(:)
INTEGER, INTENT(INOUT), OPTIONAL :: IPIV(:)
CHARACTER(LEN=1), INTENT(IN), OPTIONAL :: FACT, TRANS
REAL(wp), INTENT(OUT), OPTIONAL :: err
REAL(wp), INTENT(OUT), OPTIONAL :: RCOND
INTEGER, INTENT(OUT), OPTIONAL :: INFO
where
type ::= REAL $\mid$ COMPLEX
wp ::= KIND(1.0) $\mid$ KIND(1.0D0)
rhs ::= B(:,:) $\mid$ B(:)
sol ::= X(:,:) $\mid$ X(:)
err ::= FERR(:), BERR(:) $\mid$ FERR, BERR




Susan Blackford 2001-08-19