lamswlq#

slamswlq

Functions

void slamswlq(
    const char*          side,
    const char*          trans,
    const INT            m,
    const INT            n,
    const INT            k,
    const INT            mb,
    const INT            nb,
    const f32*  restrict A,
    const INT            lda,
    const f32*  restrict T,
    const INT            ldt,
          f32*  restrict C,
    const INT            ldc,
          f32*  restrict work,
    const INT            lwork,
          INT*           info
);

void slamswlq(const char *side, const char *trans, const INT m, const INT n, const INT k, const INT mb, const INT nb, const f32 *restrict A, const INT lda, const f32 *restrict T, const INT ldt, f32 *restrict C, const INT ldc, f32 *restrict work, const INT lwork, INT *info)#

SLAMSWLQ overwrites the general real M-by-N matrix C with.

         SIDE = 'L'     SIDE = 'R'

TRANS = ‘N’: Q * C C * Q TRANS = ‘T’: Q^T * C C * Q^T

where Q is a real orthogonal matrix defined as the product of blocked elementary reflectors computed by short wide LQ factorization (SLASWLQ)

Parameters

in

side

‘L’: apply Q or Q^T from the Left; ‘R’: apply Q or Q^T from the Right.

in

trans

‘N’: No transpose, apply Q; ‘T’: Transpose, apply Q^T.

in

m

The number of rows of the matrix C. m >= 0.

in

n

The number of columns of the matrix C. n >= 0.

in

k

The number of elementary reflectors whose product defines the matrix Q. m >= k >= 0.

in

mb

The row block size to be used in the blocked LQ. m >= mb >= 1.

in

nb

The column block size to be used in the blocked LQ. nb > m.

in

A

Double precision array, dimension (lda, m) if SIDE=’L’, (lda, n) if SIDE=’R’. The i-th row must contain the vector which defines the blocked elementary reflector H(i), as returned by SLASWLQ.

in

lda

The leading dimension of the array A. lda >= max(1, k).

in

T

Double precision array, dimension (m * Number of blocks(CEIL(N-K/NB-K))). The blocked upper triangular block reflectors stored in compact form.

in

ldt

The leading dimension of the array T. ldt >= max(1, mb).

inout

C

Double precision array, dimension (ldc, n). On entry, the M-by-N matrix C. On exit, C is overwritten by Q*C, Q^T*C, C*Q^T, or C*Q.

in

ldc

The leading dimension of the array C. ldc >= max(1, m).

out

work

Double precision workspace array, dimension (max(1, lwork)). On exit, if info = 0, work[0] returns the minimal lwork.

in

lwork

The dimension of the array work. If min(m,n,k) = 0, lwork >= 1. If SIDE = ‘L’, lwork >= max(1, nb*mb). If SIDE = ‘R’, lwork >= max(1, m*mb). If lwork = -1, then a workspace query is assumed.

out

info

= 0: successful exit
< 0: if info = -i, the i-th argument had an illegal value.

dlamswlq

Functions

void dlamswlq(
    const char*          side,
    const char*          trans,
    const INT            m,
    const INT            n,
    const INT            k,
    const INT            mb,
    const INT            nb,
    const f64*  restrict A,
    const INT            lda,
    const f64*  restrict T,
    const INT            ldt,
          f64*  restrict C,
    const INT            ldc,
          f64*  restrict work,
    const INT            lwork,
          INT*           info
);

void dlamswlq(const char *side, const char *trans, const INT m, const INT n, const INT k, const INT mb, const INT nb, const f64 *restrict A, const INT lda, const f64 *restrict T, const INT ldt, f64 *restrict C, const INT ldc, f64 *restrict work, const INT lwork, INT *info)#

DLAMSWLQ overwrites the general real M-by-N matrix C with.

         SIDE = 'L'     SIDE = 'R'

TRANS = ‘N’: Q * C C * Q TRANS = ‘T’: Q^T * C C * Q^T

