chpsl
chpsl - (obsolete) solve the linear system Ax = b for a Hermitian matrix A in packed storage,
which has been UDU-factored by CHPCO or CHPFA, and vectors b and x.
SUBROUTINE CHPSL( A, N, IPIVOT, B)
COMPLEX A(*), B(*)
INTEGER N
INTEGER IPIVOT(*)
SUBROUTINE CHPSL_64( A, N, IPIVOT, B)
COMPLEX A(*), B(*)
INTEGER*8 N
INTEGER*8 IPIVOT(*)
#include <sunperf.h>
void chpsl(complex *a, int n, int *ipivot, complex *b);
void chpsl_64(complex *a, long n, long *ipivot, complex *b);
-
* A (input)
-
On entry, the UDU factorization of the matrix A, as computed CHPCO or CHPFA.
-
* N (input)
-
Order of the matrix A. N >= 0.
-
* IPIVOT (input)
-
Pivot vector as computed by CHPCO or CHPFA.
-
* B (input/output)
-
On entry, the right-hand side vector b.
On exit, the solution vector x.