diff options
| author | julie <julielangou@users.noreply.github.com> | 2011-11-03 20:32:56 +0000 |
|---|---|---|
| committer | julie <julielangou@users.noreply.github.com> | 2011-11-03 20:32:56 +0000 |
| commit | 1c3ba600671a59785b0c647d400226b4cc19a11f (patch) | |
| tree | 2af647fcff119db522016721e10b5ee7768d22bb /TESTING/MATGEN | |
| parent | d5c30c90bdecf38da1064e2ed52583634573e741 (diff) | |
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.
Diffstat (limited to 'TESTING/MATGEN')
74 files changed, 844 insertions, 1016 deletions
diff --git a/TESTING/MATGEN/clagge.f b/TESTING/MATGEN/clagge.f index 36222571..0e6ba11c 100644 --- a/TESTING/MATGEN/clagge.f +++ b/TESTING/MATGEN/clagge.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CLAGGE( M, N, KL, KU, D, A, LDA, ISEED, WORK, INFO ) * @@ -19,21 +19,20 @@ * COMPLEX A( LDA, * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLAGGE generates a complex general m by n matrix A, by pre- and post- *> multiplying a real diagonal matrix D with random unitary matrices: *> A = U*D*V. The lower and upper bandwidths may then be reduced to *> kl and ku by additional unitary transformations. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \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 diff --git a/TESTING/MATGEN/claghe.f b/TESTING/MATGEN/claghe.f index 6cee2d60..339140c5 100644 --- a/TESTING/MATGEN/claghe.f +++ b/TESTING/MATGEN/claghe.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CLAGHE( N, K, D, A, LDA, ISEED, WORK, INFO ) * @@ -19,21 +19,20 @@ * COMPLEX A( LDA, * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLAGHE generates a complex hermitian matrix A, by pre- and post- *> multiplying a real diagonal matrix D with a random unitary matrix: *> A = U*D*U'. The semi-bandwidth may then be reduced to k by additional *> unitary transformations. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -87,10 +86,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 diff --git a/TESTING/MATGEN/clagsy.f b/TESTING/MATGEN/clagsy.f index afa1d80c..f2cd78f3 100644 --- a/TESTING/MATGEN/clagsy.f +++ b/TESTING/MATGEN/clagsy.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CLAGSY( N, K, D, A, LDA, ISEED, WORK, INFO ) * @@ -19,21 +19,20 @@ * COMPLEX A( LDA, * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLAGSY generates a complex symmetric matrix A, by pre- and post- *> multiplying a real diagonal matrix D with a random unitary matrix: *> A = U*D*U**T. The semi-bandwidth may then be reduced to k by *> additional unitary transformations. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -87,10 +86,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 diff --git a/TESTING/MATGEN/clahilb.f b/TESTING/MATGEN/clahilb.f index 68661e5d..4f226131 100644 --- a/TESTING/MATGEN/clahilb.f +++ b/TESTING/MATGEN/clahilb.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CLAHILB( N, NRHS, A, LDA, X, LDX, B, LDB, WORK, * INFO, PATH) @@ -19,11 +19,11 @@ * CHARACTER*3 PATH * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLAHILB generates an N by N scaled Hilbert matrix in A along with *> NRHS right-hand sides in B and solutions in X such that A*X=B. @@ -43,11 +43,10 @@ *> *> In single, the generated solution is exact for N <= 6 and has *> small componentwise error for 7 <= N <= 11. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -118,10 +117,9 @@ *> PATH is CHARACTER*3 *> The LAPACK path name. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -150,7 +148,6 @@ * .. * * ===================================================================== - * .. Local Scalars .. INTEGER TM, TI, R INTEGER M diff --git a/TESTING/MATGEN/clakf2.f b/TESTING/MATGEN/clakf2.f index 96819d07..79a15ab9 100644 --- a/TESTING/MATGEN/clakf2.f +++ b/TESTING/MATGEN/clakf2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CLAKF2( M, N, A, LDA, B, D, E, Z, LDZ ) * @@ -18,11 +18,11 @@ * $ E( LDA, * ), Z( LDZ, * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Form the 2*M*N by 2*M*N matrix *> @@ -32,11 +32,10 @@ *> where In is the identity matrix of size n and X' is the transpose *> of X. kron(X, Y) is the Kronecker product between the matrices X *> and Y. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -90,10 +89,9 @@ *> LDZ is INTEGER *> The leading dimension of Z. ( LDZ >= 2*M*N ) *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/clarge.f b/TESTING/MATGEN/clarge.f index 93b9ee8a..a59f813a 100644 --- a/TESTING/MATGEN/clarge.f +++ b/TESTING/MATGEN/clarge.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CLARGE( N, A, LDA, ISEED, WORK, INFO ) * @@ -18,19 +18,18 @@ * COMPLEX A( LDA, * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLARGE pre- and post-multiplies a complex general n by n matrix A *> with a random unitary matrix: A = U*D*U'. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -72,10 +71,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 diff --git a/TESTING/MATGEN/clarnd.f b/TESTING/MATGEN/clarnd.f index 46fa07ac..c91a3fb8 100644 --- a/TESTING/MATGEN/clarnd.f +++ b/TESTING/MATGEN/clarnd.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * COMPLEX FUNCTION CLARND( IDIST, ISEED ) * @@ -17,19 +17,18 @@ * INTEGER ISEED( 4 ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLARND returns a random complex number from a uniform or normal *> distribution. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] IDIST *> \verbatim @@ -50,10 +49,9 @@ *> odd. *> On exit, the seed is updated. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -64,16 +62,14 @@ * *> \ingroup complex_matgen * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> This routine calls the auxiliary routine SLARAN to generate a random *> real number from a uniform (0,1) distribution. The Box-Muller method *> is used to transform numbers from a uniform to a normal distribution. -*> *> \endverbatim *> * ===================================================================== diff --git a/TESTING/MATGEN/claror.f b/TESTING/MATGEN/claror.f index e2ad80e7..335eb4f4 100644 --- a/TESTING/MATGEN/claror.f +++ b/TESTING/MATGEN/claror.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CLAROR( SIDE, INIT, M, N, A, LDA, ISEED, X, INFO ) * @@ -19,11 +19,11 @@ * COMPLEX A( LDA, * ), X( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLAROR pre- or post-multiplies an M by N matrix A by a random *> unitary matrix U, overwriting A. A may optionally be @@ -31,11 +31,10 @@ *> U is generated using the method of G.W. Stewart *> ( SIAM J. Numer. Anal. 17, 1980, pp. 403-409 ). *> (BLAS-2 version) -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -143,10 +142,9 @@ *> to M. *> -6 if LDA is less than M. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/clarot.f b/TESTING/MATGEN/clarot.f index 08045499..c8b8cae5 100644 --- a/TESTING/MATGEN/clarot.f +++ b/TESTING/MATGEN/clarot.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CLAROT( LROWS, LLEFT, LRIGHT, NL, C, S, A, LDA, XLEFT, * XRIGHT ) @@ -20,11 +20,11 @@ * COMPLEX A( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLAROT applies a (Givens) rotation to two adjacent rows or *> columns, where one element of the first and/or last column/row @@ -125,11 +125,10 @@ *> *> . . . . . . *> A(1,i),LDA-1, XTOP, XBOTTM ) -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \verbatim *> LROWS - LOGICAL @@ -213,10 +212,9 @@ *> (if LROWS=.FALSE.). *> Read and modified. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/clatm1.f b/TESTING/MATGEN/clatm1.f index 86ea9370..4575f9eb 100644 --- a/TESTING/MATGEN/clatm1.f +++ b/TESTING/MATGEN/clatm1.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CLATM1( MODE, COND, IRSIGN, IDIST, ISEED, D, N, INFO ) * @@ -19,21 +19,20 @@ * COMPLEX D( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLATM1 computes the entries of D(1..N) as specified by *> MODE, COND and IRSIGN. IDIST and ISEED determine the generation *> of random numbers. CLATM1 is called by CLATMR to generate *> random test matrices for LAPACK programs. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] MODE *> \verbatim @@ -122,10 +121,9 @@ *> -4 => if MODE equals 6 or -6 and IDIST not in range 1 to 4 *> -7 => if N negative *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/clatm2.f b/TESTING/MATGEN/clatm2.f index 76e053bf..64f0e78d 100644 --- a/TESTING/MATGEN/clatm2.f +++ b/TESTING/MATGEN/clatm2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * COMPLEX FUNCTION CLATM2( M, N, I, J, KL, KU, IDIST, ISEED, D, * IGRADE, DL, DR, IPVTNG, IWORK, SPARSE ) @@ -23,11 +23,11 @@ * COMPLEX D( * ), DL( * ), DR( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLATM2 returns the (I,J) entry of a random matrix of dimension *> (M, N) described by the other paramters. It is called by the @@ -65,11 +65,10 @@ *> bandwidth KU. *> *> Set random entries to zero as specified by SPARSE. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -196,10 +195,9 @@ *> entries will be set to zero. *> Not modified. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/clatm3.f b/TESTING/MATGEN/clatm3.f index f2d9782a..e1746890 100644 --- a/TESTING/MATGEN/clatm3.f +++ b/TESTING/MATGEN/clatm3.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * COMPLEX FUNCTION CLATM3( M, N, I, J, ISUB, JSUB, KL, KU, IDIST, * ISEED, D, IGRADE, DL, DR, IPVTNG, IWORK, @@ -25,11 +25,11 @@ * COMPLEX D( * ), DL( * ), DR( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLATM3 returns the (ISUB,JSUB) entry of a random matrix of *> dimension (M, N) described by the other paramters. (ISUB,JSUB) @@ -70,11 +70,10 @@ *> bandwidth KU. *> *> Set random entries to zero as specified by SPARSE. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -212,10 +211,9 @@ *> entries will be set to zero. *> Not modified. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/clatm5.f b/TESTING/MATGEN/clatm5.f index b49e5c91..f9b1dd16 100644 --- a/TESTING/MATGEN/clatm5.f +++ b/TESTING/MATGEN/clatm5.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CLATM5( PRTYPE, M, N, A, LDA, B, LDB, C, LDC, D, LDD, * E, LDE, F, LDF, R, LDR, L, LDL, ALPHA, QBLCKA, @@ -23,11 +23,11 @@ * $ L( LDL, * ), R( LDR, * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLATM5 generates matrices involved in the Generalized Sylvester *> equation: @@ -40,11 +40,10 @@ *> [ I -L ] ( [ A -C ], [ D -F ] ) [ I R ] = ( [ A ], [ D ] ) *> [ I ] ( [ B ] [ E ] ) [ I ] ( [ B ] [ E ] ) *> -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] PRTYPE *> \verbatim @@ -184,10 +183,9 @@ *> blocks on the diagonal in B. Otherwise, QBLCKB is not *> referenced. QBLCKB > 1. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -198,10 +196,9 @@ * *> \ingroup complex_matgen * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> PRTYPE = 1: A and B are Jordan blocks, D and E are identity matrices @@ -264,7 +261,6 @@ *> L, R specifies the right hand sides (C, F). *> *> PRTYPE = 5 special case common and/or close eigs. -*> *> \endverbatim *> * ===================================================================== diff --git a/TESTING/MATGEN/clatm6.f b/TESTING/MATGEN/clatm6.f index 71b83070..93e675ab 100644 --- a/TESTING/MATGEN/clatm6.f +++ b/TESTING/MATGEN/clatm6.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CLATM6( TYPE, N, A, LDA, B, X, LDX, Y, LDY, ALPHA, * BETA, WX, WY, S, DIF ) @@ -21,11 +21,11 @@ * $ Y( LDY, * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLATM6 generates test matrices for the generalized eigenvalue *> problem, their corresponding right and left eigenvector matrices, @@ -63,11 +63,10 @@ *> 0 0 0 0 1, 0 0 0 0 1 , where *> *> a, b, x and y will have all values independently of each other. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TYPE *> \verbatim @@ -158,10 +157,9 @@ *> DIF is REAL array, dimension (N) *> DIF(i) is the reciprocal condition number for eigenvector i. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/clatme.f b/TESTING/MATGEN/clatme.f index b2499c76..8c6f64fe 100644 --- a/TESTING/MATGEN/clatme.f +++ b/TESTING/MATGEN/clatme.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CLATME( N, DIST, ISEED, D, MODE, COND, DMAX, * RSIGN, @@ -26,11 +26,11 @@ * COMPLEX A( LDA, * ), D( * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLATME generates random non-symmetric square matrices with *> specified eigenvalues for testing LAPACK programs. @@ -58,11 +58,10 @@ *> *> (Note: since the matrix cannot be reduced beyond Hessenberg form, *> no packing options are available.) -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -282,10 +281,9 @@ *> 4 => Error return from CLARGE *> 5 => Zero singular value from SLATM1. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/clatmr.f b/TESTING/MATGEN/clatmr.f index ae7dc93c..61611d36 100644 --- a/TESTING/MATGEN/clatmr.f +++ b/TESTING/MATGEN/clatmr.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CLATMR( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX, * RSIGN, GRADE, DL, MODEL, CONDL, DR, MODER, @@ -24,11 +24,11 @@ * COMPLEX A( LDA, * ), D( * ), DL( * ), DR( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLATMR generates random matrices of various types for testing *> LAPACK programs. @@ -85,11 +85,10 @@ *> in the order of the rows and/or columns, and otherwise *> contain the same data. This consistency cannot be and *> is not maintained with less than full bandwidth. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -472,10 +471,9 @@ *> 5 => ANORM is positive, but matrix constructed prior to *> attempting to scale it to have norm ANORM, is zero *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/clatms.f b/TESTING/MATGEN/clatms.f index 00768526..001024c8 100644 --- a/TESTING/MATGEN/clatms.f +++ b/TESTING/MATGEN/clatms.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CLATMS( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX, * KL, KU, PACK, A, LDA, WORK, INFO ) @@ -22,11 +22,11 @@ * COMPLEX A( LDA, * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLATMS generates random matrices with specified singular values *> (or hermitian with specified eigenvalues) @@ -82,11 +82,10 @@ *> If Method B is chosen, and band format is specified, then the *> matrix will be generated in the band format, so no repacking *> will be necessary. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -316,10 +315,9 @@ *> 2 => Cannot scale to DMAX (max. sing. value is 0) *> 3 => Error return from CLAGGE, CLAGHE or CLAGSY *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/clatmt.f b/TESTING/MATGEN/clatmt.f index bdfbf982..664293e4 100644 --- a/TESTING/MATGEN/clatmt.f +++ b/TESTING/MATGEN/clatmt.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CLATMT( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX, * RANK, KL, KU, PACK, A, LDA, WORK, INFO ) @@ -22,11 +22,11 @@ * INTEGER ISEED( 4 ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CLATMT generates random matrices with specified singular values *> (or hermitian with specified eigenvalues) @@ -82,11 +82,10 @@ *> If Method B is chosen, and band format is specified, then the *> matrix will be generated in the band format, so no repacking *> will be necessary. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -324,10 +323,9 @@ *> 2 => Cannot scale to DMAX (max. sing. value is 0) *> 3 => Error return from CLAGGE, CLAGHE or CLAGSY *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/dlagge.f b/TESTING/MATGEN/dlagge.f index 1a3b2a5c..d75294e3 100644 --- a/TESTING/MATGEN/dlagge.f +++ b/TESTING/MATGEN/dlagge.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DLAGGE( M, N, KL, KU, D, A, LDA, ISEED, WORK, INFO ) * @@ -18,21 +18,20 @@ * DOUBLE PRECISION A( LDA, * ), D( * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLAGGE generates a real general m by n matrix A, by pre- and post- *> multiplying a real diagonal matrix D with random orthogonal matrices: *> A = U*D*V. The lower and upper bandwidths may then be reduced to *> kl and ku by additional orthogonal transformations. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -98,10 +97,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 diff --git a/TESTING/MATGEN/dlagsy.f b/TESTING/MATGEN/dlagsy.f index 43853036..fc4cc165 100644 --- a/TESTING/MATGEN/dlagsy.f +++ b/TESTING/MATGEN/dlagsy.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DLAGSY( N, K, D, A, LDA, ISEED, WORK, INFO ) * @@ -18,21 +18,20 @@ * DOUBLE PRECISION A( LDA, * ), D( * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLAGSY generates a real symmetric matrix A, by pre- and post- *> multiplying a real diagonal matrix D with a random orthogonal matrix: *> A = U*D*U'. The semi-bandwidth may then be reduced to k by additional *> orthogonal transformations. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -86,10 +85,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 diff --git a/TESTING/MATGEN/dlahilb.f b/TESTING/MATGEN/dlahilb.f index b35f40ee..545cc278 100644 --- a/TESTING/MATGEN/dlahilb.f +++ b/TESTING/MATGEN/dlahilb.f @@ -5,8 +5,8 @@ C> \brief \b DLAHILB * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DLAHILB( N, NRHS, A, LDA, X, LDX, B, LDB, WORK, INFO) * @@ -16,11 +16,11 @@ C> \brief \b DLAHILB * DOUBLE PRECISION A(LDA, N), X(LDX, NRHS), B(LDB, NRHS), WORK(N) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLAHILB generates an N by N scaled Hilbert matrix in A along with *> NRHS right-hand sides in B and solutions in X such that A*X=B. @@ -40,11 +40,10 @@ C> \brief \b DLAHILB *> *> In single, the generated solution is exact for N <= 6 and has *> small componentwise error for 7 <= N <= 11. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -109,10 +108,9 @@ C> \brief \b DLAHILB *> be not exact. *> < 0: if INFO = -i, the i-th argument had an illegal value *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -138,7 +136,6 @@ C> \brief \b DLAHILB * .. * * ===================================================================== - * .. Local Scalars .. INTEGER TM, TI, R INTEGER M diff --git a/TESTING/MATGEN/dlakf2.f b/TESTING/MATGEN/dlakf2.f index 2cbed70c..af1cbe18 100644 --- a/TESTING/MATGEN/dlakf2.f +++ b/TESTING/MATGEN/dlakf2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DLAKF2( M, N, A, LDA, B, D, E, Z, LDZ ) * @@ -18,11 +18,11 @@ * $ E( LDA, * ), Z( LDZ, * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Form the 2*M*N by 2*M*N matrix *> @@ -32,11 +32,10 @@ *> where In is the identity matrix of size n and X' is the transpose *> of X. kron(X, Y) is the Kronecker product between the matrices X *> and Y. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -90,10 +89,9 @@ *> LDZ is INTEGER *> The leading dimension of Z. ( LDZ >= 2*M*N ) *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/dlaran.f b/TESTING/MATGEN/dlaran.f index cfd008ee..07cfb322 100644 --- a/TESTING/MATGEN/dlaran.f +++ b/TESTING/MATGEN/dlaran.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * DOUBLE PRECISION FUNCTION DLARAN( ISEED ) * @@ -14,19 +14,18 @@ * INTEGER ISEED( 4 ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLARAN returns a random real number from a uniform (0,1) *> distribution. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in,out] ISEED *> \verbatim @@ -36,10 +35,9 @@ *> odd. *> On exit, the seed is updated. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -50,10 +48,9 @@ * *> \ingroup list_temp * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> This routine uses a multiplicative congruential method with modulus @@ -65,7 +62,6 @@ *> 48-bit integers are stored in 4 integer array elements with 12 bits *> per element. Hence the routine is portable across machines with *> integers of 32 bits or more. -*> *> \endverbatim *> * ===================================================================== diff --git a/TESTING/MATGEN/dlarge.f b/TESTING/MATGEN/dlarge.f index e7e77e2a..bd863cfb 100644 --- a/TESTING/MATGEN/dlarge.f +++ b/TESTING/MATGEN/dlarge.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DLARGE( N, A, LDA, ISEED, WORK, INFO ) * @@ -18,19 +18,18 @@ * DOUBLE PRECISION A( LDA, * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLARGE pre- and post-multiplies a real general n by n matrix A *> with a random orthogonal matrix: A = U*D*U'. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -72,10 +71,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 diff --git a/TESTING/MATGEN/dlarnd.f b/TESTING/MATGEN/dlarnd.f index 3716cddd..29df1360 100644 --- a/TESTING/MATGEN/dlarnd.f +++ b/TESTING/MATGEN/dlarnd.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * DOUBLE PRECISION FUNCTION DLARND( IDIST, ISEED ) * @@ -17,19 +17,18 @@ * INTEGER ISEED( 4 ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLARND returns a random real number from a uniform or normal *> distribution. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] IDIST *> \verbatim @@ -48,10 +47,9 @@ *> odd. *> On exit, the seed is updated. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -62,16 +60,14 @@ * *> \ingroup double_matgen * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> This routine calls the auxiliary routine DLARAN to generate a random *> real number from a uniform (0,1) distribution. The Box-Muller method *> is used to transform numbers from a uniform to a normal distribution. -*> *> \endverbatim *> * ===================================================================== diff --git a/TESTING/MATGEN/dlaror.f b/TESTING/MATGEN/dlaror.f index 5bfa8459..5e14f6c3 100644 --- a/TESTING/MATGEN/dlaror.f +++ b/TESTING/MATGEN/dlaror.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DLAROR( SIDE, INIT, M, N, A, LDA, ISEED, X, INFO ) * @@ -19,21 +19,20 @@ * DOUBLE PRECISION A( LDA, * ), X( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLAROR pre- or post-multiplies an M by N matrix A by a random *> orthogonal matrix U, overwriting A. A may optionally be initialized *> to the identity matrix before multiplying by U. U is generated using *> the method of G.W. Stewart (SIAM J. Numer. Anal. 17, 1980, 403-409). -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -131,10 +130,9 @@ *> < 0: if INFO = -k, the k-th argument had an illegal value *> = 1: if the random numbers generated by DLARND are bad. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/dlarot.f b/TESTING/MATGEN/dlarot.f index 108a399a..1f89aed4 100644 --- a/TESTING/MATGEN/dlarot.f +++ b/TESTING/MATGEN/dlarot.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DLAROT( LROWS, LLEFT, LRIGHT, NL, C, S, A, LDA, XLEFT, * XRIGHT ) @@ -20,11 +20,11 @@ * DOUBLE PRECISION A( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLAROT applies a (Givens) rotation to two adjacent rows or *> columns, where one element of the first and/or last column/row @@ -125,11 +125,10 @@ *> *> . . . . . . *> A(1,i),LDA-1, XTOP, XBOTTM ) -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \verbatim *> LROWS - LOGICAL @@ -210,10 +209,9 @@ *> (if LROWS=.FALSE.). *> Read and modified. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/dlatm1.f b/TESTING/MATGEN/dlatm1.f index f8cbb9c9..d8f1296e 100644 --- a/TESTING/MATGEN/dlatm1.f +++ b/TESTING/MATGEN/dlatm1.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DLATM1( MODE, COND, IRSIGN, IDIST, ISEED, D, N, INFO ) * @@ -19,21 +19,20 @@ * DOUBLE PRECISION D( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLATM1 computes the entries of D(1..N) as specified by *> MODE, COND and IRSIGN. IDIST and ISEED determine the generation *> of random numbers. DLATM1 is called by SLATMR to generate *> random test matrices for LAPACK programs. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] MODE *> \verbatim @@ -120,10 +119,9 @@ *> -4 => if MODE equals 6 or -6 and IDIST not in range 1 to 3 *> -7 => if N negative *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/dlatm2.f b/TESTING/MATGEN/dlatm2.f index 1f3eaf38..968629b8 100644 --- a/TESTING/MATGEN/dlatm2.f +++ b/TESTING/MATGEN/dlatm2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * DOUBLE PRECISION FUNCTION DLATM2( M, N, I, J, KL, KU, IDIST, * ISEED, D, IGRADE, DL, DR, IPVTNG, IWORK, SPARSE ) @@ -23,11 +23,11 @@ * DOUBLE PRECISION D( * ), DL( * ), DR( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLATM2 returns the (I,J) entry of a random matrix of dimension *> (M, N) described by the other paramters. It is called by the @@ -65,11 +65,10 @@ *> bandwidth KU. *> *> Set random entries to zero as specified by SPARSE. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -192,10 +191,9 @@ *> entries will be set to zero. *> Not modified. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/dlatm3.f b/TESTING/MATGEN/dlatm3.f index 10d1b2ba..9107fe95 100644 --- a/TESTING/MATGEN/dlatm3.f +++ b/TESTING/MATGEN/dlatm3.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * DOUBLE PRECISION FUNCTION DLATM3( M, N, I, J, ISUB, JSUB, KL, KU, * IDIST, ISEED, D, IGRADE, DL, DR, IPVTNG, IWORK, @@ -25,11 +25,11 @@ * DOUBLE PRECISION D( * ), DL( * ), DR( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLATM3 returns the (ISUB,JSUB) entry of a random matrix of *> dimension (M, N) described by the other paramters. (ISUB,JSUB) @@ -70,11 +70,10 @@ *> bandwidth KU. *> *> Set random entries to zero as specified by SPARSE. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -209,10 +208,9 @@ *> entries will be set to zero. *> Not modified. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/dlatm5.f b/TESTING/MATGEN/dlatm5.f index d3bb66ea..97deab2f 100644 --- a/TESTING/MATGEN/dlatm5.f +++ b/TESTING/MATGEN/dlatm5.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DLATM5( PRTYPE, M, N, A, LDA, B, LDB, C, LDC, D, LDD, * E, LDE, F, LDF, R, LDR, L, LDL, ALPHA, QBLCKA, @@ -23,11 +23,11 @@ * $ L( LDL, * ), R( LDR, * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLATM5 generates matrices involved in the Generalized Sylvester *> equation: @@ -40,11 +40,10 @@ *> [ I -L ] ( [ A -C ], [ D -F ] ) [ I R ] = ( [ A ], [ D ] ) *> [ I ] ( [ B ] [ E ] ) [ I ] ( [ B ] [ E ] ) *> -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] PRTYPE *> \verbatim @@ -184,10 +183,9 @@ *> blocks on the diagonal in B. Otherwise, QBLCKB is not *> referenced. QBLCKB > 1. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -198,10 +196,9 @@ * *> \ingroup double_matgen * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> PRTYPE = 1: A and B are Jordan blocks, D and E are identity matrices @@ -264,7 +261,6 @@ *> L, R specifies the right hand sides (C, F). *> *> PRTYPE = 5 special case common and/or close eigs. -*> *> \endverbatim *> * ===================================================================== diff --git a/TESTING/MATGEN/dlatm6.f b/TESTING/MATGEN/dlatm6.f index 09f92aa8..ee929e89 100644 --- a/TESTING/MATGEN/dlatm6.f +++ b/TESTING/MATGEN/dlatm6.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DLATM6( TYPE, N, A, LDA, B, X, LDX, Y, LDY, ALPHA, * BETA, WX, WY, S, DIF ) @@ -20,11 +20,11 @@ * $ X( LDX, * ), Y( LDY, * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLATM6 generates test matrices for the generalized eigenvalue *> problem, their corresponding right and left eigenvector matrices, @@ -65,11 +65,10 @@ *> 0 0 0 0 1, 0 0 0 0 1 , *> *> where a, b, x and y will have all values independently of each other. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TYPE *> \verbatim @@ -160,10 +159,9 @@ *> DIF is DOUBLE PRECISION array, dimension (N) *> DIF(i) is the reciprocal condition number for eigenvector i. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/dlatm7.f b/TESTING/MATGEN/dlatm7.f index 252530f7..64efb748 100644 --- a/TESTING/MATGEN/dlatm7.f +++ b/TESTING/MATGEN/dlatm7.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DLATM7( MODE, COND, IRSIGN, IDIST, ISEED, D, N, * RANK, INFO ) @@ -20,21 +20,20 @@ * INTEGER ISEED( 4 ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLATM7 computes the entries of D as specified by MODE *> COND and IRSIGN. IDIST and ISEED determine the generation *> of random numbers. DLATM7 is called by DLATMT to generate *> random test matrices. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \verbatim *> MODE - INTEGER @@ -106,10 +105,9 @@ *> -4 => if MODE equals 6 or -6 and IDIST not in range 1 to 3 *> -7 => if N negative *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/dlatme.f b/TESTING/MATGEN/dlatme.f index 9eccb773..804f0fd4 100644 --- a/TESTING/MATGEN/dlatme.f +++ b/TESTING/MATGEN/dlatme.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DLATME( N, DIST, ISEED, D, MODE, COND, DMAX, EI, * RSIGN, @@ -25,11 +25,11 @@ * DOUBLE PRECISION A( LDA, * ), D( * ), DS( * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLATME generates random non-symmetric square matrices with *> specified eigenvalues for testing LAPACK programs. @@ -63,11 +63,10 @@ *> *> (Note: since the matrix cannot be reduced beyond Hessenberg form, *> no packing options are available.) -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -313,10 +312,9 @@ *> 4 => Error return from DLARGE *> 5 => Zero singular value from DLATM1. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/dlatmr.f b/TESTING/MATGEN/dlatmr.f index 32eff554..d1826886 100644 --- a/TESTING/MATGEN/dlatmr.f +++ b/TESTING/MATGEN/dlatmr.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DLATMR( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX, * RSIGN, GRADE, DL, MODEL, CONDL, DR, MODER, @@ -23,11 +23,11 @@ * DOUBLE PRECISION A( LDA, * ), D( * ), DL( * ), DR( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLATMR generates random matrices of various types for testing *> LAPACK programs. @@ -81,11 +81,10 @@ *> in the order of the rows and/or columns, and otherwise *> contain the same data. This consistency cannot be and *> is not maintained with less than full bandwidth. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -453,10 +452,9 @@ *> 5 => ANORM is positive, but matrix constructed prior to *> attempting to scale it to have norm ANORM, is zero *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/dlatms.f b/TESTING/MATGEN/dlatms.f index b63bf92f..dfa94d26 100644 --- a/TESTING/MATGEN/dlatms.f +++ b/TESTING/MATGEN/dlatms.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DLATMS( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX, * KL, KU, PACK, A, LDA, WORK, INFO ) @@ -21,11 +21,11 @@ * DOUBLE PRECISION A( LDA, * ), D( * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLATMS generates random matrices with specified singular values *> (or symmetric/hermitian with specified eigenvalues) @@ -81,11 +81,10 @@ *> If Method B is chosen, and band format is specified, then the *> matrix will be generated in the band format, so no repacking *> will be necessary. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -305,10 +304,9 @@ *> 2 => Cannot scale to DMAX (max. sing. value is 0) *> 3 => Error return from DLAGGE or SLAGSY *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/dlatmt.f b/TESTING/MATGEN/dlatmt.f index a3e9409b..e4b55724 100644 --- a/TESTING/MATGEN/dlatmt.f +++ b/TESTING/MATGEN/dlatmt.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DLATMT( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX, * RANK, KL, KU, PACK, A, LDA, WORK, INFO ) @@ -21,11 +21,11 @@ * INTEGER ISEED( 4 ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DLATMT generates random matrices with specified singular values *> (or symmetric/hermitian with specified eigenvalues) @@ -81,11 +81,10 @@ *> If Method B is chosen, and band format is specified, then the *> matrix will be generated in the band format, so no repacking *> will be necessary. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -315,10 +314,9 @@ *> 2 => Cannot scale to DMAX (max. sing. value is 0) *> 3 => Error return from DLAGGE or DLAGSY *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/slagge.f b/TESTING/MATGEN/slagge.f index e551eee5..657df78c 100644 --- a/TESTING/MATGEN/slagge.f +++ b/TESTING/MATGEN/slagge.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SLAGGE( M, N, KL, KU, D, A, LDA, ISEED, WORK, INFO ) * @@ -18,21 +18,20 @@ * REAL A( LDA, * ), D( * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLAGGE generates a real general m by n matrix A, by pre- and post- *> multiplying a real diagonal matrix D with random orthogonal matrices: *> A = U*D*V. The lower and upper bandwidths may then be reduced to *> kl and ku by additional orthogonal transformations. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -98,10 +97,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 diff --git a/TESTING/MATGEN/slagsy.f b/TESTING/MATGEN/slagsy.f index 18fdee00..c91d3864 100644 --- a/TESTING/MATGEN/slagsy.f +++ b/TESTING/MATGEN/slagsy.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SLAGSY( N, K, D, A, LDA, ISEED, WORK, INFO ) * @@ -18,21 +18,20 @@ * REAL A( LDA, * ), D( * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLAGSY generates a real symmetric matrix A, by pre- and post- *> multiplying a real diagonal matrix D with a random orthogonal matrix: *> A = U*D*U'. The semi-bandwidth may then be reduced to k by additional *> orthogonal transformations. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -86,10 +85,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 diff --git a/TESTING/MATGEN/slahilb.f b/TESTING/MATGEN/slahilb.f index ceb9ef25..e25ee1f4 100644 --- a/TESTING/MATGEN/slahilb.f +++ b/TESTING/MATGEN/slahilb.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SLAHILB( N, NRHS, A, LDA, X, LDX, B, LDB, WORK, INFO) * @@ -16,11 +16,11 @@ * REAL A(LDA, N), X(LDX, NRHS), B(LDB, NRHS), WORK(N) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLAHILB generates an N by N scaled Hilbert matrix in A along with *> NRHS right-hand sides in B and solutions in X such that A*X=B. @@ -40,11 +40,10 @@ *> *> In single, the generated solution is exact for N <= 6 and has *> small componentwise error for 7 <= N <= 11. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -109,10 +108,9 @@ *> be not exact. *> < 0: if INFO = -i, the i-th argument had an illegal value *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -138,7 +136,6 @@ * .. * * ===================================================================== - * .. Local Scalars .. INTEGER TM, TI, R INTEGER M diff --git a/TESTING/MATGEN/slakf2.f b/TESTING/MATGEN/slakf2.f index aa752fa3..bdc3da29 100644 --- a/TESTING/MATGEN/slakf2.f +++ b/TESTING/MATGEN/slakf2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SLAKF2( M, N, A, LDA, B, D, E, Z, LDZ ) * @@ -18,11 +18,11 @@ * $ E( LDA, * ), Z( LDZ, * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Form the 2*M*N by 2*M*N matrix *> @@ -32,11 +32,10 @@ *> where In is the identity matrix of size n and X' is the transpose *> of X. kron(X, Y) is the Kronecker product between the matrices X *> and Y. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -90,10 +89,9 @@ *> LDZ is INTEGER *> The leading dimension of Z. ( LDZ >= 2*M*N ) *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/slaran.f b/TESTING/MATGEN/slaran.f index 079aa349..abb9130e 100644 --- a/TESTING/MATGEN/slaran.f +++ b/TESTING/MATGEN/slaran.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * REAL FUNCTION SLARAN( ISEED ) * @@ -14,19 +14,18 @@ * INTEGER ISEED( 4 ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLARAN returns a random real number from a uniform (0,1) *> distribution. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in,out] ISEED *> \verbatim @@ -36,10 +35,9 @@ *> odd. *> On exit, the seed is updated. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -50,10 +48,9 @@ * *> \ingroup real_matgen * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> This routine uses a multiplicative congruential method with modulus @@ -65,7 +62,6 @@ *> 48-bit integers are stored in 4 integer array elements with 12 bits *> per element. Hence the routine is portable across machines with *> integers of 32 bits or more. -*> *> \endverbatim *> * ===================================================================== diff --git a/TESTING/MATGEN/slarge.f b/TESTING/MATGEN/slarge.f index 8293c289..78053352 100644 --- a/TESTING/MATGEN/slarge.f +++ b/TESTING/MATGEN/slarge.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SLARGE( N, A, LDA, ISEED, WORK, INFO ) * @@ -18,19 +18,18 @@ * REAL A( LDA, * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLARGE pre- and post-multiplies a real general n by n matrix A *> with a random orthogonal matrix: A = U*D*U'. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -72,10 +71,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 diff --git a/TESTING/MATGEN/slarnd.f b/TESTING/MATGEN/slarnd.f index 3868af38..e43c97e1 100644 --- a/TESTING/MATGEN/slarnd.f +++ b/TESTING/MATGEN/slarnd.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * REAL FUNCTION SLARND( IDIST, ISEED ) * @@ -17,19 +17,18 @@ * INTEGER ISEED( 4 ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLARND returns a random real number from a uniform or normal *> distribution. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] IDIST *> \verbatim @@ -48,10 +47,9 @@ *> odd. *> On exit, the seed is updated. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -62,16 +60,14 @@ * *> \ingroup real_matgen * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> This routine calls the auxiliary routine SLARAN to generate a random *> real number from a uniform (0,1) distribution. The Box-Muller method *> is used to transform numbers from a uniform to a normal distribution. -*> *> \endverbatim *> * ===================================================================== diff --git a/TESTING/MATGEN/slaror.f b/TESTING/MATGEN/slaror.f index 63300577..6b50dc7a 100644 --- a/TESTING/MATGEN/slaror.f +++ b/TESTING/MATGEN/slaror.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SLAROR( SIDE, INIT, M, N, A, LDA, ISEED, X, INFO ) * @@ -19,21 +19,20 @@ * REAL A( LDA, * ), X( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLAROR pre- or post-multiplies an M by N matrix A by a random *> orthogonal matrix U, overwriting A. A may optionally be initialized *> to the identity matrix before multiplying by U. U is generated using *> the method of G.W. Stewart (SIAM J. Numer. Anal. 17, 1980, 403-409). -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -131,10 +130,9 @@ *> < 0: if INFO = -k, the k-th argument had an illegal value *> = 1: if the random numbers generated by SLARND are bad. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/slarot.f b/TESTING/MATGEN/slarot.f index 3d9616c7..5633b2c1 100644 --- a/TESTING/MATGEN/slarot.f +++ b/TESTING/MATGEN/slarot.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SLAROT( LROWS, LLEFT, LRIGHT, NL, C, S, A, LDA, XLEFT, * XRIGHT ) @@ -20,11 +20,11 @@ * REAL A( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLAROT applies a (Givens) rotation to two adjacent rows or *> columns, where one element of the first and/or last column/row @@ -125,11 +125,10 @@ *> *> . . . . . . *> A(1,i),LDA-1, XTOP, XBOTTM ) -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \verbatim *> LROWS - LOGICAL @@ -210,10 +209,9 @@ *> (if LROWS=.FALSE.). *> Read and modified. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/slatm1.f b/TESTING/MATGEN/slatm1.f index 55415420..f303e3e2 100644 --- a/TESTING/MATGEN/slatm1.f +++ b/TESTING/MATGEN/slatm1.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SLATM1( MODE, COND, IRSIGN, IDIST, ISEED, D, N, INFO ) * @@ -19,21 +19,20 @@ * REAL D( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLATM1 computes the entries of D(1..N) as specified by *> MODE, COND and IRSIGN. IDIST and ISEED determine the generation *> of random numbers. SLATM1 is called by SLATMR to generate *> random test matrices for LAPACK programs. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] MODE *> \verbatim @@ -120,10 +119,9 @@ *> -4 => if MODE equals 6 or -6 and IDIST not in range 1 to 3 *> -7 => if N negative *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/slatm2.f b/TESTING/MATGEN/slatm2.f index 81fa969b..45a71b28 100644 --- a/TESTING/MATGEN/slatm2.f +++ b/TESTING/MATGEN/slatm2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * REAL FUNCTION SLATM2( M, N, I, J, KL, KU, IDIST, * ISEED, D, IGRADE, DL, DR, IPVTNG, IWORK, SPARSE ) @@ -23,11 +23,11 @@ * REAL D( * ), DL( * ), DR( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLATM2 returns the (I,J) entry of a random matrix of dimension *> (M, N) described by the other paramters. It is called by the @@ -65,11 +65,10 @@ *> bandwidth KU. *> *> Set random entries to zero as specified by SPARSE. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -192,10 +191,9 @@ *> entries will be set to zero. *> Not modified. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/slatm3.f b/TESTING/MATGEN/slatm3.f index 3c639920..31046107 100644 --- a/TESTING/MATGEN/slatm3.f +++ b/TESTING/MATGEN/slatm3.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * REAL FUNCTION SLATM3( M, N, I, J, ISUB, JSUB, KL, KU, * IDIST, ISEED, D, IGRADE, DL, DR, IPVTNG, IWORK, @@ -25,11 +25,11 @@ * REAL D( * ), DL( * ), DR( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLATM3 returns the (ISUB,JSUB) entry of a random matrix of *> dimension (M, N) described by the other paramters. (ISUB,JSUB) @@ -70,11 +70,10 @@ *> bandwidth KU. *> *> Set random entries to zero as specified by SPARSE. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -209,10 +208,9 @@ *> entries will be set to zero. *> Not modified. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/slatm5.f b/TESTING/MATGEN/slatm5.f index ef49ad8e..dd882f52 100644 --- a/TESTING/MATGEN/slatm5.f +++ b/TESTING/MATGEN/slatm5.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SLATM5( PRTYPE, M, N, A, LDA, B, LDB, C, LDC, D, LDD, * E, LDE, F, LDF, R, LDR, L, LDL, ALPHA, QBLCKA, @@ -23,11 +23,11 @@ * $ L( LDL, * ), R( LDR, * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLATM5 generates matrices involved in the Generalized Sylvester *> equation: @@ -40,11 +40,10 @@ *> [ I -L ] ( [ A -C ], [ D -F ] ) [ I R ] = ( [ A ], [ D ] ) *> [ I ] ( [ B ] [ E ] ) [ I ] ( [ B ] [ E ] ) *> -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] PRTYPE *> \verbatim @@ -184,10 +183,9 @@ *> blocks on the diagonal in B. Otherwise, QBLCKB is not *> referenced. QBLCKB > 1. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -198,10 +196,9 @@ * *> \ingroup real_matgen * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> PRTYPE = 1: A and B are Jordan blocks, D and E are identity matrices @@ -264,7 +261,6 @@ *> L, R specifies the right hand sides (C, F). *> *> PRTYPE = 5 special case common and/or close eigs. -*> *> \endverbatim *> * ===================================================================== diff --git a/TESTING/MATGEN/slatm6.f b/TESTING/MATGEN/slatm6.f index 1e89a6f6..7cc630ea 100644 --- a/TESTING/MATGEN/slatm6.f +++ b/TESTING/MATGEN/slatm6.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SLATM6( TYPE, N, A, LDA, B, X, LDX, Y, LDY, ALPHA, * BETA, WX, WY, S, DIF ) @@ -20,11 +20,11 @@ * $ X( LDX, * ), Y( LDY, * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLATM6 generates test matrices for the generalized eigenvalue *> problem, their corresponding right and left eigenvector matrices, @@ -65,11 +65,10 @@ *> 0 0 0 0 1, 0 0 0 0 1 , *> *> where a, b, x and y will have all values independently of each other. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TYPE *> \verbatim @@ -160,10 +159,9 @@ *> DIF is REAL array, dimension (N) *> DIF(i) is the reciprocal condition number for eigenvector i. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/slatm7.f b/TESTING/MATGEN/slatm7.f index d5508ba5..0a7db8e5 100644 --- a/TESTING/MATGEN/slatm7.f +++ b/TESTING/MATGEN/slatm7.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SLATM7( MODE, COND, IRSIGN, IDIST, ISEED, D, N, * RANK, INFO ) @@ -20,21 +20,20 @@ * INTEGER ISEED( 4 ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLATM7 computes the entries of D as specified by MODE *> COND and IRSIGN. IDIST and ISEED determine the generation *> of random numbers. SLATM7 is called by SLATMT to generate *> random test matrices. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \verbatim *> MODE - INTEGER @@ -106,10 +105,9 @@ *> -4 => if MODE equals 6 or -6 and IDIST not in range 1 to 3 *> -7 => if N negative *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/slatme.f b/TESTING/MATGEN/slatme.f index 3deff329..0e53e89f 100644 --- a/TESTING/MATGEN/slatme.f +++ b/TESTING/MATGEN/slatme.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SLATME( N, DIST, ISEED, D, MODE, COND, DMAX, EI, * RSIGN, @@ -25,11 +25,11 @@ * REAL A( LDA, * ), D( * ), DS( * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLATME generates random non-symmetric square matrices with *> specified eigenvalues for testing LAPACK programs. @@ -63,11 +63,10 @@ *> *> (Note: since the matrix cannot be reduced beyond Hessenberg form, *> no packing options are available.) -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -313,10 +312,9 @@ *> 4 => Error return from SLARGE *> 5 => Zero singular value from SLATM1. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/slatmr.f b/TESTING/MATGEN/slatmr.f index e58b2671..64b48c23 100644 --- a/TESTING/MATGEN/slatmr.f +++ b/TESTING/MATGEN/slatmr.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SLATMR( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX, * RSIGN, GRADE, DL, MODEL, CONDL, DR, MODER, @@ -23,11 +23,11 @@ * REAL A( LDA, * ), D( * ), DL( * ), DR( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLATMR generates random matrices of various types for testing *> LAPACK programs. @@ -81,11 +81,10 @@ *> in the order of the rows and/or columns, and otherwise *> contain the same data. This consistency cannot be and *> is not maintained with less than full bandwidth. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -453,10 +452,9 @@ *> 5 => ANORM is positive, but matrix constructed prior to *> attempting to scale it to have norm ANORM, is zero *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/slatms.f b/TESTING/MATGEN/slatms.f index 74abc335..ff137dff 100644 --- a/TESTING/MATGEN/slatms.f +++ b/TESTING/MATGEN/slatms.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SLATMS( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX, * KL, KU, PACK, A, LDA, WORK, INFO ) @@ -21,11 +21,11 @@ * REAL A( LDA, * ), D( * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLATMS generates random matrices with specified singular values *> (or symmetric/hermitian with specified eigenvalues) @@ -81,11 +81,10 @@ *> If Method B is chosen, and band format is specified, then the *> matrix will be generated in the band format, so no repacking *> will be necessary. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -305,10 +304,9 @@ *> 2 => Cannot scale to DMAX (max. sing. value is 0) *> 3 => Error return from SLAGGE or SLAGSY *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/slatmt.f b/TESTING/MATGEN/slatmt.f index 3a3c598d..25d1e943 100644 --- a/TESTING/MATGEN/slatmt.f +++ b/TESTING/MATGEN/slatmt.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SLATMT( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX, * RANK, KL, KU, PACK, A, LDA, WORK, INFO ) @@ -21,11 +21,11 @@ * INTEGER ISEED( 4 ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SLATMT generates random matrices with specified singular values *> (or symmetric/hermitian with specified eigenvalues) @@ -81,11 +81,10 @@ *> If Method B is chosen, and band format is specified, then the *> matrix will be generated in the band format, so no repacking *> will be necessary. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -315,10 +314,9 @@ *> 2 => Cannot scale to DMAX (max. sing. value is 0) *> 3 => Error return from SLAGGE or SLAGSY *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/zlagge.f b/TESTING/MATGEN/zlagge.f index 5963699d..a39492d4 100644 --- a/TESTING/MATGEN/zlagge.f +++ b/TESTING/MATGEN/zlagge.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZLAGGE( M, N, KL, KU, D, A, LDA, ISEED, WORK, INFO ) * @@ -19,21 +19,20 @@ * COMPLEX*16 A( LDA, * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLAGGE generates a complex general m by n matrix A, by pre- and post- *> multiplying a real diagonal matrix D with random unitary matrices: *> A = U*D*V. The lower and upper bandwidths may then be reduced to *> kl and ku by additional unitary transformations. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \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 diff --git a/TESTING/MATGEN/zlaghe.f b/TESTING/MATGEN/zlaghe.f index 8e9c6e3c..0b742da9 100644 --- a/TESTING/MATGEN/zlaghe.f +++ b/TESTING/MATGEN/zlaghe.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZLAGHE( N, K, D, A, LDA, ISEED, WORK, INFO ) * @@ -19,21 +19,20 @@ * COMPLEX*16 A( LDA, * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLAGHE generates a complex hermitian matrix A, by pre- and post- *> multiplying a real diagonal matrix D with a random unitary matrix: *> A = U*D*U'. The semi-bandwidth may then be reduced to k by additional *> unitary transformations. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -87,10 +86,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 diff --git a/TESTING/MATGEN/zlagsy.f b/TESTING/MATGEN/zlagsy.f index 317d2489..4f6fd3a7 100644 --- a/TESTING/MATGEN/zlagsy.f +++ b/TESTING/MATGEN/zlagsy.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZLAGSY( N, K, D, A, LDA, ISEED, WORK, INFO ) * @@ -19,21 +19,20 @@ * COMPLEX*16 A( LDA, * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLAGSY generates a complex symmetric matrix A, by pre- and post- *> multiplying a real diagonal matrix D with a random unitary matrix: *> A = U*D*U**T. The semi-bandwidth may then be reduced to k by *> additional unitary transformations. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -87,10 +86,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 diff --git a/TESTING/MATGEN/zlahilb.f b/TESTING/MATGEN/zlahilb.f index 3d68ab69..9e55fa51 100644 --- a/TESTING/MATGEN/zlahilb.f +++ b/TESTING/MATGEN/zlahilb.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZLAHILB( N, NRHS, A, LDA, X, LDX, B, LDB, WORK, * INFO, PATH) @@ -19,11 +19,11 @@ * CHARACTER*3 PATH * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLAHILB generates an N by N scaled Hilbert matrix in A along with *> NRHS right-hand sides in B and solutions in X such that A*X=B. @@ -43,11 +43,10 @@ *> *> In single, the generated solution is exact for N <= 6 and has *> small componentwise error for 7 <= N <= 11. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -118,10 +117,9 @@ *> PATH is CHARACTER*3 *> The LAPACK path name. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -150,7 +148,6 @@ * .. * * ===================================================================== - * .. Local Scalars .. INTEGER TM, TI, R INTEGER M diff --git a/TESTING/MATGEN/zlakf2.f b/TESTING/MATGEN/zlakf2.f index 07c748fb..eddd9877 100644 --- a/TESTING/MATGEN/zlakf2.f +++ b/TESTING/MATGEN/zlakf2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZLAKF2( M, N, A, LDA, B, D, E, Z, LDZ ) * @@ -18,11 +18,11 @@ * $ E( LDA, * ), Z( LDZ, * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Form the 2*M*N by 2*M*N matrix *> @@ -32,11 +32,10 @@ *> where In is the identity matrix of size n and X' is the transpose *> of X. kron(X, Y) is the Kronecker product between the matrices X *> and Y. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -90,10 +89,9 @@ *> LDZ is INTEGER *> The leading dimension of Z. ( LDZ >= 2*M*N ) *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/zlarge.f b/TESTING/MATGEN/zlarge.f index 895afc48..e7b39ec2 100644 --- a/TESTING/MATGEN/zlarge.f +++ b/TESTING/MATGEN/zlarge.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZLARGE( N, A, LDA, ISEED, WORK, INFO ) * @@ -18,19 +18,18 @@ * COMPLEX*16 A( LDA, * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLARGE pre- and post-multiplies a complex general n by n matrix A *> with a random unitary matrix: A = U*D*U'. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -72,10 +71,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 diff --git a/TESTING/MATGEN/zlarnd.f b/TESTING/MATGEN/zlarnd.f index 15919f27..757b3876 100644 --- a/TESTING/MATGEN/zlarnd.f +++ b/TESTING/MATGEN/zlarnd.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * COMPLEX*16 FUNCTION ZLARND( IDIST, ISEED ) * @@ -17,19 +17,18 @@ * INTEGER ISEED( 4 ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLARND returns a random complex number from a uniform or normal *> distribution. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] IDIST *> \verbatim @@ -50,10 +49,9 @@ *> odd. *> On exit, the seed is updated. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -64,16 +62,14 @@ * *> \ingroup complex16_matgen * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> This routine calls the auxiliary routine DLARAN to generate a random *> real number from a uniform (0,1) distribution. The Box-Muller method *> is used to transform numbers from a uniform to a normal distribution. -*> *> \endverbatim *> * ===================================================================== diff --git a/TESTING/MATGEN/zlaror.f b/TESTING/MATGEN/zlaror.f index 6eab03cb..a088028f 100644 --- a/TESTING/MATGEN/zlaror.f +++ b/TESTING/MATGEN/zlaror.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZLAROR( SIDE, INIT, M, N, A, LDA, ISEED, X, INFO ) * @@ -19,11 +19,11 @@ * COMPLEX*16 A( LDA, * ), X( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLAROR pre- or post-multiplies an M by N matrix A by a random *> unitary matrix U, overwriting A. A may optionally be @@ -31,11 +31,10 @@ *> U is generated using the method of G.W. Stewart *> ( SIAM J. Numer. Anal. 17, 1980, pp. 403-409 ). *> (BLAS-2 version) -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -143,10 +142,9 @@ *> to M. *> -6 if LDA is less than M. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/zlarot.f b/TESTING/MATGEN/zlarot.f index e0b85c62..30f3da89 100644 --- a/TESTING/MATGEN/zlarot.f +++ b/TESTING/MATGEN/zlarot.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZLAROT( LROWS, LLEFT, LRIGHT, NL, C, S, A, LDA, XLEFT, * XRIGHT ) @@ -20,11 +20,11 @@ * COMPLEX*16 A( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLAROT applies a (Givens) rotation to two adjacent rows or *> columns, where one element of the first and/or last column/row @@ -125,11 +125,10 @@ *> *> . . . . . . *> A(1,i),LDA-1, XTOP, XBOTTM ) -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \verbatim *> LROWS - LOGICAL @@ -213,10 +212,9 @@ *> (if LROWS=.FALSE.). *> Read and modified. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/zlatm1.f b/TESTING/MATGEN/zlatm1.f index 8e6829bf..524c5d27 100644 --- a/TESTING/MATGEN/zlatm1.f +++ b/TESTING/MATGEN/zlatm1.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZLATM1( MODE, COND, IRSIGN, IDIST, ISEED, D, N, INFO ) * @@ -19,21 +19,20 @@ * COMPLEX*16 D( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLATM1 computes the entries of D(1..N) as specified by *> MODE, COND and IRSIGN. IDIST and ISEED determine the generation *> of random numbers. ZLATM1 is called by CLATMR to generate *> random test matrices for LAPACK programs. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] MODE *> \verbatim @@ -122,10 +121,9 @@ *> -4 => if MODE equals 6 or -6 and IDIST not in range 1 to 4 *> -7 => if N negative *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/zlatm2.f b/TESTING/MATGEN/zlatm2.f index 76b0152d..813815c5 100644 --- a/TESTING/MATGEN/zlatm2.f +++ b/TESTING/MATGEN/zlatm2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * COMPLEX*16 FUNCTION ZLATM2( M, N, I, J, KL, KU, IDIST, * ISEED, D, IGRADE, DL, DR, IPVTNG, IWORK, SPARSE ) @@ -23,11 +23,11 @@ * COMPLEX*16 D( * ), DL( * ), DR( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLATM2 returns the (I,J) entry of a random matrix of dimension *> (M, N) described by the other paramters. It is called by the @@ -65,11 +65,10 @@ *> bandwidth KU. *> *> Set random entries to zero as specified by SPARSE. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -195,10 +194,9 @@ *> entries will be set to zero. *> Not modified. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/zlatm3.f b/TESTING/MATGEN/zlatm3.f index b3aac8ed..e4becc74 100644 --- a/TESTING/MATGEN/zlatm3.f +++ b/TESTING/MATGEN/zlatm3.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * COMPLEX*16 FUNCTION ZLATM3( M, N, I, J, ISUB, JSUB, KL, KU, * IDIST, ISEED, D, IGRADE, DL, DR, IPVTNG, IWORK, @@ -25,11 +25,11 @@ * COMPLEX*16 D( * ), DL( * ), DR( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLATM3 returns the (ISUB,JSUB) entry of a random matrix of *> dimension (M, N) described by the other paramters. (ISUB,JSUB) @@ -70,11 +70,10 @@ *> bandwidth KU. *> *> Set random entries to zero as specified by SPARSE. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -212,10 +211,9 @@ *> entries will be set to zero. *> Not modified. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/zlatm5.f b/TESTING/MATGEN/zlatm5.f index 6e3ce53d..abc31cc4 100644 --- a/TESTING/MATGEN/zlatm5.f +++ b/TESTING/MATGEN/zlatm5.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZLATM5( PRTYPE, M, N, A, LDA, B, LDB, C, LDC, D, LDD, * E, LDE, F, LDF, R, LDR, L, LDL, ALPHA, QBLCKA, @@ -23,11 +23,11 @@ * $ L( LDL, * ), R( LDR, * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLATM5 generates matrices involved in the Generalized Sylvester *> equation: @@ -40,11 +40,10 @@ *> [ I -L ] ( [ A -C ], [ D -F ] ) [ I R ] = ( [ A ], [ D ] ) *> [ I ] ( [ B ] [ E ] ) [ I ] ( [ B ] [ E ] ) *> -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] PRTYPE *> \verbatim @@ -184,10 +183,9 @@ *> blocks on the diagonal in B. Otherwise, QBLCKB is not *> referenced. QBLCKB > 1. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -198,10 +196,9 @@ * *> \ingroup complex16_matgen * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> PRTYPE = 1: A and B are Jordan blocks, D and E are identity matrices @@ -264,7 +261,6 @@ *> L, R specifies the right hand sides (C, F). *> *> PRTYPE = 5 special case common and/or close eigs. -*> *> \endverbatim *> * ===================================================================== diff --git a/TESTING/MATGEN/zlatm6.f b/TESTING/MATGEN/zlatm6.f index 04a52d8b..082fe36c 100644 --- a/TESTING/MATGEN/zlatm6.f +++ b/TESTING/MATGEN/zlatm6.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZLATM6( TYPE, N, A, LDA, B, X, LDX, Y, LDY, ALPHA, * BETA, WX, WY, S, DIF ) @@ -21,11 +21,11 @@ * $ Y( LDY, * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLATM6 generates test matrices for the generalized eigenvalue *> problem, their corresponding right and left eigenvector matrices, @@ -63,11 +63,10 @@ *> 0 0 0 0 1, 0 0 0 0 1 , where *> *> a, b, x and y will have all values independently of each other. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TYPE *> \verbatim @@ -158,10 +157,9 @@ *> DIF is DOUBLE PRECISION array, dimension (N) *> DIF(i) is the reciprocal condition number for eigenvector i. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/zlatme.f b/TESTING/MATGEN/zlatme.f index 51dbb2d1..afb6f411 100644 --- a/TESTING/MATGEN/zlatme.f +++ b/TESTING/MATGEN/zlatme.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZLATME( N, DIST, ISEED, D, MODE, COND, DMAX, * RSIGN, @@ -26,11 +26,11 @@ * COMPLEX*16 A( LDA, * ), D( * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLATME generates random non-symmetric square matrices with *> specified eigenvalues for testing LAPACK programs. @@ -58,11 +58,10 @@ *> *> (Note: since the matrix cannot be reduced beyond Hessenberg form, *> no packing options are available.) -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -282,10 +281,9 @@ *> 4 => Error return from ZLARGE *> 5 => Zero singular value from DLATM1. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/zlatmr.f b/TESTING/MATGEN/zlatmr.f index 9f2c2646..ec36ccfd 100644 --- a/TESTING/MATGEN/zlatmr.f +++ b/TESTING/MATGEN/zlatmr.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZLATMR( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX, * RSIGN, GRADE, DL, MODEL, CONDL, DR, MODER, @@ -24,11 +24,11 @@ * COMPLEX*16 A( LDA, * ), D( * ), DL( * ), DR( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLATMR generates random matrices of various types for testing *> LAPACK programs. @@ -85,11 +85,10 @@ *> in the order of the rows and/or columns, and otherwise *> contain the same data. This consistency cannot be and *> is not maintained with less than full bandwidth. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -472,10 +471,9 @@ *> 5 => ANORM is positive, but matrix constructed prior to *> attempting to scale it to have norm ANORM, is zero *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/zlatms.f b/TESTING/MATGEN/zlatms.f index 2a25fc27..e57af33a 100644 --- a/TESTING/MATGEN/zlatms.f +++ b/TESTING/MATGEN/zlatms.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZLATMS( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX, * KL, KU, PACK, A, LDA, WORK, INFO ) @@ -22,11 +22,11 @@ * COMPLEX*16 A( LDA, * ), WORK( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLATMS generates random matrices with specified singular values *> (or hermitian with specified eigenvalues) @@ -82,11 +82,10 @@ *> If Method B is chosen, and band format is specified, then the *> matrix will be generated in the band format, so no repacking *> will be necessary. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -316,10 +315,9 @@ *> 2 => Cannot scale to DMAX (max. sing. value is 0) *> 3 => Error return from ZLAGGE, CLAGHE or CLAGSY *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/TESTING/MATGEN/zlatmt.f b/TESTING/MATGEN/zlatmt.f index 99707c25..39ca0d6e 100644 --- a/TESTING/MATGEN/zlatmt.f +++ b/TESTING/MATGEN/zlatmt.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZLATMT( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX, * RANK, KL, KU, PACK, A, LDA, WORK, INFO ) @@ -22,11 +22,11 @@ * INTEGER ISEED( 4 ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZLATMT generates random matrices with specified singular values *> (or hermitian with specified eigenvalues) @@ -82,11 +82,10 @@ *> If Method B is chosen, and band format is specified, then the *> matrix will be generated in the band format, so no repacking *> will be necessary. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -324,10 +323,9 @@ *> 2 => Cannot scale to DMAX (max. sing. value is 0) *> 3 => Error return from ZLAGGE, ZLAGHE or ZLAGSY *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley |