LAPACK 3.12.0
LAPACK: Linear Algebra PACKage
|
subroutine clapmr | ( | logical | forwrd, |
integer | m, | ||
integer | n, | ||
complex, dimension( ldx, * ) | x, | ||
integer | ldx, | ||
integer, dimension( * ) | k | ||
) |
CLAPMR rearranges rows of a matrix as specified by a permutation vector.
Download CLAPMR + dependencies [TGZ] [ZIP] [TXT]
CLAPMR 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 COMPLEX 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 103 of file clapmr.f.