diff options
Diffstat (limited to 'SRC/spbsvx.f')
-rw-r--r-- | SRC/spbsvx.f | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/SRC/spbsvx.f b/SRC/spbsvx.f index 6b13e133..9c5c9e76 100644 --- a/SRC/spbsvx.f +++ b/SRC/spbsvx.f @@ -146,8 +146,7 @@ *> if UPLO = 'U', AB(KD+1+i-j,j) = A(i,j) for max(1,j-KD)<=i<=j; *> if UPLO = 'L', AB(1+i-j,j) = A(i,j) for j<=i<=min(N,j+KD). *> See below for further details. -*> \endverbatim -*> \verbatim +*> *> On exit, if FACT = 'E' and EQUED = 'Y', A is overwritten by *> diag(S)*A*diag(S). *> \endverbatim @@ -166,13 +165,11 @@ *> factorization A = U**T*U or A = L*L**T of the band matrix *> A, in the same storage format as A (see AB). If EQUED = 'Y', *> then AFB is the factored form of the equilibrated matrix A. -*> \endverbatim -*> \verbatim +*> *> If FACT = 'N', then AFB is an output argument and on exit *> returns the triangular factor U or L from the Cholesky *> factorization A = U**T*U or A = L*L**T. -*> \endverbatim -*> \verbatim +*> *> If FACT = 'E', then AFB is an output argument and on exit *> returns the triangular factor U or L from the Cholesky *> factorization A = U**T*U or A = L*L**T of the equilibrated |