diff options
Diffstat (limited to 'SRC/sgelq2.f')
| -rw-r--r-- | SRC/sgelq2.f | 51 |
1 files changed, 36 insertions, 15 deletions
diff --git a/SRC/sgelq2.f b/SRC/sgelq2.f index b8ce12ba..18139bd4 100644 --- a/SRC/sgelq2.f +++ b/SRC/sgelq2.f @@ -51,6 +51,42 @@ *> The number of columns of the matrix A. N >= 0. *> \endverbatim *> +*> \param[in,out] A +*> \verbatim +*> A is REAL array, dimension (LDA,N) +*> On entry, the m by n matrix A. +*> On exit, the elements on and below the diagonal of the array +*> contain the m by min(m,n) lower trapezoidal matrix L (L is +*> lower triangular if m <= n); the elements above the diagonal, +*> with the array TAU, represent the orthogonal matrix Q as a +*> product of elementary reflectors (see Further Details). +*> \endverbatim +*> +*> \param[in] LDA +*> \verbatim +*> LDA is INTEGER +*> The leading dimension of the array A. LDA >= max(1,M). +*> \endverbatim +*> +*> \param[out] TAU +*> \verbatim +*> TAU is REAL array, dimension (min(M,N)) +*> The scalar factors of the elementary reflectors (see Further +*> Details). +*> \endverbatim +*> +*> \param[out] WORK +*> \verbatim +*> WORK is REAL array, dimension (M) +*> \endverbatim +*> +*> \param[out] INFO +*> \verbatim +*> INFO is INTEGER +*> = 0: successful exit +*> < 0: if INFO = -i, the i-th argument had an illegal value +*> \endverbatim +*> * * Authors * ======= @@ -69,21 +105,6 @@ * =============== *>\details \b Further \b Details *> \verbatim -* product of elementary reflectors (see Further Details). -*> -*> LDA (input) INTEGER -*> The leading dimension of the array A. LDA >= max(1,M). -*> -*> TAU (output) REAL array, dimension (min(M,N)) -*> The scalar factors of the elementary reflectors (see Further -*> Details). -*> -*> WORK (workspace) REAL array, dimension (M) -*> -*> INFO (output) INTEGER -*> = 0: successful exit -*> < 0: if INFO = -i, the i-th argument had an illegal value -*> *> *> The matrix Q is represented as a product of elementary reflectors *> |