DLAT2S(3) converts a DOUBLE PRECISION triangular matrix, SA, to a SINGLE PRECISION triangular matrix, A

SYNOPSIS

SUBROUTINE DLAT2S(
UPLO, N, A, LDA, SA, LDSA, INFO )

    
CHARACTER UPLO

    
INTEGER INFO, LDA, LDSA, N

    
REAL SA( LDSA, * )

    
DOUBLE PRECISION A( LDA, * )

PURPOSE

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 convertion is aborted and a flag is raised. This is an auxiliary routine so there is no argument checking.

ARGUMENTS

UPLO (input) CHARACTER*1
= 'U': A is upper triangular;
= 'L': A is lower triangular.
N (input) INTEGER
The number of rows and columns of the matrix A. N >= 0.
A (input) DOUBLE PRECISION array, dimension (LDA,N)
On entry, the N-by-N triangular coefficient matrix A.
LDA (input) INTEGER
The leading dimension of the array A. LDA >= max(1,N).
SA (output) 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 (input) INTEGER
The leading dimension of the array SA. LDSA >= max(1,M).
INFO (output) 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. ========= End of DLAT2S