version 1.5, 2017/06/17 11:06:46
|
version 1.7, 2018/05/29 07:18:17
|
Line 169
|
Line 169
|
*> |
*> |
*> \param[out] WORK |
*> \param[out] WORK |
*> \verbatim |
*> \verbatim |
*> WORK is COMPLEX*16 array, dimension LWORK. |
*> WORK is COMPLEX*16 array, dimension (LWORK) |
*> \endverbatim |
*> \endverbatim |
*> |
*> |
*> \param[in] LWORK |
*> \param[in] LWORK |
Line 218
|
Line 218
|
SUBROUTINE ZGSVJ0( JOBV, M, N, A, LDA, D, SVA, MV, V, LDV, EPS, |
SUBROUTINE ZGSVJ0( JOBV, M, N, A, LDA, D, SVA, MV, V, LDV, EPS, |
$ SFMIN, TOL, NSWEEP, WORK, LWORK, INFO ) |
$ SFMIN, TOL, NSWEEP, WORK, LWORK, INFO ) |
* |
* |
* -- LAPACK computational routine (version 3.7.0) -- |
* -- LAPACK computational routine (version 3.8.0) -- |
* -- 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..-- |
* June 2016 |
* June 2016 |
Line 268
|
Line 268
|
* .. External Subroutines .. |
* .. External Subroutines .. |
* .. |
* .. |
* from BLAS |
* from BLAS |
EXTERNAL ZCOPY, ZROT, ZSWAP |
EXTERNAL ZCOPY, ZROT, ZSWAP, ZAXPY |
* from LAPACK |
* from LAPACK |
EXTERNAL ZLASCL, ZLASSQ, XERBLA |
EXTERNAL ZLASCL, ZLASSQ, XERBLA |
* .. |
* .. |