1SLAPMT(1)           LAPACK auxiliary routine (version 3.2)           SLAPMT(1)
2
3
4

NAME

6       SLAPMT  - rearranges the columns of the M by N matrix X as specified by
7       the permutation K(1),K(2),...,K(N) of the integers 1,...,N
8

SYNOPSIS

10       SUBROUTINE SLAPMT( FORWRD, M, N, X, LDX, K )
11
12           LOGICAL        FORWRD
13
14           INTEGER        LDX, M, N
15
16           INTEGER        K( * )
17
18           REAL           X( LDX, * )
19

PURPOSE

21       SLAPMT rearranges the columns of the M by N matrix X  as  specified  by
22       the  permutation K(1),K(2),...,K(N) of the integers 1,...,N.  If FORWRD
23       = .TRUE.,  forward permutation:
24            X(*,K(J)) is moved X(*,J) for J = 1,2,...,N.
25       If FORWRD = .FALSE., backward permutation:
26            X(*,J) is moved to X(*,K(J)) for J = 1,2,...,N.
27

ARGUMENTS

29       FORWRD  (input) LOGICAL
30               = .TRUE., forward permutation = .FALSE., backward permutation
31
32       M       (input) INTEGER
33               The number of rows of the matrix X. M >= 0.
34
35       N       (input) INTEGER
36               The number of columns of the matrix X. N >= 0.
37
38       X       (input/output) REAL array, dimension (LDX,N)
39               On entry, the M by N matrix X.  On exit, X  contains  the  per‐
40               muted matrix X.
41
42       LDX     (input) INTEGER
43               The leading dimension of the array X, LDX >= MAX(1,M).
44
45       K       (input/output) INTEGER array, dimension (N)
46               On  entry,  K  contains  the  permutation  vector. K is used as
47               internal workspace, but reset to its original value on output.
48
49
50
51 LAPACK auxiliary routine (versionNo3v.e2m)ber 2008                       SLAPMT(1)