DLAT2S converts a DOUBLE PRECISION triangular matrix, SA, to a SINGLE


 PRECISION triangular matrix, A.


 RMAX is the overflow for the SINGLE PRECISION arithmetic


 DLAS2S checks that all the entries of A are between -RMAX and


 RMAX. If not the conversion is aborted and a flag is raised.


 This is an auxiliary routine so there is no argument checking.

UPLO

          UPLO is CHARACTER*1


          = 'U':  A is upper triangular;


          = 'L':  A is lower triangular.

N

          N is INTEGER


          The number of rows and columns of the matrix A.  N >= 0.

A

          A is DOUBLE PRECISION array, dimension (LDA,N)


          On entry, the N-by-N triangular coefficient matrix A.

LDA

          LDA is INTEGER


          The leading dimension of the array A.  LDA >= max(1,N).

SA

          SA is REAL array, dimension (LDSA,N)


          Only the UPLO part of SA is referenced.  On exit, if INFO=0,


          the N-by-N coefficient matrix SA; if INFO>0, the content of


          the UPLO part of SA is unspecified.

LDSA

          LDSA is INTEGER


          The leading dimension of the array SA.  LDSA >= max(1,M).

INFO

          INFO is INTEGER


          = 0:  successful exit.


          = 1:  an entry of the matrix A is greater than the SINGLE


                PRECISION overflow threshold, in this case, the content


                of the UPLO part of SA in exit is unspecified.

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.