zspsl

NAME

zspsl - (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 ZSPSL( A, N, IPIVOT, B)
  DOUBLE COMPLEX A(*), B(*)
  INTEGER N
  INTEGER IPIVOT(*)
 
  SUBROUTINE ZSPSL_64( A, N, IPIVOT, B)
  DOUBLE COMPLEX A(*), B(*)
  INTEGER*8 N
  INTEGER*8 IPIVOT(*)

C INTERFACE

#include <sunperf.h>

void zspsl(doublecomplex *a, int n, int *ipivot, doublecomplex *b);

void zspsl_64(doublecomplex *a, long n, long *ipivot, doublecomplex *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.