![]() |
LAPACK
3.7.0
LAPACK: Linear Algebra PACKage
|
subroutine slapmr | ( | logical | FORWRD, |
integer | M, | ||
integer | N, | ||
real, dimension( ldx, * ) | X, | ||
integer | LDX, | ||
integer, dimension( * ) | K | ||
) |
SLAPMR rearranges rows of a matrix as specified by a permutation vector.
Download SLAPMR + dependencies [TGZ] [ZIP] [TXT]
SLAPMR rearranges the rows of the M by N matrix X as specified by the permutation K(1),K(2),...,K(M) of the integers 1,...,M. If FORWRD = .TRUE., forward permutation: X(K(I),*) is moved X(I,*) for I = 1,2,...,M. If FORWRD = .FALSE., backward permutation: X(I,*) is moved to X(K(I),*) for I = 1,2,...,M.
[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 (M) On entry, K contains the permutation vector. K is used as internal workspace, but reset to its original value on output. |
Definition at line 106 of file slapmr.f.