aboutsummaryrefslogtreecommitdiff
path: root/SRC/slaqr1.f
diff options
context:
space:
mode:
Diffstat (limited to 'SRC/slaqr1.f')
-rw-r--r--SRC/slaqr1.f38
1 files changed, 15 insertions, 23 deletions
diff --git a/SRC/slaqr1.f b/SRC/slaqr1.f
index 94403cca..d6375613 100644
--- a/SRC/slaqr1.f
+++ b/SRC/slaqr1.f
@@ -15,8 +15,8 @@
*> [TXT]</a>
*> \endhtmlonly
*
-* Definition
-* ==========
+* Definition:
+* ===========
*
* SUBROUTINE SLAQR1( N, H, LDH, SR1, SI1, SR2, SI2, V )
*
@@ -28,11 +28,11 @@
* REAL H( LDH, * ), V( * )
* ..
*
-* Purpose
-* =======
*
-*>\details \b Purpose:
-*>\verbatim
+*> \par Purpose:
+* =============
+*>
+*> \verbatim
*>
*> Given a 2-by-2 or 3-by-3 matrix H, SLAQR1 sets v to a
*> scalar multiple of the first column of the product
@@ -48,11 +48,10 @@
*>
*> This is useful for starting double implicit shift bulges
*> in the QR algorithm.
-*>
-*>\endverbatim
+*> \endverbatim
*
-* Arguments
-* =========
+* Arguments:
+* ==========
*
*> \param[in] N
*> \verbatim
@@ -100,10 +99,9 @@
*> A scalar multiple of the first column of the
*> matrix K in (*).
*> \endverbatim
-*>
*
-* Authors
-* =======
+* Authors:
+* ========
*
*> \author Univ. of Tennessee
*> \author Univ. of California Berkeley
@@ -114,17 +112,11 @@
*
*> \ingroup realOTHERauxiliary
*
-*
-* Further Details
-* ===============
-*>\details \b Further \b Details
-*> \verbatim
+*> \par Contributors:
+* ==================
*>
-*> Based on contributions by
-*> Karen Braman and Ralph Byers, Department of Mathematics,
-*> University of Kansas, USA
-*>
-*> \endverbatim
+*> Karen Braman and Ralph Byers, Department of Mathematics,
+*> University of Kansas, USA
*>
* =====================================================================
SUBROUTINE SLAQR1( N, H, LDH, SR1, SI1, SR2, SI2, V )