version 1.9, 2018/05/29 07:17:52
|
version 1.10, 2023/08/07 08:38:49
|
Line 94
|
Line 94
|
*> NB is INTEGER |
*> NB is INTEGER |
*> The block size used for the storage of T. K >= NB >= 1. |
*> The block size used for the storage of T. K >= NB >= 1. |
*> This must be the same value of NB used to generate T |
*> This must be the same value of NB used to generate T |
*> in CGEQRT. |
*> in DGEQRT. |
*> \endverbatim |
*> \endverbatim |
*> |
*> |
*> \param[in] V |
*> \param[in] V |
Line 102
|
Line 102
|
*> V is DOUBLE PRECISION array, dimension (LDV,K) |
*> V is DOUBLE PRECISION array, dimension (LDV,K) |
*> The i-th column must contain the vector which defines the |
*> The i-th column must contain the vector which defines the |
*> elementary reflector H(i), for i = 1,2,...,k, as returned by |
*> elementary reflector H(i), for i = 1,2,...,k, as returned by |
*> CGEQRT in the first K columns of its array argument A. |
*> DGEQRT in the first K columns of its array argument A. |
*> \endverbatim |
*> \endverbatim |
*> |
*> |
*> \param[in] LDV |
*> \param[in] LDV |
Line 117
|
Line 117
|
*> \verbatim |
*> \verbatim |
*> T is DOUBLE PRECISION array, dimension (LDT,K) |
*> T is DOUBLE PRECISION array, dimension (LDT,K) |
*> The upper triangular factors of the block reflectors |
*> The upper triangular factors of the block reflectors |
*> as returned by CGEQRT, stored as a NB-by-N matrix. |
*> as returned by DGEQRT, stored as a NB-by-N matrix. |
*> \endverbatim |
*> \endverbatim |
*> |
*> |
*> \param[in] LDT |
*> \param[in] LDT |
Line 160
|
Line 160
|
*> \author Univ. of Colorado Denver |
*> \author Univ. of Colorado Denver |
*> \author NAG Ltd. |
*> \author NAG Ltd. |
* |
* |
*> \date December 2016 |
|
* |
|
*> \ingroup doubleGEcomputational |
*> \ingroup doubleGEcomputational |
* |
* |
* ===================================================================== |
* ===================================================================== |
SUBROUTINE DGEMQRT( SIDE, TRANS, M, N, K, NB, V, LDV, T, LDT, |
SUBROUTINE DGEMQRT( SIDE, TRANS, M, N, K, NB, V, LDV, T, LDT, |
$ C, LDC, WORK, INFO ) |
$ C, LDC, WORK, INFO ) |
* |
* |
* -- LAPACK computational routine (version 3.7.0) -- |
* -- LAPACK computational routine -- |
* -- LAPACK is a software package provided by Univ. of Tennessee, -- |
* -- LAPACK is a software package provided by Univ. of Tennessee, -- |
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- |
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- |
* December 2016 |
|
* |
* |
* .. Scalar Arguments .. |
* .. Scalar Arguments .. |
CHARACTER SIDE, TRANS |
CHARACTER SIDE, TRANS |