|
version 1.18, 2017/06/17 11:06:18
|
version 1.21, 2020/05/21 21:45:57
|
|
Line 85
|
Line 85
|
| *> \verbatim |
*> \verbatim |
| *> INFO is INTEGER |
*> INFO is INTEGER |
| *> = 0: successful exit |
*> = 0: successful exit |
| *> > 0: if INFO = k, U(k, k) is likely to produce owerflow if |
*> > 0: if INFO = k, U(k, k) is likely to produce overflow if |
| *> we try to solve for x in Ax = b. So U is perturbed to |
*> we try to solve for x in Ax = b. So U is perturbed to |
| *> avoid the overflow. |
*> avoid the overflow. |
| *> \endverbatim |
*> \endverbatim |
|
Line 111
|
Line 111
|
| * ===================================================================== |
* ===================================================================== |
| SUBROUTINE DGETC2( N, A, LDA, IPIV, JPIV, INFO ) |
SUBROUTINE DGETC2( N, A, LDA, IPIV, JPIV, INFO ) |
| * |
* |
| * -- LAPACK auxiliary routine (version 3.7.0) -- |
* -- LAPACK auxiliary 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 135
|
Line 135
|
| DOUBLE PRECISION BIGNUM, EPS, SMIN, SMLNUM, XMAX |
DOUBLE PRECISION BIGNUM, EPS, SMIN, SMLNUM, XMAX |
| * .. |
* .. |
| * .. External Subroutines .. |
* .. External Subroutines .. |
| EXTERNAL DGER, DSWAP |
EXTERNAL DGER, DSWAP, DLABAD |
| * .. |
* .. |
| * .. External Functions .. |
* .. External Functions .. |
| DOUBLE PRECISION DLAMCH |
DOUBLE PRECISION DLAMCH |
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to dgetc2.f CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [local] / rpl / lapack / lapack