aboutsummaryrefslogtreecommitdiff
path: root/SRC/csyequb.f
diff options
context:
space:
mode:
Diffstat (limited to 'SRC/csyequb.f')
-rw-r--r--SRC/csyequb.f39
1 files changed, 16 insertions, 23 deletions
diff --git a/SRC/csyequb.f b/SRC/csyequb.f
index 421e42a9..c4cb24a9 100644
--- a/SRC/csyequb.f
+++ b/SRC/csyequb.f
@@ -15,8 +15,8 @@
*> [TXT]</a>
*> \endhtmlonly
*
-* Definition
-* ==========
+* Definition:
+* ===========
*
* SUBROUTINE CSYEQUB( UPLO, N, A, LDA, S, SCOND, AMAX, WORK, INFO )
*
@@ -30,11 +30,11 @@
* REAL S( * )
* ..
*
-* Purpose
-* =======
*
-*>\details \b Purpose:
-*>\verbatim
+*> \par Purpose:
+* =============
+*>
+*> \verbatim
*>
*> CSYEQUB computes row and column scalings intended to equilibrate a
*> symmetric matrix A and reduce its condition number
@@ -44,11 +44,10 @@
*> choice of S puts the condition number of B within a factor N of the
*> smallest possible condition number over all possible diagonal
*> scalings.
-*>
-*>\endverbatim
+*> \endverbatim
*
-* Arguments
-* =========
+* Arguments:
+* ==========
*
*> \param[in] UPLO
*> \verbatim
@@ -113,10 +112,9 @@
*> < 0: if INFO = -i, the i-th argument had an illegal value
*> > 0: if INFO = i, the i-th diagonal element is nonpositive.
*> \endverbatim
-*>
*
-* Authors
-* =======
+* Authors:
+* ========
*
*> \author Univ. of Tennessee
*> \author Univ. of California Berkeley
@@ -127,19 +125,14 @@
*
*> \ingroup complexSYcomputational
*
-*
-* Further Details
-* ===============
-*>\details \b Further \b Details
-*> \verbatim
+*> \par References:
+* ================
*>
-*> Reference: Livne, O.E. and Golub, G.H., "Scaling by Binormalization",
-*> Numerical Algorithms, vol. 35, no. 1, pp. 97-120, January 2004.
-*> DOI 10.1023/B:NUMA.0000016606.32820.69
+*> Livne, O.E. and Golub, G.H., "Scaling by Binormalization", \n
+*> Numerical Algorithms, vol. 35, no. 1, pp. 97-120, January 2004. \n
+*> DOI 10.1023/B:NUMA.0000016606.32820.69 \n
*> Tech report version: http://ruready.utah.edu/archive/papers/bin.pdf
*>
-*> \endverbatim
-*>
* =====================================================================
SUBROUTINE CSYEQUB( UPLO, N, A, LDA, S, SCOND, AMAX, WORK, INFO )
*