NAME

       PSLATRS - solve a triangular system

SYNOPSIS

       SUBROUTINE PSLATRS( 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

           REAL            SCALE

           INTEGER         DESCA( * ), DESCX( * )

           REAL            A( * ), CNORM( * ), X( * ), WORK( * )

PURPOSE

       PSLATRS 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                                        PSLATRS(l)