# Name

**HPL_dlaswp04T** copy columns of U in rows of A and replace them with columns of W.
# Synopsis

`#include "hpl.h"`

`void`

`HPL_dlaswp04T(`

`const int`

`M0`

,
`const int`

`M1`

,
`const int`

`N`

,
`double *`

`U`

,
`const int`

`LDU`

,
`double *`

`A`

,
`const int`

`LDA`

,
`const double *`

`W0`

,
`const double *`

`W`

,
`const int`

`LDW`

,
`const int *`

`LINDXA`

,
`const int *`

`LINDXAU`

`);`

# Description

**HPL_dlaswp04T**
copies M0 columns of U into rows of A and replaces those
columns of U with columns of W. In addition M1 - M0 columns of W are
copied into U.
# Arguments

M0 (local input) const int
On entry, M0 specifies the number of columns of U that should
be copied into A and replaced by columns of W. M0 must be at
least zero.

M1 (local input) const int
On entry, M1 specifies the number of columnns of W that will
be copied into U. M1 must be at least zero.

N (local input) const int
On entry, N specifies the length of the columns of U that
will be copied into rows of A. N must be at least zero.

U (local input/output) double *
On entry, U points to an array of dimension (LDU,*). This
array contains the columns that are to be copied into rows of
A.

LDU (local input) const int
On entry, LDU specifies the leading dimension of the array U.
LDU must be at least MAX(1,N).

A (local output) double *
On entry, A points to an array of dimension (LDA,N). On exit,
the rows of this array specified by LINDXA are replaced by
columns of U indicated by LINDXAU.

LDA (local input) const int
On entry, LDA specifies the leading dimension of the array A.
LDA must be at least MAX(1,M0).

W0 (local input) const double *
On entry, W0 is an array of size (M-1)*LDW+1, that contains
the destination offset in U where the columns of W should be
copied.

W (local input) const double *
On entry, W is an array of size (LDW,M0+M1), that contains
data to be copied into U. For i in [M0..M0+M1), the entries
W(:,i) are copied into the column W0(i*LDW) of U.

LDW (local input) const int
On entry, LDW specifies the leading dimension of the array W.
LDW must be at least MAX(1,N+1).

LINDXA (local input) const int *
On entry, LINDXA is an array of dimension M0 containing the
local row indexes A into which columns of U are copied.

LINDXAU (local input) const int *
On entry, LINDXAU is an array of dimension M0 that contains
the local column indexes of U that should be copied into A
and replaced by the columns of W.

# See Also

HPL_dlaswp00N,
HPL_dlaswp10N,
HPL_dlaswp01N,
HPL_dlaswp01T,
HPL_dlaswp02N,
HPL_dlaswp03N,
HPL_dlaswp03T,
HPL_dlaswp04N,
HPL_dlaswp04T,
HPL_dlaswp05N,
HPL_dlaswp05T,
HPL_dlaswp06N,
HPL_dlaswp06T.