diff options
| author | julie <julielangou@users.noreply.github.com> | 2011-11-01 22:02:31 +0000 |
|---|---|---|
| committer | julie <julielangou@users.noreply.github.com> | 2011-11-01 22:02:31 +0000 |
| commit | d5c30c90bdecf38da1064e2ed52583634573e741 (patch) | |
| tree | 480fc5ff31ee14b83116b6428aad79ea6e89362d /SRC/zppsvx.f | |
| parent | 04670a68760fa27333f8bcef8172f71adc6880ef (diff) | |
| download | lapack-d5c30c90bdecf38da1064e2ed52583634573e741.tar.gz lapack-d5c30c90bdecf38da1064e2ed52583634573e741.tar.bz2 lapack-d5c30c90bdecf38da1064e2ed52583634573e741.zip | |
Never say never...
Diffstat (limited to 'SRC/zppsvx.f')
| -rw-r--r-- | SRC/zppsvx.f | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/SRC/zppsvx.f b/SRC/zppsvx.f index 52803cb4..f7fec165 100644 --- a/SRC/zppsvx.f +++ b/SRC/zppsvx.f @@ -138,8 +138,7 @@ *> if UPLO = 'L', AP(i + (j-1)*(2n-j)/2) = A(i,j) for j<=i<=n. *> See below for further details. A is not modified if *> FACT = 'F' or 'N', or if FACT = 'E' and EQUED = 'N' on exit. -*> \endverbatim -*> \verbatim +*> *> On exit, if FACT = 'E' and EQUED = 'Y', A is overwritten by *> diag(S)*A*diag(S). *> \endverbatim @@ -152,14 +151,12 @@ *> factorization A = U**H*U or A = L*L**H, in the same storage *> format as A. If EQUED .ne. 'N', then AFP is the factored *> form of the equilibrated matrix A. -*> \endverbatim -*> \verbatim +*> *> If FACT = 'N', then AFP is an output argument and on exit *> returns the triangular factor U or L from the Cholesky *> factorization A = U**H * U or A = L * L**H of the original *> matrix A. -*> \endverbatim -*> \verbatim +*> *> If FACT = 'E', then AFP is an output argument and on exit *> returns the triangular factor U or L from the Cholesky *> factorization A = U**H * U or A = L * L**H of the equilibrated |