aboutsummaryrefslogtreecommitdiff
path: root/SRC/zpprfs.f
diff options
context:
space:
mode:
Diffstat (limited to 'SRC/zpprfs.f')
-rw-r--r--SRC/zpprfs.f32
1 files changed, 16 insertions, 16 deletions
diff --git a/SRC/zpprfs.f b/SRC/zpprfs.f
index 01977a93..c62868f7 100644
--- a/SRC/zpprfs.f
+++ b/SRC/zpprfs.f
@@ -15,8 +15,8 @@
*> [TXT]</a>
*> \endhtmlonly
*
-* Definition
-* ==========
+* Definition:
+* ===========
*
* SUBROUTINE ZPPRFS( UPLO, N, NRHS, AP, AFP, B, LDB, X, LDX, FERR,
* BERR, WORK, RWORK, INFO )
@@ -31,21 +31,20 @@
* $ X( LDX, * )
* ..
*
-* Purpose
-* =======
*
-*>\details \b Purpose:
-*>\verbatim
+*> \par Purpose:
+* =============
+*>
+*> \verbatim
*>
*> ZPPRFS improves the computed solution to a system of linear
*> equations when the coefficient matrix is Hermitian positive definite
*> and packed, and provides error bounds and backward error estimates
*> for the solution.
-*>
-*>\endverbatim
+*> \endverbatim
*
-* Arguments
-* =========
+* Arguments:
+* ==========
*
*> \param[in] UPLO
*> \verbatim
@@ -147,16 +146,17 @@
*> INFO is INTEGER
*> = 0: successful exit
*> < 0: if INFO = -i, the i-th argument had an illegal value
+*> \endverbatim
+*
+*> \par Internal Parameters:
+* =========================
*>
-*> Internal Parameters
-*> ===================
-*>
+*> \verbatim
*> ITMAX is the maximum number of steps of iterative refinement.
*> \endverbatim
-*>
*
-* Authors
-* =======
+* Authors:
+* ========
*
*> \author Univ. of Tennessee
*> \author Univ. of California Berkeley