org2l#
Functions
-
void sorg2l(const INT m, const INT n, const INT k, f32 *restrict A, const INT lda, const f32 *restrict tau, f32 *restrict work, INT *info)#
SORG2L generates an m by n real matrix Q with orthonormal columns, which is defined as the last n columns of a product of k elementary reflectors of order m.
Q = H(k-1) … H(1) H(0)
as returned by SGEQLF.
Parameters
inmThe number of rows of Q. m >= 0.
innThe number of columns of Q. m >= n >= 0.
inkThe number of elementary reflectors whose product defines Q. n >= k >= 0.
inoutAOn entry, the (n-k+i)-th column must contain the vector which defines the elementary reflector H(i), for i = 0,1,…,k-1, as returned by SGEQLF in the last k columns of its array argument A. On exit, the m-by-n matrix Q.
inldaThe leading dimension of A. lda >= max(1, m).
intauArray of dimension (k). TAU(i) must contain the scalar factor of the elementary reflector H(i), as returned by SGEQLF.
outworkWorkspace, dimension (n).
outinfo= 0: successful exit
< 0: if info = -i, the i-th argument had an illegal value.
void sorg2l(
const INT m,
const INT n,
const INT k,
f32* restrict A,
const INT lda,
const f32* restrict tau,
f32* restrict work,
INT* info
);
Functions
-
void dorg2l(const INT m, const INT n, const INT k, f64 *restrict A, const INT lda, const f64 *restrict tau, f64 *restrict work, INT *info)#
DORG2L generates an m by n real matrix Q with orthonormal columns, which is defined as the last n columns of a product of k elementary reflectors of order m.
Q = H(k-1) … H(1) H(0)
as returned by DGEQLF.
Parameters
inmThe number of rows of Q. m >= 0.
innThe number of columns of Q. m >= n >= 0.
inkThe number of elementary reflectors whose product defines Q. n >= k >= 0.
inoutAOn entry, the (n-k+i)-th column must contain the vector which defines the elementary reflector H(i), for i = 0,1,…,k-1, as returned by DGEQLF in the last k columns of its array argument A. On exit, the m-by-n matrix Q.
inldaThe leading dimension of A. lda >= max(1, m).
intauArray of dimension (k). TAU(i) must contain the scalar factor of the elementary reflector H(i), as returned by DGEQLF.
outworkWorkspace, dimension (n).
outinfo= 0: successful exit
< 0: if info = -i, the i-th argument had an illegal value.
void dorg2l(
const INT m,
const INT n,
const INT k,
f64* restrict A,
const INT lda,
const f64* restrict tau,
f64* restrict work,
INT* info
);