PCPTSV - solve a system of linear equations A(1:N, JA:JA+N-1) * X = B(IB:IB+N-1, 1:NRHS)

       PCPTSV - solve a system of linear equations   A(1:N, JA:JA+N-1) * X = B(IB:IB+N-1, 1:NRHS)

       PCPTSV solves a system of linear equations

       where A(1:N, JA:JA+N-1) is an N-by-N complex
       tridiagonal symmetric positive definite distributed
       matrix.

       Cholesky factorization is used to factor a reordering of
       the matrix into L L'.

       See PCPTTRF and PCPTTRS for details.

LAPACK version 1.5                                 12 May 1997                                         PCPTSV(l)

       SUBROUTINE PCPTSV( UPLO, N, NRHS, D, E, JA, DESCA, B, IB, DESCB, WORK, LWORK, INFO )

           CHARACTER      UPLO

           INTEGER        IB, INFO, JA, LWORK, N, NRHS

           INTEGER        DESCA( * ), DESCB( * )

           COMPLEX        B( * ), E( * ), WORK( * )

           REAL           D( * )