version 1.16, 2017/06/17 10:54:01
|
version 1.20, 2023/08/07 08:39:04
|
Line 147
|
Line 147
|
*> |
*> |
*> \param[in,out] AFP |
*> \param[in,out] AFP |
*> \verbatim |
*> \verbatim |
*> AFP is DOUBLE PRECISION array, dimension |
*> AFP is DOUBLE PRECISION array, dimension (N*(N+1)/2) |
*> (N*(N+1)/2) |
|
*> If FACT = 'F', then AFP is an input argument and on entry |
*> If FACT = 'F', then AFP is an input argument and on entry |
*> contains the triangular factor U or L from the Cholesky |
*> contains the triangular factor U or L from the Cholesky |
*> factorization A = U**T*U or A = L*L**T, in the same storage |
*> factorization A = U**T*U or A = L*L**T, in the same storage |
Line 284
|
Line 283
|
*> \author Univ. of Colorado Denver |
*> \author Univ. of Colorado Denver |
*> \author NAG Ltd. |
*> \author NAG Ltd. |
* |
* |
*> \date April 2012 |
|
* |
|
*> \ingroup doubleOTHERsolve |
*> \ingroup doubleOTHERsolve |
* |
* |
*> \par Further Details: |
*> \par Further Details: |
Line 312
|
Line 309
|
SUBROUTINE DPPSVX( FACT, UPLO, N, NRHS, AP, AFP, EQUED, S, B, LDB, |
SUBROUTINE DPPSVX( FACT, UPLO, N, NRHS, AP, AFP, EQUED, S, B, LDB, |
$ X, LDX, RCOND, FERR, BERR, WORK, IWORK, INFO ) |
$ X, LDX, RCOND, FERR, BERR, 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..-- |
* April 2012 |
|
* |
* |
* .. Scalar Arguments .. |
* .. Scalar Arguments .. |
CHARACTER EQUED, FACT, UPLO |
CHARACTER EQUED, FACT, UPLO |