summaryrefslogtreecommitdiff
path: root/SRC/slange.f
diff options
context:
space:
mode:
Diffstat (limited to 'SRC/slange.f')
-rw-r--r--SRC/slange.f31
1 files changed, 14 insertions, 17 deletions
diff --git a/SRC/slange.f b/SRC/slange.f
index bbc71bc3..699921b3 100644
--- a/SRC/slange.f
+++ b/SRC/slange.f
@@ -15,8 +15,8 @@
*> [TXT]</a>
*> \endhtmlonly
*
-* Definition
-* ==========
+* Definition:
+* ===========
*
* REAL FUNCTION SLANGE( NORM, M, N, A, LDA, WORK )
*
@@ -28,20 +28,19 @@
* REAL A( LDA, * ), WORK( * )
* ..
*
-* Purpose
-* =======
*
-*>\details \b Purpose:
-*>\verbatim
+*> \par Purpose:
+* =============
+*>
+*> \verbatim
*>
*> SLANGE returns the value of the one norm, or the Frobenius norm, or
*> the infinity norm, or the element of largest absolute value of a
*> real matrix A.
+*> \endverbatim
*>
-*> Description
-*> ===========
-*>
-*> SLANGE returns the value
+*> \return SLANGE
+*> \verbatim
*>
*> SLANGE = ( max(abs(A(i,j))), NORM = 'M' or 'm'
*> (
@@ -55,11 +54,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
@@ -100,10 +98,9 @@
*> where LWORK >= M when NORM = 'I'; otherwise, WORK is not
*> referenced.
*> \endverbatim
-*>
*
-* Authors
-* =======
+* Authors:
+* ========
*
*> \author Univ. of Tennessee
*> \author Univ. of California Berkeley