summaryrefslogtreecommitdiff
path: root/SRC/zlantp.f
diff options
context:
space:
mode:
Diffstat (limited to 'SRC/zlantp.f')
-rw-r--r--SRC/zlantp.f31
1 files changed, 14 insertions, 17 deletions
diff --git a/SRC/zlantp.f b/SRC/zlantp.f
index c2b25bc6..e2167f95 100644
--- a/SRC/zlantp.f
+++ b/SRC/zlantp.f
@@ -15,8 +15,8 @@
*> [TXT]</a>
*> \endhtmlonly
*
-* Definition
-* ==========
+* Definition:
+* ===========
*
* DOUBLE PRECISION FUNCTION ZLANTP( NORM, UPLO, DIAG, N, AP, WORK )
*
@@ -29,20 +29,19 @@
* COMPLEX*16 AP( * )
* ..
*
-* Purpose
-* =======
*
-*>\details \b Purpose:
-*>\verbatim
+*> \par Purpose:
+* =============
+*>
+*> \verbatim
*>
*> ZLANTP returns the value of the one norm, or the Frobenius norm, or
*> the infinity norm, or the element of largest absolute value of a
*> triangular matrix A, supplied in packed form.
+*> \endverbatim
*>
-*> Description
-*> ===========
-*>
-*> ZLANTP returns the value
+*> \return ZLANTP
+*> \verbatim
*>
*> ZLANTP = ( max(abs(A(i,j))), NORM = 'M' or 'm'
*> (
@@ -56,11 +55,10 @@
*> normI denotes the infinity norm of a matrix (maximum row sum) and
*> normF denotes the Frobenius norm of a matrix (square root of sum of
*> squares). Note that max(abs(A(i,j))) is not a consistent matrix norm.
-*>
-*>\endverbatim
+*> \endverbatim
*
-* Arguments
-* =========
+* Arguments:
+* ==========
*
*> \param[in] NORM
*> \verbatim
@@ -111,10 +109,9 @@
*> where LWORK >= N when NORM = 'I'; otherwise, WORK is not
*> referenced.
*> \endverbatim
-*>
*
-* Authors
-* =======
+* Authors:
+* ========
*
*> \author Univ. of Tennessee
*> \author Univ. of California Berkeley