aboutsummaryrefslogtreecommitdiff
path: root/SRC/slatps.f
diff options
context:
space:
mode:
authorjulie <julielangou@users.noreply.github.com>2011-11-03 20:32:56 +0000
committerjulie <julielangou@users.noreply.github.com>2011-11-03 20:32:56 +0000
commit1c3ba600671a59785b0c647d400226b4cc19a11f (patch)
tree2af647fcff119db522016721e10b5ee7768d22bb /SRC/slatps.f
parentd5c30c90bdecf38da1064e2ed52583634573e741 (diff)
Cosmetic changes in Doxygen presentation.
Use \par instead of \details for section. add a Contributors Section and a Reference Section. Remove (some) verbatim section when not needed. Those changes have been done by hand so I am not sure I manage to catch them all.
Diffstat (limited to 'SRC/slatps.f')
-rw-r--r--SRC/slatps.f32
1 files changed, 14 insertions, 18 deletions
diff --git a/SRC/slatps.f b/SRC/slatps.f
index 9e84b1db..3b0f0ead 100644
--- a/SRC/slatps.f
+++ b/SRC/slatps.f
@@ -15,8 +15,8 @@
*> [TXT]</a>
*> \endhtmlonly
*
-* Definition
-* ==========
+* Definition:
+* ===========
*
* SUBROUTINE SLATPS( UPLO, TRANS, DIAG, NORMIN, N, AP, X, SCALE,
* CNORM, INFO )
@@ -30,11 +30,11 @@
* REAL AP( * ), CNORM( * ), X( * )
* ..
*
-* Purpose
-* =======
*
-*>\details \b Purpose:
-*>\verbatim
+*> \par Purpose:
+* =============
+*>
+*> \verbatim
*>
*> SLATPS solves one of the triangular systems
*>
@@ -48,11 +48,10 @@
*> unscaled problem will not cause overflow, the Level 2 BLAS routine
*> STPSV is called. If the matrix A is singular (A(j,j) = 0 for some j),
*> then s is set to 0 and a non-trivial solution to A*x = 0 is returned.
-*>
-*>\endverbatim
+*> \endverbatim
*
-* Arguments
-* =========
+* Arguments:
+* ==========
*
*> \param[in] UPLO
*> \verbatim
@@ -141,10 +140,9 @@
*> = 0: successful exit
*> < 0: if INFO = -k, the k-th argument had an illegal value
*> \endverbatim
-*>
*
-* Authors
-* =======
+* Authors:
+* ========
*
*> \author Univ. of Tennessee
*> \author Univ. of California Berkeley
@@ -155,10 +153,9 @@
*
*> \ingroup realOTHERauxiliary
*
-*
-* Further Details
-* ===============
-*>\details \b Further \b Details
+*> \par Further Details:
+* =====================
+*>
*> \verbatim
*>
*> A rough bound on x is computed; if that is less than overflow, STPSV
@@ -226,7 +223,6 @@
*>
*> and we can safely call STPSV if 1/M(n) and 1/G(n) are both greater
*> than max(underflow, 1/overflow).
-*>
*> \endverbatim
*>
* =====================================================================