where Q is a real orthogonal matrix defined as the product of blocked elementary reflectors computed by short wide LQ factorization (DLASWLQ)

Parameters

in

side

‘L’: apply Q or Q^T from the Left; ‘R’: apply Q or Q^T from the Right.

in

trans

‘N’: No transpose, apply Q; ‘T’: Transpose, apply Q^T.

in

m

The number of rows of the matrix C. m >= 0.

in

n

The number of columns of the matrix C. n >= 0.

in

k

The number of elementary reflectors whose product defines the matrix Q. m >= k >= 0.

in

mb

The row block size to be used in the blocked LQ. m >= mb >= 1.

in

nb

The column block size to be used in the blocked LQ. nb > m.

in

A

Double precision array, dimension (lda, m) if SIDE=’L’, (lda, n) if SIDE=’R’. The i-th row must contain the vector which defines the blocked elementary reflector H(i), as returned by DLASWLQ.

in

lda

The leading dimension of the array A. lda >= max(1, k).

in

T

Double precision array, dimension (m * Number of blocks(CEIL(N-K/NB-K))). The blocked upper triangular block reflectors stored in compact form.

in

ldt

The leading dimension of the array T. ldt >= max(1, mb).

inout

C

Double precision array, dimension (ldc, n). On entry, the M-by-N matrix C. On exit, C is overwritten by Q*C, Q^T*C, C*Q^T, or C*Q.

in

ldc

The leading dimension of the array C. ldc >= max(1, m).

out

work

Double precision workspace array, dimension (max(1, lwork)). On exit, if info = 0, work[0] returns the minimal lwork.

in

lwork

The dimension of the array work. If min(m,n,k) = 0, lwork >= 1. If SIDE = ‘L’, lwork >= max(1, nb*mb). If SIDE = ‘R’, lwork >= max(1, m*mb). If lwork = -1, then a workspace query is assumed.

out

info

= 0: successful exit
< 0: if info = -i, the i-th argument had an illegal value.

clamswlq

Functions

void clamswlq(
    const char*          side,
    const char*          trans,
    const INT            m,
    const INT            n,
    const INT            k,
    const INT            mb,
    const INT            nb,
    const c64*  restrict A,
    const INT            lda,
    const c64*  restrict T,
    const INT            ldt,
          c64*  restrict C,
    const INT            ldc,
          c64*  restrict work,
    const INT            lwork,
          INT*           info
);

void clamswlq(const char *side, const char *trans, const INT m, const INT n, const INT k, const INT mb, const INT nb, const c64 *restrict A, const INT lda, const c64 *restrict T, const INT ldt, c64 *restrict C, const INT ldc, c64 *restrict work, const INT lwork, INT *info)#

CLAMSWLQ overwrites the general complex M-by-N matrix C with.

         SIDE = 'L'     SIDE = 'R'

TRANS = ‘N’: Q * C C * Q TRANS = ‘C’: Q^H * C C * Q^H

where Q is a complex unitary matrix defined as the product of blocked elementary reflectors computed by short wide LQ factorization (CLASWLQ)

Parameters

in

side

‘L’: apply Q or Q^H from the Left; ‘R’: apply Q or Q^H from the Right.

in

trans

‘N’: No transpose, apply Q; ‘C’: Conjugate transpose, apply Q^H.

in

m

The number of rows of the matrix C. m >= 0.

in

n

The number of columns of the matrix C. n >= 0.

in

k

The number of elementary reflectors whose product defines the matrix Q. m >= k >= 0.

in

mb

The row block size to be used in the blocked LQ. m >= mb >= 1.

in

nb

The column block size to be used in the blocked LQ. nb > m.

in

A

Complex*16 array, dimension (lda, m) if SIDE=’L’, (lda, n) if SIDE=’R’. The i-th row must contain the vector which defines the blocked elementary reflector H(i), as returned by CLASWLQ.

in

lda

The leading dimension of the array A. lda >= max(1, k).

in

T

