zhpsl

NAME

zhpsl - (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.

SYNOPSIS

  SUBROUTINE ZHPSL( A, N, IPIVOT, B)
  DOUBLE COMPLEX A(*), B(*)
  INTEGER N
  INTEGER IPIVOT(*)
 
  SUBROUTINE ZHPSL_64( A, N, IPIVOT, B)
  DOUBLE COMPLEX A(*), B(*)
  INTEGER*8 N
  INTEGER*8 IPIVOT(*)

C INTERFACE

#include <sunperf.h>

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

void zhpsl_64(doublecomplex *a, long n, long *ipivot, doublecomplex *b);

ARGUMENTS

* 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.