SPTSL(3F)

NAME
     SPTSL   - SPTSL given a positive definite tridiagonal matrix and a right
     hand side will find the solution.


SYNOPSYS
      SUBROUTINE SPTSL(N,D,E,B)

DESCRIPTION
     On Entry

     N INTEGER
        is the order of the tridiagonal matrix.

     D REAL(N)
        is the diagonal of the tridiagonal matrix.
        On output, D is destroyed.

     E REAL(N)
        is the offdiagonal of the tridiagonal matrix.
        E(1) through E(N-1) should contain the
        offdiagonal.

     B REAL(N)
        is the right hand side vector.  On Return

     B contains the solution. LINPACK.  This version dated 08/14/78 .  Jack
     Dongarra, Argonne National Laboratory.  No externals Fortran MOD