dsisl

NAME

dsisl - (obsolete) solve the linear system Ax = b for a symmetric matrix A, which has been UDU-factored by SSICO or SSIFA, and vectors b and x.

SYNOPSIS

  SUBROUTINE DSISL( A, LDA, N, IPIVOT, B)
  INTEGER LDA, N
  INTEGER IPIVOT(*)
  DOUBLE PRECISION A(LDA,*), B(*)
 
  SUBROUTINE DSISL_64( A, LDA, N, IPIVOT, B)
  INTEGER*8 LDA, N
  INTEGER*8 IPIVOT(*)
  DOUBLE PRECISION A(LDA,*), B(*)

C INTERFACE

#include <sunperf.h>

void dsisl(double *a, int lda, int n, int *ipivot, double *b);

void dsisl_64(double *a, long lda, long n, long *ipivot, double *b);

ARGUMENTS

* A (input): UDU factorization of the matrix A, as computed by SSICO or SSIFA.
* LDA (input): Leading dimension of the array A as specified in a dimension or type statement. LDA >= max(1,N).
* N (input): Order of the matrix A. N >= 0.
* IPIVOT (input): Pivot vector as computed by SSICO or SSIFA.
* B (input/output): On entry, the right-hand side vector b. On exit, the solution vector x.