orgtsqr_row#

Functions

void sorgtsqr_row(
    const INT           m,
    const INT           n,
    const INT           mb,
    const INT           nb,
          f32* restrict A,
    const INT           lda,
    const f32* restrict T,
    const INT           ldt,
          f32* restrict work,
    const INT           lwork,
          INT*          info
);
void sorgtsqr_row(const INT m, const INT n, const INT mb, const INT nb, f32 *restrict A, const INT lda, const f32 *restrict T, const INT ldt, f32 *restrict work, const INT lwork, INT *info)#

SORGTSQR_ROW generates an M-by-N real matrix Q_out with orthonormal columns from the output of SLATSQR.

These N orthonormal columns are the first N columns of a product of orthogonal matrices Q(k)_in of order M.

This routine uses a bottom-up, right-to-left sweep algorithm calling SLARFB_GETT.

Parameters

in
m

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

in
n

The number of columns of the matrix A. m >= n >= 0.

in
mb

The row block size used by SLATSQR. mb > n.

in
nb

The column block size used by SLATSQR. nb >= 1.

inout
A

Double precision array, dimension (lda, n). On entry, the elements below the diagonal represent the unit lower-trapezoidal blocked matrix V computed by SLATSQR. On exit, the M-by-N orthonormal matrix Q_out.

in
lda

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

in
T

Double precision array, dimension (ldt, n * NIRB). The upper-triangular block reflectors from SLATSQR.

in
ldt

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

out
work

Double precision workspace of size (max(1, lwork)). On exit, work[0] returns the optimal lwork.

in
lwork

The dimension of the array work. lwork >= nblocal * max(nblocal, (n-nblocal)), where nblocal=min(nb,n). 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

Functions

void dorgtsqr_row(
    const INT           m,
    const INT           n,
    const INT           mb,
    const INT           nb,
          f64* restrict A,
    const INT           lda,
    const f64* restrict T,
    const INT           ldt,
          f64* restrict work,
    const INT           lwork,
          INT*          info
);
void dorgtsqr_row(const INT m, const INT n, const INT mb, const INT nb, f64 *restrict A, const INT lda, const f64 *restrict T, const INT ldt, f64 *restrict work, const INT lwork, INT *info)#

DORGTSQR_ROW generates an M-by-N real matrix Q_out with orthonormal columns from the output of DLATSQR.

These N orthonormal columns are the first N columns of a product of orthogonal matrices Q(k)_in of order M.

This routine uses a bottom-up, right-to-left sweep algorithm calling DLARFB_GETT.

Parameters

in
m

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

in
n

The number of columns of the matrix A. m >= n >= 0.

in
mb

The row block size used by DLATSQR. mb > n.

in
nb

The column block size used by DLATSQR. nb >= 1.

inout
A

Double precision array, dimension (lda, n). On entry, the elements below the diagonal represent the unit lower-trapezoidal blocked matrix V computed by DLATSQR. On exit, the M-by-N orthonormal matrix Q_out.

in
lda

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

in
T

Double precision array, dimension (ldt, n * NIRB). The upper-triangular block reflectors from DLATSQR.

in
ldt

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

out
work

Double precision workspace of size (max(1, lwork)). On exit, work[0] returns the optimal lwork.

in
lwork

The dimension of the array work. lwork >= nblocal * max(nblocal, (n-nblocal)), where nblocal=min(nb,n). 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