PZLATRS - solve a triangular system

       PZLATRS - solve a triangular system

       PZLATRS solves a triangular system. This routine in unfinished at this time, but will be part of the next
       release.

LAPACK version 1.5                                 12 May 1997                                        PZLATRS(l)

       SUBROUTINE PZLATRS( UPLO,  TRANS, DIAG, NORMIN, N, A, IA, JA, DESCA, X, IX, JX, DESCX, SCALE, CNORM, WORK
                           )

           CHARACTER       DIAG, NORMIN, TRANS, UPLO

           INTEGER         IA, IX, JA, JX, N

           DOUBLE          PRECISION SCALE

           INTEGER         DESCA( * ), DESCX( * )

           DOUBLE          PRECISION CNORM( * )

           COMPLEX*16      A( * ), X( * ), WORK( * )