version 1.18, 2018/05/29 07:18:25
|
version 1.19, 2023/08/07 08:39:29
|
Line 123
|
Line 123
|
*> \author Univ. of Colorado Denver |
*> \author Univ. of Colorado Denver |
*> \author NAG Ltd. |
*> \author NAG Ltd. |
* |
* |
*> \date December 2016 |
|
* |
|
*> \ingroup complex16OTHERauxiliary |
*> \ingroup complex16OTHERauxiliary |
* |
* |
*> \par Further Details: |
*> \par Further Details: |
Line 164
|
Line 162
|
*> modified element of the upper Hessenberg matrix H, and vi denotes an |
*> modified element of the upper Hessenberg matrix H, and vi denotes an |
*> element of the vector defining H(i). |
*> element of the vector defining H(i). |
*> |
*> |
*> This subroutine is a slight modification of LAPACK-3.0's DLAHRD |
*> This subroutine is a slight modification of LAPACK-3.0's ZLAHRD |
*> incorporating improvements proposed by Quintana-Orti and Van de |
*> incorporating improvements proposed by Quintana-Orti and Van de |
*> Gejin. Note that the entries of A(1:K,2:NB) differ from those |
*> Gejin. Note that the entries of A(1:K,2:NB) differ from those |
*> returned by the original LAPACK-3.0's DLAHRD routine. (This |
*> returned by the original LAPACK-3.0's ZLAHRD routine. (This |
*> subroutine is not backward compatible with LAPACK-3.0's DLAHRD.) |
*> subroutine is not backward compatible with LAPACK-3.0's ZLAHRD.) |
*> \endverbatim |
*> \endverbatim |
* |
* |
*> \par References: |
*> \par References: |
Line 181
|
Line 179
|
* ===================================================================== |
* ===================================================================== |
SUBROUTINE ZLAHR2( N, K, NB, A, LDA, TAU, T, LDT, Y, LDY ) |
SUBROUTINE ZLAHR2( N, K, NB, A, LDA, TAU, T, LDT, Y, LDY ) |
* |
* |
* -- LAPACK auxiliary routine (version 3.7.0) -- |
* -- LAPACK auxiliary 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 .. |
INTEGER K, LDA, LDT, LDY, N, NB |
INTEGER K, LDA, LDT, LDY, N, NB |