summaryrefslogtreecommitdiff
path: root/SRC/ztptrs.f
diff options
context:
space:
mode:
Diffstat (limited to 'SRC/ztptrs.f')
-rw-r--r--SRC/ztptrs.f24
1 files changed, 11 insertions, 13 deletions
diff --git a/SRC/ztptrs.f b/SRC/ztptrs.f
index ab2581e4..24312dd7 100644
--- a/SRC/ztptrs.f
+++ b/SRC/ztptrs.f
@@ -15,8 +15,8 @@
*> [TXT]</a>
*> \endhtmlonly
*
-* Definition
-* ==========
+* Definition:
+* ===========
*
* SUBROUTINE ZTPTRS( UPLO, TRANS, DIAG, N, NRHS, AP, B, LDB, INFO )
*
@@ -28,11 +28,11 @@
* COMPLEX*16 AP( * ), B( LDB, * )
* ..
*
-* Purpose
-* =======
*
-*>\details \b Purpose:
-*>\verbatim
+*> \par Purpose:
+* =============
+*>
+*> \verbatim
*>
*> ZTPTRS solves a triangular system of the form
*>
@@ -41,11 +41,10 @@
*> where A is a triangular matrix of order N stored in packed format,
*> and B is an N-by-NRHS matrix. A check is made to verify that A is
*> nonsingular.
-*>
-*>\endverbatim
+*> \endverbatim
*
-* Arguments
-* =========
+* Arguments:
+* ==========
*
*> \param[in] UPLO
*> \verbatim
@@ -115,10 +114,9 @@
*> indicating that the matrix is singular and the
*> solutions X have not been computed.
*> \endverbatim
-*>
*
-* Authors
-* =======
+* Authors:
+* ========
*
*> \author Univ. of Tennessee
*> \author Univ. of California Berkeley