105 SUBROUTINE zlapmt( FORWRD, M, N, X, LDX, K )
118 COMPLEX*16 x( ldx, * )
155 x( ii,
j ) = x( ii, in )
185 x( ii, i ) = x( ii,
j )
subroutine zlapmt(FORWRD, M, N, X, LDX, K)
ZLAPMT performs a forward or backward permutation of the columns of a matrix.
set ue cd $ADTTMP cat<< EOF > tmp f Program LinearEquations Implicit none Real j