CPTSL(3F)

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


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

DESCRIPTION
     On Entry

     N INTEGER
        is the order of the tridiagonal matrix.

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

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

     B COMPLEX(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 CONJG,MOD