diff options
Diffstat (limited to 'SRC/ztprfs.f')
| -rw-r--r-- | SRC/ztprfs.f | 24 |
1 files changed, 11 insertions, 13 deletions
diff --git a/SRC/ztprfs.f b/SRC/ztprfs.f index 961caf46..1e143d0b 100644 --- a/SRC/ztprfs.f +++ b/SRC/ztprfs.f @@ -15,8 +15,8 @@ *> [TXT]</a> *> \endhtmlonly * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZTPRFS( UPLO, TRANS, DIAG, N, NRHS, AP, B, LDB, X, LDX, * FERR, BERR, WORK, RWORK, INFO ) @@ -30,11 +30,11 @@ * COMPLEX*16 AP( * ), B( LDB, * ), WORK( * ), X( LDX, * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZTPRFS provides error bounds and backward error estimates for the *> solution to a system of linear equations with a triangular packed @@ -43,11 +43,10 @@ *> The solution matrix X must be computed by ZTPTRS or some other *> means before entering this routine. ZTPRFS does not do iterative *> refinement because doing so cannot improve the backward error. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -158,10 +157,9 @@ *> = 0: successful exit *> < 0: if INFO = -i, the i-th argument had an illegal value *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley |