cspsl

NAME

cspsl - (obsolete) solve the linear system Ax = b for a symmetric matrix A in packed storage, which has been UDU-factored by CSPCO or CSPFA, and vectors b and x.

SYNOPSIS

  SUBROUTINE CSPSL( A, N, IPIVOT, B)
  COMPLEX A(*), B(*)
  INTEGER N
  INTEGER IPIVOT(*)
 
  SUBROUTINE CSPSL_64( A, N, IPIVOT, B)
  COMPLEX A(*), B(*)
  INTEGER*8 N
  INTEGER*8 IPIVOT(*)

C INTERFACE

#include <sunperf.h>

void cspsl(complex *a, int n, int *ipivot, complex *b);

void cspsl_64(complex *a, long n, long *ipivot, complex *b);

ARGUMENTS

* A (input): UDU factorization of the matrix A, as computed by CSPCO or CSPFA.
* N (input): Order of the matrix A. N >= 0.
* IPIVOT (input): Pivot vector as computed by CSPCO or CSPFA.
* B (input/output): On entry, the right-hand side vector b. On exit, the solution vector x.