From 1c3ba600671a59785b0c647d400226b4cc19a11f Mon Sep 17 00:00:00 2001 From: julie 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/cbdsqr.f | 32 ++++++++++++++++---------------- 1 file changed, 16 insertions(+), 16 deletions(-) (limited to 'SRC/cbdsqr.f') diff --git a/SRC/cbdsqr.f b/SRC/cbdsqr.f index c9423b93..7121d07a 100644 --- a/SRC/cbdsqr.f +++ b/SRC/cbdsqr.f @@ -15,8 +15,8 @@ *> [TXT] *> \endhtmlonly * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CBDSQR( UPLO, N, NCVT, NRU, NCC, D, E, VT, LDVT, U, * LDU, C, LDC, RWORK, INFO ) @@ -30,11 +30,11 @@ * COMPLEX C( LDC, * ), U( LDU, * ), VT( LDVT, * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CBDSQR computes the singular values and, optionally, the right and/or *> left singular vectors from the singular value decomposition (SVD) of @@ -65,11 +65,10 @@ *> B. Parlett and V. Fernando, Technical Report CPAM-554, Mathematics *> Department, University of California at Berkeley, July 1992 *> for a detailed description of the algorithm. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -180,10 +179,12 @@ *> elements of a bidiagonal matrix which is orthogonally *> similar to the input matrix B; if INFO = i, i *> elements of E have not converged to zero. +*> \endverbatim +* +*> \par Internal Parameters: +* ========================= *> -*> Internal Parameters -*> =================== -*> +*> \verbatim *> TOLMUL REAL, default = max(10,min(100,EPS**(-1/8))) *> TOLMUL controls the convergence criterion of the QR loop. *> If it is positive, TOLMUL*EPS is the desired relative @@ -205,10 +206,9 @@ *> (and so fails to converge) if the number of passes *> through the inner loop exceeds MAXITR*N**2. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley -- cgit v1.2.3