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.