Complex*16 array, dimension (m * Number of blocks(CEIL(N-K/NB-K))). The blocked upper triangular block reflectors stored in compact form.

in

ldt

The leading dimension of the array T. ldt >= max(1, mb).

inout

C

Complex*16 array, dimension (ldc, n). On entry, the M-by-N matrix C. On exit, C is overwritten by Q*C, Q^H*C, C*Q^H, or C*Q.

in

ldc

The leading dimension of the array C. ldc >= max(1, m).

out

work

Complex*16 workspace array, dimension (max(1, lwork)). On exit, if info = 0, work[0] returns the minimal lwork.

in

lwork

The dimension of the array work. If min(m,n,k) = 0, lwork >= 1. If SIDE = ‘L’, lwork >= max(1, nb*mb). If SIDE = ‘R’, lwork >= max(1, m*mb). If lwork = -1, then a workspace query is assumed.

out

info

= 0: successful exit
< 0: if info = -i, the i-th argument had an illegal value.

zlamswlq

Functions

void zlamswlq(
    const char*          side,
    const char*          trans,
    const INT            m,
    const INT            n,
    const INT            k,
    const INT            mb,
    const INT            nb,
    const c128* restrict A,
    const INT            lda,
    const c128* restrict T,
    const INT            ldt,
          c128* restrict C,
    const INT            ldc,
          c128* restrict work,
    const INT            lwork,
          INT*           info
);

void zlamswlq(const char *side, const char *trans, const INT m, const INT n, const INT k, const INT mb, const INT nb, const c128 *restrict A, const INT lda, const c128 *restrict T, const INT ldt, c128 *restrict C, const INT ldc, c128 *restrict work, const INT lwork, INT *info)#

ZLAMSWLQ overwrites the general complex M-by-N matrix C with.

         SIDE = 'L'     SIDE = 'R'

TRANS = ‘N’: Q * C C * Q TRANS = ‘C’: Q^H * C C * Q^H

where Q is a complex unitary matrix defined as the product of blocked elementary reflectors computed by short wide LQ factorization (ZLASWLQ)

Parameters

in

side

‘L’: apply Q or Q^H from the Left; ‘R’: apply Q or Q^H from the Right.

in

trans

‘N’: No transpose, apply Q; ‘C’: Conjugate transpose, apply Q^H.

in

m

The number of rows of the matrix C. m >= 0.

in

n

The number of columns of the matrix C. n >= 0.

in

k

The number of elementary reflectors whose product defines the matrix Q. m >= k >= 0.

in

mb

The row block size to be used in the blocked LQ. m >= mb >= 1.

in

nb

The column block size to be used in the blocked LQ. nb > m.

in

A

Complex*16 array, dimension (lda, m) if SIDE=’L’, (lda, n) if SIDE=’R’. The i-th row must contain the vector which defines the blocked elementary reflector H(i), as returned by ZLASWLQ.

in

lda

The leading dimension of the array A. lda >= max(1, k).

in

T

Complex*16 array, dimension (m * Number of blocks(CEIL(N-K/NB-K))). The blocked upper triangular block reflectors stored in compact form.

in

ldt

The leading dimension of the array T. ldt >= max(1, mb).

inout

C

Complex*16 array, dimension (ldc, n). On entry, the M-by-N matrix C. On exit, C is overwritten by Q*C, Q^H*C, C*Q^H, or C*Q.

in

ldc

The leading dimension of the array C. ldc >= max(1, m).

out

work

Complex*16 workspace array, dimension (max(1, lwork)). On exit, if info = 0, work[0] returns the minimal lwork.

in

lwork

The dimension of the array work. If min(m,n,k) = 0, lwork >= 1. If SIDE = ‘L’, lwork >= max(1, nb*mb). If SIDE = ‘R’, lwork >= max(1, m*mb). If lwork = -1, then a workspace query is assumed.

out

info

= 0: successful exit
< 0: if info = -i, the i-th argument had an illegal value.

lamswlq#

This Page