summaryrefslogtreecommitdiff
path: root/SRC/dorgtr.f
diff options
context:
space:
mode:
Diffstat (limited to 'SRC/dorgtr.f')
-rw-r--r--SRC/dorgtr.f24
1 files changed, 11 insertions, 13 deletions
diff --git a/SRC/dorgtr.f b/SRC/dorgtr.f
index dff9bf44..03d416ad 100644
--- a/SRC/dorgtr.f
+++ b/SRC/dorgtr.f
@@ -15,8 +15,8 @@
*> [TXT]</a>
*> \endhtmlonly
*
-* Definition
-* ==========
+* Definition:
+* ===========
*
* SUBROUTINE DORGTR( UPLO, N, A, LDA, TAU, WORK, LWORK, INFO )
*
@@ -28,11 +28,11 @@
* DOUBLE PRECISION A( LDA, * ), TAU( * ), WORK( * )
* ..
*
-* Purpose
-* =======
*
-*>\details \b Purpose:
-*>\verbatim
+*> \par Purpose:
+* =============
+*>
+*> \verbatim
*>
*> DORGTR generates a real orthogonal matrix Q which is defined as the
*> product of n-1 elementary reflectors of order N, as returned by
@@ -41,11 +41,10 @@
*> if UPLO = 'U', Q = H(n-1) . . . H(2) H(1),
*>
*> if UPLO = 'L', Q = H(1) H(2) . . . H(n-1).
-*>
-*>\endverbatim
+*> \endverbatim
*
-* Arguments
-* =========
+* Arguments:
+* ==========
*
*> \param[in] UPLO
*> \verbatim
@@ -108,10 +107,9 @@
*> = 0: successful exit
*> < 0: if INFO = -i, the i-th argument had an illegal value
*> \endverbatim
-*>
*
-* Authors
-* =======
+* Authors:
+* ========
*
*> \author Univ. of Tennessee
*> \author Univ. of California Berkeley