1 files changed, 11 insertions, 13 deletions
diff --git a/SRC/dopgtr.f b/SRC/dopgtr.f
index 62b5d0b9..d0725fa9 100644
--- a/SRC/dopgtr.f
+++ b/SRC/dopgtr.f
@@ -15,8 +15,8 @@
 *> [TXT]</a>
 *> \endhtmlonly 
 *
-*  Definition
-*  ==========
+*  Definition:
+*  ===========
 *
 *       SUBROUTINE DOPGTR( UPLO, N, AP, TAU, Q, LDQ, WORK, INFO )
 * 
@@ -28,11 +28,11 @@
 *       DOUBLE PRECISION   AP( * ), Q( LDQ, * ), TAU( * ), WORK( * )
 *       ..
 *  
-*  Purpose
-*  =======
 *
-*>\details \b Purpose:
-*>\verbatim
+*> \par Purpose:
+*  =============
+*>
+*> \verbatim
 *>
 *> DOPGTR generates a real orthogonal matrix Q which is defined as the
 *> product of n-1 elementary reflectors H(i) 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
@@ -99,10 +98,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