From d5c30c90bdecf38da1064e2ed52583634573e741 Mon Sep 17 00:00:00 2001 From: julie Date: Tue, 1 Nov 2011 22:02:31 +0000 Subject: Never say never... --- SRC/chpsvx.f | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'SRC/chpsvx.f') diff --git a/SRC/chpsvx.f b/SRC/chpsvx.f index efe7671b..3fe0aea5 100644 --- a/SRC/chpsvx.f +++ b/SRC/chpsvx.f @@ -128,8 +128,7 @@ *> to obtain the factor U or L from the factorization *> A = U*D*U**H or A = L*D*L**H as computed by CHPTRF, stored as *> a packed triangular matrix in the same storage format as A. -*> \endverbatim -*> \verbatim +*> *> If FACT = 'N', then AFP is an output argument and on exit *> contains the block diagonal matrix D and the multipliers used *> to obtain the factor U or L from the factorization @@ -150,8 +149,7 @@ *> is a 2-by-2 diagonal block. If UPLO = 'L' and IPIV(k) = *> IPIV(k+1) < 0, then rows and columns k+1 and -IPIV(k) were *> interchanged and D(k:k+1,k:k+1) is a 2-by-2 diagonal block. -*> \endverbatim -*> \verbatim +*> *> If FACT = 'N', then IPIV is an output argument and on exit *> contains details of the interchanges and the block structure *> of D, as determined by CHPTRF. -- cgit v1.2.3