NAME
DLAT2S - 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