diff options
Diffstat (limited to 'SRC/cggsvd.f')
-rw-r--r-- | SRC/cggsvd.f | 42 |
1 files changed, 18 insertions, 24 deletions
diff --git a/SRC/cggsvd.f b/SRC/cggsvd.f index 2280d3fc..962fa05b 100644 --- a/SRC/cggsvd.f +++ b/SRC/cggsvd.f @@ -15,8 +15,8 @@ *> [TXT]</a> *> \endhtmlonly * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CGGSVD( JOBU, JOBV, JOBQ, M, N, P, K, L, A, LDA, B, * LDB, ALPHA, BETA, U, LDU, V, LDV, Q, LDQ, WORK, @@ -33,11 +33,11 @@ * $ U( LDU, * ), V( LDV, * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CGGSVD computes the generalized singular value decomposition (GSVD) *> of an M-by-N complex matrix A and P-by-N complex matrix B: @@ -117,11 +117,10 @@ *> *> X = Q*( I 0 ) *> ( 0 inv(R) ) -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] JOBU *> \verbatim @@ -298,10 +297,12 @@ *> < 0: if INFO = -i, the i-th argument had an illegal value. *> > 0: if INFO = 1, the Jacobi-type procedure failed to *> converge. For further details, see subroutine CTGSJA. +*> \endverbatim +* +*> \par Internal Parameters: +* ========================= *> -*> Internal Parameters -*> =================== -*> +*> \verbatim *> TOLA REAL *> TOLB REAL *> TOLA and TOLB are the thresholds to determine the effective @@ -311,10 +312,9 @@ *> The size of TOLA and TOLB may affect the size of backward *> errors of the decomposition. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -325,18 +325,12 @@ * *> \ingroup complexOTHERsing * -* -* Further Details -* =============== -*>\details \b Further \b Details -*> \verbatim +*> \par Contributors: +* ================== *> -*> 2-96 Based on modifications by *> Ming Gu and Huan Ren, Computer Science Division, University of *> California at Berkeley, USA *> -*> \endverbatim -*> * ===================================================================== SUBROUTINE CGGSVD( JOBU, JOBV, JOBQ, M, N, P, K, L, A, LDA, B, $ LDB, ALPHA, BETA, U, LDU, V, LDV, Q, LDQ, WORK, |