summaryrefslogtreecommitdiff
path: root/SRC/zlaqhb.f
diff options
context:
space:
mode:
Diffstat (limited to 'SRC/zlaqhb.f')
-rw-r--r--SRC/zlaqhb.f32
1 files changed, 16 insertions, 16 deletions
diff --git a/SRC/zlaqhb.f b/SRC/zlaqhb.f
index c96a1081..9500be44 100644
--- a/SRC/zlaqhb.f
+++ b/SRC/zlaqhb.f
@@ -15,8 +15,8 @@
*> [TXT]</a>
*> \endhtmlonly
*
-* Definition
-* ==========
+* Definition:
+* ===========
*
* SUBROUTINE ZLAQHB( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, EQUED )
*
@@ -30,19 +30,18 @@
* COMPLEX*16 AB( LDAB, * )
* ..
*
-* Purpose
-* =======
*
-*>\details \b Purpose:
-*>\verbatim
+*> \par Purpose:
+* =============
+*>
+*> \verbatim
*>
*> ZLAQHB equilibrates a Hermitian band matrix A
*> using the scaling factors in the vector S.
-*>
-*>\endverbatim
+*> \endverbatim
*
-* Arguments
-* =========
+* Arguments:
+* ==========
*
*> \param[in] UPLO
*> \verbatim
@@ -112,10 +111,12 @@
*> = 'N': No equilibration.
*> = 'Y': Equilibration was done, i.e., A has been replaced by
*> diag(S) * A * diag(S).
+*> \endverbatim
+*
+*> \par Internal Parameters:
+* =========================
*>
-*> Internal Parameters
-*> ===================
-*>
+*> \verbatim
*> THRESH is a threshold value used to decide if scaling should be done
*> based on the ratio of the scaling factors. If SCOND < THRESH,
*> scaling is done.
@@ -124,10 +125,9 @@
*> be done based on the absolute size of the largest matrix element.
*> If AMAX > LARGE or AMAX < SMALL, scaling is done.
*> \endverbatim
-*>
*
-* Authors
-* =======
+* Authors:
+* ========
*
*> \author Univ. of Tennessee
*> \author Univ. of California Berkeley