diff options
Diffstat (limited to 'SRC/slange.f')
-rw-r--r-- | SRC/slange.f | 31 |
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 |