LAPACK
3.4.2
LAPACK: Linear Algebra PACKage

Go to the source code of this file.
Functions/Subroutines  
subroutine  slapmt (FORWRD, M, N, X, LDX, K) 
SLAPMT performs a forward or backward permutation of the columns of a matrix. 
subroutine slapmt  (  logical  FORWRD, 
integer  M,  
integer  N,  
real, dimension( ldx, * )  X,  
integer  LDX,  
integer, dimension( * )  K  
) 
SLAPMT performs a forward or backward permutation of the columns of a matrix.
Download SLAPMT + dependencies [TGZ] [ZIP] [TXT]SLAPMT rearranges the columns of the M by N matrix X as specified by the permutation K(1),K(2),...,K(N) of the integers 1,...,N. If FORWRD = .TRUE., forward permutation: X(*,K(J)) is moved X(*,J) for J = 1,2,...,N. If FORWRD = .FALSE., backward permutation: X(*,J) is moved to X(*,K(J)) for J = 1,2,...,N.
[in]  FORWRD  FORWRD is LOGICAL = .TRUE., forward permutation = .FALSE., backward permutation 
[in]  M  M is INTEGER The number of rows of the matrix X. M >= 0. 
[in]  N  N is INTEGER The number of columns of the matrix X. N >= 0. 
[in,out]  X  X is REAL array, dimension (LDX,N) On entry, the M by N matrix X. On exit, X contains the permuted matrix X. 
[in]  LDX  LDX is INTEGER The leading dimension of the array X, LDX >= MAX(1,M). 
[in,out]  K  K is INTEGER array, dimension (N) On entry, K contains the permutation vector. K is used as internal workspace, but reset to its original value on output. 
Definition at line 105 of file slapmt.f.