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