summaryrefslogtreecommitdiff
path: root/TESTING/EIG/zbdt01.f
diff options
context:
space:
mode:
Diffstat (limited to 'TESTING/EIG/zbdt01.f')
-rw-r--r--TESTING/EIG/zbdt01.f24
1 files changed, 11 insertions, 13 deletions
diff --git a/TESTING/EIG/zbdt01.f b/TESTING/EIG/zbdt01.f
index 10eb6016..572ac56a 100644
--- a/TESTING/EIG/zbdt01.f
+++ b/TESTING/EIG/zbdt01.f
@@ -5,8 +5,8 @@
* Online html documentation available at
* http://www.netlib.org/lapack/explore-html/
*
-* Definition
-* ==========
+* Definition:
+* ===========
*
* SUBROUTINE ZBDT01( M, N, KD, A, LDA, Q, LDQ, D, E, PT, LDPT, WORK,
* RWORK, RESID )
@@ -21,11 +21,11 @@
* $ WORK( * )
* ..
*
-* Purpose
-* =======
*
-*>\details \b Purpose:
-*>\verbatim
+*> \par Purpose:
+* =============
+*>
+*> \verbatim
*>
*> ZBDT01 reconstructs a general matrix A from its bidiagonal form
*> A = Q * B * P'
@@ -35,11 +35,10 @@
*> The test ratio to test the reduction is
*> RESID = norm( A - Q * B * PT ) / ( n * norm(A) * EPS )
*> where PT = P' and EPS is the machine precision.
-*>
-*>\endverbatim
+*> \endverbatim
*
-* Arguments
-* =========
+* Arguments:
+* ==========
*
*> \param[in] M
*> \verbatim
@@ -130,10 +129,9 @@
*> RESID is DOUBLE PRECISION
*> The test ratio: norm(A - Q * B * P') / ( n * norm(A) * EPS )
*> \endverbatim
-*>
*
-* Authors
-* =======
+* Authors:
+* ========
*
*> \author Univ. of Tennessee
*> \author Univ. of California Berkeley