summaryrefslogtreecommitdiff
path: root/SRC/dlasd6.f
diff options
context:
space:
mode:
Diffstat (limited to 'SRC/dlasd6.f')
-rw-r--r--SRC/dlasd6.f34
1 files changed, 13 insertions, 21 deletions
diff --git a/SRC/dlasd6.f b/SRC/dlasd6.f
index 5f34d79d..7a8c7999 100644
--- a/SRC/dlasd6.f
+++ b/SRC/dlasd6.f
@@ -15,8 +15,8 @@
*> [TXT]</a>
*> \endhtmlonly
*
-* Definition
-* ==========
+* Definition:
+* ===========
*
* SUBROUTINE DLASD6( ICOMPQ, NL, NR, SQRE, D, VF, VL, ALPHA, BETA,
* IDXQ, PERM, GIVPTR, GIVCOL, LDGCOL, GIVNUM,
@@ -36,11 +36,11 @@
* $ VF( * ), VL( * ), WORK( * ), Z( * )
* ..
*
-* Purpose
-* =======
*
-*>\details \b Purpose:
-*>\verbatim
+*> \par Purpose:
+* =============
+*>
+*> \verbatim
*>
*> DLASD6 computes the SVD of an updated upper bidiagonal matrix B
*> obtained by merging two smaller ones by appending a row. This
@@ -86,11 +86,10 @@
*> values.
*>
*> DLASD6 is called from DLASDA.
-*>
-*>\endverbatim
+*> \endverbatim
*
-* Arguments
-* =========
+* Arguments:
+* ==========
*
*> \param[in] ICOMPQ
*> \verbatim
@@ -290,10 +289,9 @@
*> < 0: if INFO = -i, the i-th argument had an illegal value.
*> > 0: if INFO = 1, a singular value did not converge
*> \endverbatim
-*>
*
-* Authors
-* =======
+* Authors:
+* ========
*
*> \author Univ. of Tennessee
*> \author Univ. of California Berkeley
@@ -304,18 +302,12 @@
*
*> \ingroup auxOTHERauxiliary
*
-*
-* Further Details
-* ===============
-*>\details \b Further \b Details
-*> \verbatim
+*> \par Contributors:
+* ==================
*>
-*> Based on contributions by
*> Ming Gu and Huan Ren, Computer Science Division, University of
*> California at Berkeley, USA
*>
-*> \endverbatim
-*>
* =====================================================================
SUBROUTINE DLASD6( ICOMPQ, NL, NR, SQRE, D, VF, VL, ALPHA, BETA,
$ IDXQ, PERM, GIVPTR, GIVCOL, LDGCOL, GIVNUM,