105 SUBROUTINE slag2d( M, N, SA, LDSA, A, LDA, INFO )
113 INTEGER info, lda, ldsa, m, n
117 DOUBLE PRECISION a( lda, * )
130 a( i,
j ) = sa( i,
j )
subroutine slag2d(M, N, SA, LDSA, A, LDA, INFO)
SLAG2D converts a single precision matrix to a double precision matrix.
set ue cd $ADTTMP cat<< EOF > tmp f Program LinearEquations Implicit none Real j