104 SUBROUTINE clag2z( M, N, SA, LDSA, A, LDA, INFO )
112 INTEGER info, lda, ldsa, m, n
115 COMPLEX sa( ldsa, * )
116 COMPLEX*16 a( lda, * )
129 a( i,
j ) = sa( i,
j )
set ue cd $ADTTMP cat<< EOF > tmp f Program LinearEquations Implicit none Real j
subroutine clag2z(M, N, SA, LDSA, A, LDA, INFO)
CLAG2Z converts a complex single precision matrix to a complex double precision matrix.