From 1c3ba600671a59785b0c647d400226b4cc19a11f Mon Sep 17 00:00:00 2001
From: julie <julielangou@users.noreply.github.com>
Date: Thu, 3 Nov 2011 20:32:56 +0000
Subject: Cosmetic changes in Doxygen presentation. Use \par instead of
 \details for section.

add a Contributors Section and a Reference Section.
Remove (some) verbatim section when not needed.
Those changes have been done by hand so I am not sure I manage to catch them all.
---
 SRC/stgsja.f | 32 ++++++++++++++------------------
 1 file changed, 14 insertions(+), 18 deletions(-)

(limited to 'SRC/stgsja.f')

diff --git a/SRC/stgsja.f b/SRC/stgsja.f
index a53e4a82..2a154e91 100644
--- a/SRC/stgsja.f
+++ b/SRC/stgsja.f
@@ -15,8 +15,8 @@
 *> [TXT]</a>
 *> \endhtmlonly 
 *
-*  Definition
-*  ==========
+*  Definition:
+*  ===========
 *
 *       SUBROUTINE STGSJA( JOBU, JOBV, JOBQ, M, P, N, K, L, A, LDA, B,
 *                          LDB, TOLA, TOLB, ALPHA, BETA, U, LDU, V, LDV,
@@ -34,11 +34,11 @@
 *      $                   V( LDV, * ), WORK( * )
 *       ..
 *  
-*  Purpose
-*  =======
 *
-*>\details \b Purpose:
-*>\verbatim
+*> \par Purpose:
+*  =============
+*>
+*> \verbatim
 *>
 *> STGSJA computes the generalized singular value decomposition (GSVD)
 *> of two real upper triangular (or trapezoidal) matrices A and B.
@@ -123,11 +123,10 @@
 *> The computation of the orthogonal transformation matrices U, V or Q
 *> is optional.  These matrices may either be formed explicitly, or they
 *> may be postmultiplied into input matrices U1, V1, or Q1.
-*>
-*>\endverbatim
+*> \endverbatim
 *
-*  Arguments
-*  =========
+*  Arguments:
+*  ==========
 *
 *> \param[in] JOBU
 *> \verbatim
@@ -342,10 +341,9 @@
 *>          may take. If after MAXIT cycles, the routine fails to
 *>          converge, we return INFO = 1.
 *> \endverbatim
-*>
 *
-*  Authors
-*  =======
+*  Authors:
+*  ========
 *
 *> \author Univ. of Tennessee 
 *> \author Univ. of California Berkeley 
@@ -356,10 +354,9 @@
 *
 *> \ingroup realOTHERcomputational
 *
-*
-*  Further Details
-*  ===============
-*>\details \b Further \b Details
+*> \par Further Details:
+*  =====================
+*>
 *> \verbatim
 *>
 *>  STGSJA essentially uses a variant of Kogbetliantz algorithm to reduce
@@ -374,7 +371,6 @@
 *>                C1**2 + S1**2 = I,
 *>
 *>  and R1 is an L-by-L nonsingular upper triangular matrix.
-*>
 *> \endverbatim
 *>
 *  =====================================================================
-- 
cgit v1.2.3