1DLAT2S(1)     LAPACK PROTOTYPE auxiliary routine (version 3.1.2)     DLAT2S(1)
2
3
4

NAME

6       DLAT2S - converts a DOUBLE PRECISION triangular matrix, SA, to a SINGLE
7       PRECISION triangular matrix, A
8

SYNOPSIS

10       SUBROUTINE DLAT2S( UPLO, N, A, LDA, SA, LDSA, INFO )
11
12           CHARACTER      UPLO
13
14           INTEGER        INFO, LDA, LDSA, N
15
16           REAL           SA( LDSA, * )
17
18           DOUBLE         PRECISION A( LDA, * )
19

PURPOSE

21       DLAT2S converts a DOUBLE PRECISION triangular matrix, SA, to  a  SINGLE
22       PRECISION  triangular  matrix,  A.  RMAX is the overflow for the SINGLE
23       PRECISION arithmetic
24       DLAS2S checks that all the entries of A are between -RMAX and RMAX.  If
25       not  the convertion is aborted and a flag is raised.  This is an auxil‐
26       iary routine so there is no argument checking.
27

ARGUMENTS

29       UPLO    (input) CHARACTER*1
30               = 'U':  A is upper triangular;
31               = 'L':  A is lower triangular.
32
33       N       (input) INTEGER
34               The number of rows and columns of the matrix A.  N >= 0.
35
36       A       (input) DOUBLE PRECISION array, dimension (LDA,N)
37               On entry, the N-by-N triangular coefficient matrix A.
38
39       LDA     (input) INTEGER
40               The leading dimension of the array A.  LDA >= max(1,N).
41
42       SA      (output) REAL array, dimension (LDSA,N)
43               Only the UPLO part of SA is referenced.  On  exit,  if  INFO=0,
44               the N-by-N coefficient matrix SA; if INFO>0, the content of the
45               UPLO part of SA is unspecified.
46
47       LDSA    (input) INTEGER
48               The leading dimension of the array SA.  LDSA >= max(1,M).
49
50       INFO    (output) INTEGER
51               = 0:  successful exit.
52               = 1:  an entry of the matrix A is greater than the SINGLE  PRE‐
53               CISION  overflow  threshold,  in  this case, the content of the
54               UPLO part of SA in  exit  is  unspecified.   =========  End  of
55               DLAT2S
56
57
58
59 LAPACK PROTOTYPE auxiliary routinNeov(evmebresrio2n0038.1.2)                  DLAT2S(1)
Impressum