?lapmr

Developer Reference for Intel® oneAPI Math Kernel Library for Fortran

Download PDF

ID 766686

Date 4/28/2026

Version

Public

?lapmr

Rearranges rows of a matrix as specified by a permutation vector.

Syntax

call slapmr ( forwrd , m , n , x , ldx , k )

call dlapmr ( forwrd , m , n , x , ldx , k )

call clapmr ( forwrd , m , n , x , ldx , k )

call zlapmr ( forwrd , m , n , x , ldx , k )

call lapmr ( x , k [ , forwrd ] )

Include Files

mkl.fi

Description

The ?lapmr routine 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 to 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 .

The ?lapmr routine rearranges the rows of the m -by- n matrix X as specified by the permutation k[0], k[1], ... , k[m-1] of the integers 1,...,m .

If forwrd is true, forward permutation:

X(k[i-1],:) is moved to X{i,:) for i= 1,2,...,m .

If forwrd is false, backward permutation:

X{i,:) is moved to X(k[i-1,:) for i = 1,2,...,m .

Input Parameters

The data types are given for the Fortran interface.

forwrd

LOGICAL .

If forwrd= .TRUE. , forward permutation.

If forwrd= .FALSE. , backward permutation.

m

INTEGER . The number of rows of the matrix X . m≥ 0 .

n

INTEGER . The number of columns of the matrix X . n≥ 0 .

x

REAL for slapmr DOUBLE PRECISION for dlapmr COMPLEX for clapmr DOUBLE COMPLEX for zlapmr

Array, size ( ldx , n ) On entry, the m -by- n matrix X .

ldx

INTEGER . The leading dimension of the array X , ldx ≥ max(1, m ) .

k

INTEGER . Array, size ( m ). On entry, k contains the permutation vector and is used as internal workspace.

Output Parameters

x: On exit, x contains the permuted matrix X .
k: On exit, k is reset to its original value.

Return Values

No return value.

LAPACK 95 Interface Notes

Routines in Fortran 95 interface have fewer arguments in the calling sequence than their FORTRAN 77 counterparts. For general conventions applied to skip redundant or reconstructible arguments, see LAPACK 95 Interface Conventions .

Specific details for the routine ?lapmr interface are as follows:

x

Holds the matrix X of size ( n , n ).

k

Holds the vector of length m .

forwrd

Specifies the permutation. Must be ‘.TRUE.’ or ‘.FALSE.’ .

NOTE:

?lapmt

Select Your Language

Using Intel.com Search

Quick Links

Recent Searches

Advanced Search

Only search in

Developer Reference for Intel® oneAPI Math Kernel Library for Fortran

?lapmr

Syntax

Include Files

Description

Input Parameters

Output Parameters

Return Values

LAPACK 95 Interface Notes