 LAPACK 3.11.0 LAPACK: Linear Algebra PACKage
Searching...
No Matches

## ◆ clag2z()

 subroutine clag2z ( integer M, integer N, complex, dimension( ldsa, * ) SA, integer LDSA, complex*16, dimension( lda, * ) A, integer LDA, integer INFO )

CLAG2Z converts a complex single precision matrix to a complex double precision matrix.

Purpose:
``` CLAG2Z converts a COMPLEX matrix, SA, to a COMPLEX*16 matrix, A.

Note that while it is possible to overflow while converting
from double to single, it is not possible to overflow when
converting from single to double.

This is an auxiliary routine so there is no argument checking.```
Parameters
 [in] M ``` M is INTEGER The number of lines of the matrix A. M >= 0.``` [in] N ``` N is INTEGER The number of columns of the matrix A. N >= 0.``` [in] SA ``` SA is COMPLEX array, dimension (LDSA,N) On entry, the M-by-N coefficient matrix SA.``` [in] LDSA ``` LDSA is INTEGER The leading dimension of the array SA. LDSA >= max(1,M).``` [out] A ``` A is COMPLEX*16 array, dimension (LDA,N) On exit, the M-by-N coefficient matrix A.``` [in] LDA ``` LDA is INTEGER The leading dimension of the array A. LDA >= max(1,M).``` [out] INFO ``` INFO is INTEGER = 0: successful exit```

Definition at line 102 of file clag2z.f.

103*
104* -- LAPACK auxiliary routine --
105* -- LAPACK is a software package provided by Univ. of Tennessee, --
106* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
107*
108* .. Scalar Arguments ..
109 INTEGER INFO, LDA, LDSA, M, N
110* ..
111* .. Array Arguments ..
112 COMPLEX SA( LDSA, * )
113 COMPLEX*16 A( LDA, * )
114* ..
115*
116* =====================================================================
117*
118* .. Local Scalars ..
119 INTEGER I, J
120* ..
121* .. Executable Statements ..
122*
123 info = 0
124 DO 20 j = 1, n
125 DO 10 i = 1, m
126 a( i, j ) = sa( i, j )
127 10 CONTINUE
128 20 CONTINUE
129 RETURN
130*
131* End of CLAG2Z
132*
Here is the caller graph for this function: