orgtsqr#

Functions

void sorgtsqr(
    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(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 generates an M-by-N real matrix Q_out with orthonormal columns, which are the first N columns of a product of real orthogonal matrices of order M which are returned by SLATSQR.

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 >= (m+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(
    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(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 generates an M-by-N real matrix Q_out with orthonormal columns, which are the first N columns of a product of real orthogonal matrices of order M which are returned by DLATSQR.

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 >= (m+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