cptsl


NAME

cptsl - (obsolete) solve the linear system Ax = b for a symmetric positive definite tridiagonal matrix A and vectors b and x.


SYNOPSIS

  SUBROUTINE CPTSL( N, DIAG, OFFD, B)
  COMPLEX DIAG(*), OFFD(*), B(*)
  INTEGER N
 
  SUBROUTINE CPTSL_64( N, DIAG, OFFD, B)
  COMPLEX DIAG(*), OFFD(*), B(*)
  INTEGER*8 N
 

C INTERFACE

#include <sunperf.h>

void cptsl(int n, complex *diag, complex *offd, complex *b);

void cptsl_64(long n, complex *diag, complex *offd, complex *b);


ARGUMENTS

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

* DIAG (input)
Main diagonal elements of A.

* OFFD (input)
Off diagonal elements of A. OFFD(1) through OFFD(N*1) contains the off diagonal elements; OFFD(N) is not referenced.

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