diff options
Diffstat (limited to 'SRC/dlaqsy.f')
-rw-r--r-- | SRC/dlaqsy.f | 32 |
1 files changed, 16 insertions, 16 deletions
diff --git a/SRC/dlaqsy.f b/SRC/dlaqsy.f index 0b141c2e..2060143f 100644 --- a/SRC/dlaqsy.f +++ b/SRC/dlaqsy.f @@ -15,8 +15,8 @@ *> [TXT]</a> *> \endhtmlonly * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DLAQSY( UPLO, N, A, LDA, S, SCOND, AMAX, EQUED ) * @@ -29,19 +29,18 @@ * DOUBLE PRECISION A( LDA, * ), S( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLAQSY equilibrates a symmetric matrix A using the scaling factors *> in the vector S. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -104,10 +103,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. @@ -116,10 +117,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 |