sspsl


NAME

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


SYNOPSIS

  SUBROUTINE SSPSL( A, N, IPIVOT, B)
  INTEGER N
  INTEGER IPIVOT(*)
  REAL A(*), B(*)
 
  SUBROUTINE SSPSL_64( A, N, IPIVOT, B)
  INTEGER*8 N
  INTEGER*8 IPIVOT(*)
  REAL A(*), B(*)
 

C INTERFACE

#include <sunperf.h>

void sspsl(float *a, int n, int *ipivot, float *b);

void sspsl_64(float *a, long n, long *ipivot, float *b);


ARGUMENTS

* A (input)
UDU factorization of the matrix A, as computed by SSPCO or SSPFA.

* N (input)
Order of the matrix A. N >= 0.

* IPIVOT (input)
Pivot vector as computed by SSPCO or SSPFA.

* B (input/output)
On entry, the right-hand side vector b. On exit, the solution vector x.