version 1.4, 2017/06/17 10:53:46
|
version 1.9, 2023/08/07 08:38:47
|
Line 165
|
Line 165
|
*> |
*> |
*> \param[out] Z |
*> \param[out] Z |
*> \verbatim |
*> \verbatim |
*> Z is DOUBLE PRECISION array, dimension (2*N,K) ) |
*> Z is DOUBLE PRECISION array, dimension (2*N,K) |
*> If JOBZ = 'V', then if INFO = 0 the first NS columns of Z |
*> If JOBZ = 'V', then if INFO = 0 the first NS columns of Z |
*> contain the singular vectors of the matrix B corresponding to |
*> contain the singular vectors of the matrix B corresponding to |
*> the selected singular values, with U in rows 1 to N and V |
*> the selected singular values, with U in rows 1 to N and V |
Line 218
|
Line 218
|
*> \author Univ. of Colorado Denver |
*> \author Univ. of Colorado Denver |
*> \author NAG Ltd. |
*> \author NAG Ltd. |
* |
* |
*> \date June 2016 |
|
* |
|
*> \ingroup doubleOTHEReigen |
*> \ingroup doubleOTHEReigen |
* |
* |
* ===================================================================== |
* ===================================================================== |
SUBROUTINE DBDSVDX( UPLO, JOBZ, RANGE, N, D, E, VL, VU, IL, IU, |
SUBROUTINE DBDSVDX( UPLO, JOBZ, RANGE, N, D, E, VL, VU, IL, IU, |
$ NS, S, Z, LDZ, WORK, IWORK, INFO) |
$ NS, S, Z, LDZ, WORK, IWORK, INFO) |
* |
* |
* -- LAPACK driver routine (version 3.7.0) -- |
* -- LAPACK driver 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 JOBZ, RANGE, UPLO |
CHARACTER JOBZ, RANGE, UPLO |
Line 269
|
Line 266
|
EXTERNAL IDAMAX, LSAME, DAXPY, DDOT, DLAMCH, DNRM2 |
EXTERNAL IDAMAX, LSAME, DAXPY, DDOT, DLAMCH, DNRM2 |
* .. |
* .. |
* .. External Subroutines .. |
* .. External Subroutines .. |
EXTERNAL DCOPY, DLASET, DSCAL, DSWAP |
EXTERNAL DSTEVX, DCOPY, DLASET, DSCAL, DSWAP, XERBLA |
* .. |
* .. |
* .. Intrinsic Functions .. |
* .. Intrinsic Functions .. |
INTRINSIC ABS, DBLE, SIGN, SQRT |
INTRINSIC ABS, DBLE, SIGN, SQRT |