Provided by: liblapack-doc_3.3.1-1_all bug

NAME

       LAPACK-3  -  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

SYNOPSIS

       SUBROUTINE SLAPMR( FORWRD, M, N, X, LDX, K )

           IMPLICIT       NONE

           LOGICAL        FORWRD

           INTEGER        LDX, M, N

           INTEGER        K( * )

           REAL           X( LDX, * )

PURPOSE

       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.

ARGUMENTS

        FORWRD  (input) LOGICAL
                = .TRUE., forward permutation
                = .FALSE., backward permutation

        M       (input) INTEGER
                The number of rows of the matrix X. M >= 0.

        N       (input) INTEGER
                The number of columns of the matrix X. N >= 0.

        X       (input/output) REAL array, dimension (LDX,N)
                On entry, the M by N matrix X.
                On exit, X contains the permuted matrix X.

        LDX     (input) INTEGER
                The leading dimension of the array X, LDX >= MAX(1,M).

        K       (input/output) 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.

 LAPACK auxiliary routine (version 3.2)     April 2011                            SLAPMR(3lapack)