lapmt Interface

public interface lapmt

LAPMT rearranges the columns of the M by N matrix X as specified by the permutation K(1),K(2),...,K(N) of the integers 1,...,N. If FORWRD = .TRUE., forward permutation: X(,K(J)) is moved X(,J) for J = 1,2,...,N. If FORWRD = .FALSE., backward permutation: X(,J) is moved to X(,K(J)) for J = 1,2,...,N.


Subroutines

public pure subroutine clapmt(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 dlapmt(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 slapmt(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 zlapmt(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_clapmt()

Arguments

None

public interface stdlib_dlapmt()

Arguments

None

public interface stdlib_slapmt()

Arguments

None

public interface stdlib_zlapmt()

Arguments

None