CHISL(3)

SYNOPSIS
SUBROUTINE CHISL (A, LDA, N, KPVT, B)

NAME
chisl - Solve the complex Hermitian system using factors obtained from CHIFA.

LIBRARY
SLATEC (LINPACK)

CATEGORY
D2D1A

TYPE
COMPLEX (SSISL-S, DSISL-D, CHISL-C, CSISL-C)

KEYWORDS
HERMITIAN, LINEAR ALGEBRA, LINPACK, MATRIX, SOLVE

AUTHOR
Bunch, J., (UCSD)

DESCRIPTION
CHISL solves the complex Hermitian system A * X = B using the factors computed by CHIFA. On Entry A COMPLEX(LDA,N) the output from CHIFA. LDA INTEGER the leading dimension of the array A . N INTEGER the order of the matrix A . KVPT INTEGER(N) the pivot vector from CHIFA. B COMPLEX(N) the right hand side vector. On Return B the solution vector X . Error Condition A division by zero may occur if CHICO has set RCOND .EQ. 0.0 or CHIFA has set INFO .NE. 0 . To compute INVERSE(A) * C where C is a matrix with P columns CALL CHIFA(A,LDA,N,KVPT,INFO) IF (INFO .NE. 0) GO TO ... DO 10 J = 1, p CALL CHISL(A,LDA,N,KVPT,C(1,J)) 10 CONTINUE

REFERENCES
J. J. Dongarra, J. R. Bunch, C. B. Moler, and G. W. Stewart, LINPACK Users' Guide, SIAM, 1979.

ROUTINES CALLED
CAXPY, CDOTC

REVISION HISTORY (YYMMDD)
780814 DATE WRITTEN
890531 Changed all specific intrinsics to generic. (WRB)
890831 Modified array declarations. (WRB)
891107 Modified routine equivalence list. (WRB)
891107 REVISION DATE from Version 3.2
891214 Prologue converted to Version 4.0 format. (BAB)
900326 Removed duplicate information from DESCRIPTION section. (WRB)
920501 Reformatted the REFERENCES section. (WRB)