lapmr Interface

public interface lapmr

LAPMR 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.


Subroutines

public pure subroutine clapmr(forwrd, m, n, x, ldx, k)

Arguments

Type IntentOptional Attributes Name
logical(kind=lk), intent(in) :: forwrd
integer(kind=ilp), intent(in) :: m
integer(kind=ilp), intent(in) :: n
complex(kind=sp), intent(inout) :: x(ldx,*)
integer(kind=ilp), intent(in) :: ldx
integer(kind=ilp), intent(inout) :: k(*)

public pure subroutine dlapmr(forwrd, m, n, x, ldx, k)

Arguments

Type IntentOptional Attributes Name
logical(kind=lk), intent(in) :: forwrd
integer(kind=ilp), intent(in) :: m
integer(kind=ilp), intent(in) :: n
real(kind=dp), intent(inout) :: x(ldx,*)
integer(kind=ilp), intent(in) :: ldx
integer(kind=ilp), intent(inout) :: k(*)

public pure subroutine slapmr(forwrd, m, n, x, ldx, k)

Arguments

Type IntentOptional Attributes Name
logical(kind=lk), intent(in) :: forwrd
integer(kind=ilp), intent(in) :: m
integer(kind=ilp), intent(in) :: n
real(kind=sp), intent(inout) :: x(ldx,*)
integer(kind=ilp), intent(in) :: ldx
integer(kind=ilp), intent(inout) :: k(*)

public pure subroutine zlapmr(forwrd, m, n, x, ldx, k)

Arguments

Type IntentOptional Attributes Name
logical(kind=lk), intent(in) :: forwrd
integer(kind=ilp), intent(in) :: m
integer(kind=ilp), intent(in) :: n
complex(kind=dp), intent(inout) :: x(ldx,*)
integer(kind=ilp), intent(in) :: ldx
integer(kind=ilp), intent(inout) :: k(*)

Module Procedures

public interface stdlib_clapmr()

Arguments

None

public interface stdlib_dlapmr()

Arguments

None

public interface stdlib_slapmr()

Arguments

None

public interface stdlib_zlapmr()

Arguments

None