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 /BLAS | |
| parent | d5c30c90bdecf38da1064e2ed52583634573e741 (diff) | |
| download | lapack-1c3ba600671a59785b0c647d400226b4cc19a11f.tar.gz lapack-1c3ba600671a59785b0c647d400226b4cc19a11f.tar.bz2 lapack-1c3ba600671a59785b0c647d400226b4cc19a11f.zip | |
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 'BLAS')
163 files changed, 2108 insertions, 2653 deletions
diff --git a/BLAS/SRC/caxpy.f b/BLAS/SRC/caxpy.f index 3e274e5b..7b23a347 100644 --- a/BLAS/SRC/caxpy.f +++ b/BLAS/SRC/caxpy.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CAXPY(N,CA,CX,INCX,CY,INCY) * @@ -18,18 +18,17 @@ * COMPLEX CX(*),CY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> CAXPY constant times a vector plus a vector. +*> \verbatim *> -*>\endverbatim +*> CAXPY constant times a vector plus a vector. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,15 +39,13 @@ * *> \ingroup complex_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ccopy.f b/BLAS/SRC/ccopy.f index 039a8be8..9c11db0d 100644 --- a/BLAS/SRC/ccopy.f +++ b/BLAS/SRC/ccopy.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CCOPY(N,CX,INCX,CY,INCY) * @@ -17,18 +17,17 @@ * COMPLEX CX(*),CY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> CCOPY copies a vector x to a vector y. +*> \verbatim *> -*>\endverbatim +*> CCOPY copies a vector x to a vector y. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -39,15 +38,13 @@ * *> \ingroup complex_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/cdotc.f b/BLAS/SRC/cdotc.f index 6903726d..8e7d8b9d 100644 --- a/BLAS/SRC/cdotc.f +++ b/BLAS/SRC/cdotc.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * COMPLEX FUNCTION CDOTC(N,CX,INCX,CY,INCY) * @@ -17,19 +17,18 @@ * COMPLEX CX(*),CY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> forms the dot product of two vectors, conjugating the first *> vector. -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,15 +39,13 @@ * *> \ingroup complex_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/cdotu.f b/BLAS/SRC/cdotu.f index 00bc019b..456a409f 100644 --- a/BLAS/SRC/cdotu.f +++ b/BLAS/SRC/cdotu.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * COMPLEX FUNCTION CDOTU(N,CX,INCX,CY,INCY) * @@ -17,18 +17,17 @@ * COMPLEX CX(*),CY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> CDOTU forms the dot product of two vectors. +*> \verbatim *> -*>\endverbatim +*> CDOTU forms the dot product of two vectors. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -39,15 +38,13 @@ * *> \ingroup complex_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/cgbmv.f b/BLAS/SRC/cgbmv.f index 01690bb7..cd597f90 100644 --- a/BLAS/SRC/cgbmv.f +++ b/BLAS/SRC/cgbmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CGBMV(TRANS,M,N,KL,KU,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * COMPLEX A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CGBMV performs one of the matrix-vector operations *> @@ -33,11 +33,10 @@ *> *> where alpha and beta are scalars, x and y are vectors and A is an *> m by n band matrix, with kl sub-diagonals and ku super-diagonals. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TRANS *> \verbatim @@ -157,10 +156,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -171,10 +169,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -185,7 +182,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/cgemm.f b/BLAS/SRC/cgemm.f index b1ba4c58..ecfe12e8 100644 --- a/BLAS/SRC/cgemm.f +++ b/BLAS/SRC/cgemm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CGEMM(TRANSA,TRANSB,M,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC) * @@ -19,11 +19,11 @@ * COMPLEX A(LDA,*),B(LDB,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CGEMM performs one of the matrix-matrix operations *> @@ -35,11 +35,10 @@ *> *> alpha and beta are scalars, and A, B and C are matrices, with op( A ) *> an m by k matrix, op( B ) a k by n matrix and C an m by n matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TRANSA *> \verbatim @@ -158,10 +157,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -172,10 +170,9 @@ * *> \ingroup complex_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -185,7 +182,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/cgemv.f b/BLAS/SRC/cgemv.f index db0564c1..507d19e1 100644 --- a/BLAS/SRC/cgemv.f +++ b/BLAS/SRC/cgemv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CGEMV(TRANS,M,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * COMPLEX A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CGEMV performs one of the matrix-vector operations *> @@ -33,11 +33,10 @@ *> *> where alpha and beta are scalars, x and y are vectors and A is an *> m by n matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TRANS *> \verbatim @@ -128,10 +127,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -142,10 +140,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -156,7 +153,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/cgerc.f b/BLAS/SRC/cgerc.f index d6539b01..a99d5b92 100644 --- a/BLAS/SRC/cgerc.f +++ b/BLAS/SRC/cgerc.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CGERC(M,N,ALPHA,X,INCX,Y,INCY,A,LDA) * @@ -18,11 +18,11 @@ * COMPLEX A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CGERC performs the rank 1 operation *> @@ -30,11 +30,10 @@ *> *> where alpha is a scalar, x is an m element vector, y is an n element *> vector and A is an m by n matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -101,10 +100,9 @@ *> in the calling (sub) program. LDA must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -115,10 +113,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -128,7 +125,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/cgeru.f b/BLAS/SRC/cgeru.f index 0db12d7b..c551782d 100644 --- a/BLAS/SRC/cgeru.f +++ b/BLAS/SRC/cgeru.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CGERU(M,N,ALPHA,X,INCX,Y,INCY,A,LDA) * @@ -18,11 +18,11 @@ * COMPLEX A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CGERU performs the rank 1 operation *> @@ -30,11 +30,10 @@ *> *> where alpha is a scalar, x is an m element vector, y is an n element *> vector and A is an m by n matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -101,10 +100,9 @@ *> in the calling (sub) program. LDA must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -115,10 +113,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -128,7 +125,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/chbmv.f b/BLAS/SRC/chbmv.f index bafb5f12..bbfeb1fa 100644 --- a/BLAS/SRC/chbmv.f +++ b/BLAS/SRC/chbmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CHBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * COMPLEX A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CHBMV performs the matrix-vector operation *> @@ -31,11 +31,10 @@ *> *> where alpha and beta are scalars, x and y are n element vectors and *> A is an n by n hermitian band matrix, with k super-diagonals. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -157,10 +156,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -171,10 +169,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -185,7 +182,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/chemm.f b/BLAS/SRC/chemm.f index 2944c649..069491c9 100644 --- a/BLAS/SRC/chemm.f +++ b/BLAS/SRC/chemm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CHEMM(SIDE,UPLO,M,N,ALPHA,A,LDA,B,LDB,BETA,C,LDC) * @@ -19,11 +19,11 @@ * COMPLEX A(LDA,*),B(LDB,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CHEMM performs one of the matrix-matrix operations *> @@ -35,11 +35,10 @@ *> *> where alpha and beta are scalars, A is an hermitian matrix and B and *> C are m by n matrices. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -162,10 +161,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -176,10 +174,9 @@ * *> \ingroup complex_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -189,7 +186,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/chemv.f b/BLAS/SRC/chemv.f index f93e0c4f..56f83591 100644 --- a/BLAS/SRC/chemv.f +++ b/BLAS/SRC/chemv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CHEMV(UPLO,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * COMPLEX A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CHEMV performs the matrix-vector operation *> @@ -31,11 +31,10 @@ *> *> where alpha and beta are scalars, x and y are n element vectors and *> A is an n by n hermitian matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -124,10 +123,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -138,10 +136,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -152,7 +149,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/cher.f b/BLAS/SRC/cher.f index 1e74428c..8cd6f0c2 100644 --- a/BLAS/SRC/cher.f +++ b/BLAS/SRC/cher.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CHER(UPLO,N,ALPHA,X,INCX,A,LDA) * @@ -19,11 +19,11 @@ * COMPLEX A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CHER performs the hermitian rank 1 operation *> @@ -31,11 +31,10 @@ *> *> where alpha is a real scalar, x is an n element vector and A is an *> n by n hermitian matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -106,10 +105,9 @@ *> in the calling (sub) program. LDA must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -120,10 +118,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -133,7 +130,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/cher2.f b/BLAS/SRC/cher2.f index 9324e3af..cdbeba35 100644 --- a/BLAS/SRC/cher2.f +++ b/BLAS/SRC/cher2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CHER2(UPLO,N,ALPHA,X,INCX,Y,INCY,A,LDA) * @@ -19,11 +19,11 @@ * COMPLEX A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CHER2 performs the hermitian rank 2 operation *> @@ -31,11 +31,10 @@ *> *> where alpha is a scalar, x and y are n element vectors and A is an n *> by n hermitian matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -121,10 +120,9 @@ *> in the calling (sub) program. LDA must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -135,10 +133,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -148,7 +145,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/cher2k.f b/BLAS/SRC/cher2k.f index 9ba1295d..0c8218d0 100644 --- a/BLAS/SRC/cher2k.f +++ b/BLAS/SRC/cher2k.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CHER2K(UPLO,TRANS,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC) * @@ -20,11 +20,11 @@ * COMPLEX A(LDA,*),B(LDB,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CHER2K performs one of the hermitian rank 2k operations *> @@ -37,11 +37,10 @@ *> where alpha and beta are scalars with beta real, C is an n by n *> hermitian matrix and A and B are n by k matrices in the first case *> and k by n matrices in the second case. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -165,10 +164,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -179,10 +177,9 @@ * *> \ingroup complex_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -195,7 +192,6 @@ *> *> -- Modified 8-Nov-93 to set C(J,J) to REAL( C(J,J) ) when BETA = 1. *> Ed Anderson, Cray Research Inc. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/cherk.f b/BLAS/SRC/cherk.f index addbefb4..cbc59555 100644 --- a/BLAS/SRC/cherk.f +++ b/BLAS/SRC/cherk.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CHERK(UPLO,TRANS,N,K,ALPHA,A,LDA,BETA,C,LDC) * @@ -19,11 +19,11 @@ * COMPLEX A(LDA,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CHERK performs one of the hermitian rank k operations *> @@ -36,11 +36,10 @@ *> where alpha and beta are real scalars, C is an n by n hermitian *> matrix and A is an n by k matrix in the first case and a k by n *> matrix in the second case. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -141,10 +140,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -155,10 +153,9 @@ * *> \ingroup complex_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -171,7 +168,6 @@ *> *> -- Modified 8-Nov-93 to set C(J,J) to REAL( C(J,J) ) when BETA = 1. *> Ed Anderson, Cray Research Inc. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/chpmv.f b/BLAS/SRC/chpmv.f index 8128ca6f..93c03424 100644 --- a/BLAS/SRC/chpmv.f +++ b/BLAS/SRC/chpmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CHPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * COMPLEX AP(*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CHPMV performs the matrix-vector operation *> @@ -31,11 +31,10 @@ *> *> where alpha and beta are scalars, x and y are n element vectors and *> A is an n by n hermitian matrix, supplied in packed form. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -119,10 +118,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -133,10 +131,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -147,7 +144,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/chpr.f b/BLAS/SRC/chpr.f index 3101ccdc..8b0cecd5 100644 --- a/BLAS/SRC/chpr.f +++ b/BLAS/SRC/chpr.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CHPR(UPLO,N,ALPHA,X,INCX,AP) * @@ -19,11 +19,11 @@ * COMPLEX AP(*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CHPR performs the hermitian rank 1 operation *> @@ -31,11 +31,10 @@ *> *> where alpha is a real scalar, x is an n element vector and A is an *> n by n hermitian matrix, supplied in packed form. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -101,10 +100,9 @@ *> not be set, they are assumed to be zero, and on exit they *> are set to zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -115,10 +113,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -128,7 +125,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/chpr2.f b/BLAS/SRC/chpr2.f index d3242110..eea346b7 100644 --- a/BLAS/SRC/chpr2.f +++ b/BLAS/SRC/chpr2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CHPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP) * @@ -19,11 +19,11 @@ * COMPLEX AP(*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CHPR2 performs the hermitian rank 2 operation *> @@ -31,11 +31,10 @@ *> *> where alpha is a scalar, x and y are n element vectors and A is an *> n by n hermitian matrix, supplied in packed form. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -116,10 +115,9 @@ *> not be set, they are assumed to be zero, and on exit they *> are set to zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -130,10 +128,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -143,7 +140,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/crotg.f b/BLAS/SRC/crotg.f index f4800229..1a2efd44 100644 --- a/BLAS/SRC/crotg.f +++ b/BLAS/SRC/crotg.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CROTG(CA,CB,C,S) * @@ -15,18 +15,17 @@ * REAL C * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> CROTG determines a complex Givens rotation. +*> \verbatim *> -*>\endverbatim +*> CROTG determines a complex Givens rotation. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/BLAS/SRC/cscal.f b/BLAS/SRC/cscal.f index 0e2dc6a1..cceb77e9 100644 --- a/BLAS/SRC/cscal.f +++ b/BLAS/SRC/cscal.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CSCAL(N,CA,CX,INCX) * @@ -18,18 +18,17 @@ * COMPLEX CX(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> CSCAL scales a vector by a constant. +*> \verbatim *> -*>\endverbatim +*> CSCAL scales a vector by a constant. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,16 +39,14 @@ * *> \ingroup complex_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 3/93 to return if incx .le. 0. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/csrot.f b/BLAS/SRC/csrot.f index 02a7a38c..b600d9af 100644 --- a/BLAS/SRC/csrot.f +++ b/BLAS/SRC/csrot.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CSROT( N, CX, INCX, CY, INCY, C, S ) * @@ -18,20 +18,19 @@ * COMPLEX CX( * ), CY( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CSROT applies a plane rotation, where the cos and sin (c and s) are real *> and the vectors cx and cy are complex. *> jack dongarra, linpack, 3/11/78. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -83,10 +82,9 @@ *> S is REAL *> On entry, S specifies the sine, sin. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/BLAS/SRC/csscal.f b/BLAS/SRC/csscal.f index 2af05c22..f2edde8e 100644 --- a/BLAS/SRC/csscal.f +++ b/BLAS/SRC/csscal.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CSSCAL(N,SA,CX,INCX) * @@ -18,18 +18,17 @@ * COMPLEX CX(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> CSSCAL scales a complex vector by a real constant. +*> \verbatim *> -*>\endverbatim +*> CSSCAL scales a complex vector by a real constant. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,16 +39,14 @@ * *> \ingroup complex_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 3/93 to return if incx .le. 0. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/cswap.f b/BLAS/SRC/cswap.f index 12a6f193..2e4bedf8 100644 --- a/BLAS/SRC/cswap.f +++ b/BLAS/SRC/cswap.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CSWAP(N,CX,INCX,CY,INCY) * @@ -17,18 +17,17 @@ * COMPLEX CX(*),CY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> CSWAP interchanges two vectors. +*> \verbatim *> -*>\endverbatim +*> CSWAP interchanges two vectors. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -39,15 +38,13 @@ * *> \ingroup complex_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/csymm.f b/BLAS/SRC/csymm.f index f229c489..9d6d743a 100644 --- a/BLAS/SRC/csymm.f +++ b/BLAS/SRC/csymm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CSYMM(SIDE,UPLO,M,N,ALPHA,A,LDA,B,LDB,BETA,C,LDC) * @@ -19,11 +19,11 @@ * COMPLEX A(LDA,*),B(LDB,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CSYMM performs one of the matrix-matrix operations *> @@ -35,11 +35,10 @@ *> *> where alpha and beta are scalars, A is a symmetric matrix and B and *> C are m by n matrices. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -160,10 +159,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -174,10 +172,9 @@ * *> \ingroup complex_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -187,7 +184,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/csyr2k.f b/BLAS/SRC/csyr2k.f index d37e6431..dfa68e07 100644 --- a/BLAS/SRC/csyr2k.f +++ b/BLAS/SRC/csyr2k.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CSYR2K(UPLO,TRANS,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC) * @@ -19,11 +19,11 @@ * COMPLEX A(LDA,*),B(LDB,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CSYR2K performs one of the symmetric rank 2k operations *> @@ -36,11 +36,10 @@ *> where alpha and beta are scalars, C is an n by n symmetric matrix *> and A and B are n by k matrices in the first case and k by n *> matrices in the second case. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -159,10 +158,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -173,10 +171,9 @@ * *> \ingroup complex_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -186,7 +183,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/csyrk.f b/BLAS/SRC/csyrk.f index 744e7f33..8bf58ad2 100644 --- a/BLAS/SRC/csyrk.f +++ b/BLAS/SRC/csyrk.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CSYRK(UPLO,TRANS,N,K,ALPHA,A,LDA,BETA,C,LDC) * @@ -19,11 +19,11 @@ * COMPLEX A(LDA,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CSYRK performs one of the symmetric rank k operations *> @@ -36,11 +36,10 @@ *> where alpha and beta are scalars, C is an n by n symmetric matrix *> and A is an n by k matrix in the first case and a k by n matrix *> in the second case. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -138,10 +137,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -152,10 +150,9 @@ * *> \ingroup complex_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -165,7 +162,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ctbmv.f b/BLAS/SRC/ctbmv.f index 18214c21..45d17b86 100644 --- a/BLAS/SRC/ctbmv.f +++ b/BLAS/SRC/ctbmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CTBMV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX) * @@ -18,11 +18,11 @@ * COMPLEX A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CTBMV performs one of the matrix-vector operations *> @@ -30,11 +30,10 @@ *> *> where x is an n element vector and A is an n by n unit, or non-unit, *> upper or lower triangular band matrix, with ( k + 1 ) diagonals. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -156,10 +155,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -170,10 +168,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -184,7 +181,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ctbsv.f b/BLAS/SRC/ctbsv.f index 8a70301d..3e6c663b 100644 --- a/BLAS/SRC/ctbsv.f +++ b/BLAS/SRC/ctbsv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CTBSV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX) * @@ -18,11 +18,11 @@ * COMPLEX A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CTBSV solves one of the systems of equations *> @@ -34,11 +34,10 @@ *> *> No test for singularity or near-singularity is included in this *> routine. Such tests must be performed before calling this routine. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -160,10 +159,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -174,10 +172,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -187,7 +184,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ctpmv.f b/BLAS/SRC/ctpmv.f index ad6e9b34..14c7417d 100644 --- a/BLAS/SRC/ctpmv.f +++ b/BLAS/SRC/ctpmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CTPMV(UPLO,TRANS,DIAG,N,AP,X,INCX) * @@ -18,11 +18,11 @@ * COMPLEX AP(*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CTPMV performs one of the matrix-vector operations *> @@ -30,11 +30,10 @@ *> *> where x is an n element vector and A is an n by n unit, or non-unit, *> upper or lower triangular matrix, supplied in packed form. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -112,10 +111,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -126,10 +124,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -140,7 +137,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ctpsv.f b/BLAS/SRC/ctpsv.f index fd2d0d1d..40844deb 100644 --- a/BLAS/SRC/ctpsv.f +++ b/BLAS/SRC/ctpsv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CTPSV(UPLO,TRANS,DIAG,N,AP,X,INCX) * @@ -18,11 +18,11 @@ * COMPLEX AP(*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CTPSV solves one of the systems of equations *> @@ -33,11 +33,10 @@ *> *> No test for singularity or near-singularity is included in this *> routine. Such tests must be performed before calling this routine. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -115,10 +114,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -129,10 +127,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -142,7 +139,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ctrmm.f b/BLAS/SRC/ctrmm.f index 28a6d7d3..b0ac1dd9 100644 --- a/BLAS/SRC/ctrmm.f +++ b/BLAS/SRC/ctrmm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CTRMM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB) * @@ -19,11 +19,11 @@ * COMPLEX A(LDA,*),B(LDB,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CTRMM performs one of the matrix-matrix operations *> @@ -33,11 +33,10 @@ *> non-unit, upper or lower triangular matrix and op( A ) is one of *> *> op( A ) = A or op( A ) = A**T or op( A ) = A**H. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -148,10 +147,9 @@ *> in the calling (sub) program. LDB must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -162,10 +160,9 @@ * *> \ingroup complex_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -175,7 +172,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ctrmv.f b/BLAS/SRC/ctrmv.f index 734bcd0b..f2bfbc2e 100644 --- a/BLAS/SRC/ctrmv.f +++ b/BLAS/SRC/ctrmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CTRMV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX) * @@ -18,11 +18,11 @@ * COMPLEX A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CTRMV performs one of the matrix-vector operations *> @@ -30,11 +30,10 @@ *> *> where x is an n element vector and A is an n by n unit, or non-unit, *> upper or lower triangular matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -117,10 +116,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -131,10 +129,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -145,7 +142,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ctrsm.f b/BLAS/SRC/ctrsm.f index 93823f02..b87bfe3e 100644 --- a/BLAS/SRC/ctrsm.f +++ b/BLAS/SRC/ctrsm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CTRSM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB) * @@ -19,11 +19,11 @@ * COMPLEX A(LDA,*),B(LDB,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CTRSM solves one of the matrix equations *> @@ -35,11 +35,10 @@ *> op( A ) = A or op( A ) = A**T or op( A ) = A**H. *> *> The matrix X is overwritten on B. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -151,10 +150,9 @@ *> in the calling (sub) program. LDB must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -165,10 +163,9 @@ * *> \ingroup complex_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -178,7 +175,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ctrsv.f b/BLAS/SRC/ctrsv.f index 05e7c4e9..90897286 100644 --- a/BLAS/SRC/ctrsv.f +++ b/BLAS/SRC/ctrsv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE CTRSV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX) * @@ -18,11 +18,11 @@ * COMPLEX A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CTRSV solves one of the systems of equations *> @@ -33,11 +33,10 @@ *> *> No test for singularity or near-singularity is included in this *> routine. Such tests must be performed before calling this routine. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -120,10 +119,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -134,10 +132,9 @@ * *> \ingroup complex_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -147,7 +144,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dasum.f b/BLAS/SRC/dasum.f index b6609ded..c1bd78ac 100644 --- a/BLAS/SRC/dasum.f +++ b/BLAS/SRC/dasum.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * DOUBLE PRECISION FUNCTION DASUM(N,DX,INCX) * @@ -17,18 +17,17 @@ * DOUBLE PRECISION DX(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> DASUM takes the sum of the absolute values. +*> \verbatim *> -*>\endverbatim +*> DASUM takes the sum of the absolute values. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -39,16 +38,14 @@ * *> \ingroup double_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 3/93 to return if incx .le. 0. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/daxpy.f b/BLAS/SRC/daxpy.f index b21a9654..64a02d68 100644 --- a/BLAS/SRC/daxpy.f +++ b/BLAS/SRC/daxpy.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DAXPY(N,DA,DX,INCX,DY,INCY) * @@ -18,19 +18,18 @@ * DOUBLE PRECISION DX(*),DY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DAXPY constant times a vector plus a vector. *> uses unrolled loops for increments equal to one. -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -41,15 +40,13 @@ * *> \ingroup double_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dcabs1.f b/BLAS/SRC/dcabs1.f index f290b05c..f6debb9a 100644 --- a/BLAS/SRC/dcabs1.f +++ b/BLAS/SRC/dcabs1.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * DOUBLE PRECISION FUNCTION DCABS1(Z) * @@ -14,18 +14,18 @@ * COMPLEX*16 Z * .. * .. -* Purpose -* ======= +* * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> DCABS1 computes absolute value of a double complex number +*> \verbatim *> -*>\endverbatim +*> DCABS1 computes absolute value of a double complex number +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/BLAS/SRC/dcopy.f b/BLAS/SRC/dcopy.f index 35d0f4de..d9d5ac7a 100644 --- a/BLAS/SRC/dcopy.f +++ b/BLAS/SRC/dcopy.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DCOPY(N,DX,INCX,DY,INCY) * @@ -17,19 +17,18 @@ * DOUBLE PRECISION DX(*),DY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DCOPY copies a vector, x, to a vector, y. *> uses unrolled loops for increments equal to one. -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,15 +39,13 @@ * *> \ingroup double_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ddot.f b/BLAS/SRC/ddot.f index 13acc405..cc0c1b7a 100644 --- a/BLAS/SRC/ddot.f +++ b/BLAS/SRC/ddot.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * DOUBLE PRECISION FUNCTION DDOT(N,DX,INCX,DY,INCY) * @@ -17,19 +17,18 @@ * DOUBLE PRECISION DX(*),DY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DDOT forms the dot product of two vectors. *> uses unrolled loops for increments equal to one. -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,15 +39,13 @@ * *> \ingroup double_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dgbmv.f b/BLAS/SRC/dgbmv.f index 198b0ab7..4a608bd6 100644 --- a/BLAS/SRC/dgbmv.f +++ b/BLAS/SRC/dgbmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DGBMV(TRANS,M,N,KL,KU,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * DOUBLE PRECISION A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DGBMV performs one of the matrix-vector operations *> @@ -31,11 +31,10 @@ *> *> where alpha and beta are scalars, x and y are vectors and A is an *> m by n band matrix, with kl sub-diagonals and ku super-diagonals. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TRANS *> \verbatim @@ -155,10 +154,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -169,10 +167,9 @@ * *> \ingroup double_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -183,7 +180,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dgemm.f b/BLAS/SRC/dgemm.f index e8aa6a4b..45d001b7 100644 --- a/BLAS/SRC/dgemm.f +++ b/BLAS/SRC/dgemm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DGEMM(TRANSA,TRANSB,M,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC) * @@ -19,11 +19,11 @@ * DOUBLE PRECISION A(LDA,*),B(LDB,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DGEMM performs one of the matrix-matrix operations *> @@ -35,11 +35,10 @@ *> *> alpha and beta are scalars, and A, B and C are matrices, with op( A ) *> an m by k matrix, op( B ) a k by n matrix and C an m by n matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TRANSA *> \verbatim @@ -158,10 +157,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -172,10 +170,9 @@ * *> \ingroup double_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -185,7 +182,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dgemv.f b/BLAS/SRC/dgemv.f index ef42e93f..675257fa 100644 --- a/BLAS/SRC/dgemv.f +++ b/BLAS/SRC/dgemv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DGEMV(TRANS,M,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * DOUBLE PRECISION A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DGEMV performs one of the matrix-vector operations *> @@ -31,11 +31,10 @@ *> *> where alpha and beta are scalars, x and y are vectors and A is an *> m by n matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TRANS *> \verbatim @@ -126,10 +125,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -140,10 +138,9 @@ * *> \ingroup double_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -154,7 +151,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dger.f b/BLAS/SRC/dger.f index c0e6059c..a0424837 100644 --- a/BLAS/SRC/dger.f +++ b/BLAS/SRC/dger.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DGER(M,N,ALPHA,X,INCX,Y,INCY,A,LDA) * @@ -18,11 +18,11 @@ * DOUBLE PRECISION A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DGER performs the rank 1 operation *> @@ -30,11 +30,10 @@ *> *> where alpha is a scalar, x is an m element vector, y is an n element *> vector and A is an m by n matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -101,10 +100,9 @@ *> in the calling (sub) program. LDA must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -115,10 +113,9 @@ * *> \ingroup double_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -128,7 +125,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dnrm2.f b/BLAS/SRC/dnrm2.f index 7d4a005d..5ea257a2 100644 --- a/BLAS/SRC/dnrm2.f +++ b/BLAS/SRC/dnrm2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * DOUBLE PRECISION FUNCTION DNRM2(N,X,INCX) * @@ -17,21 +17,20 @@ * DOUBLE PRECISION X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DNRM2 returns the euclidean norm of a vector via the function *> name, so that *> *> DNRM2 := sqrt( x'*x ) -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -42,16 +41,14 @@ * *> \ingroup double_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> -- This version written on 25-October-1982. *> Modified on 14-October-1993 to inline the call to DLASSQ. *> Sven Hammarling, Nag Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/drot.f b/BLAS/SRC/drot.f index 355e17f8..1615ef6a 100644 --- a/BLAS/SRC/drot.f +++ b/BLAS/SRC/drot.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DROT(N,DX,INCX,DY,INCY,C,S) * @@ -18,18 +18,17 @@ * DOUBLE PRECISION DX(*),DY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> DROT applies a plane rotation. +*> \verbatim *> -*>\endverbatim +*> DROT applies a plane rotation. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,15 +39,13 @@ * *> \ingroup double_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/drotg.f b/BLAS/SRC/drotg.f index dcf3e135..10261511 100644 --- a/BLAS/SRC/drotg.f +++ b/BLAS/SRC/drotg.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DROTG(DA,DB,C,S) * @@ -14,18 +14,17 @@ * DOUBLE PRECISION C,DA,DB,S * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> DROTG construct givens plane rotation. +*> \verbatim *> -*>\endverbatim +*> DROTG construct givens plane rotation. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -36,14 +35,12 @@ * *> \ingroup double_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/drotm.f b/BLAS/SRC/drotm.f index 4d523113..538af67b 100644 --- a/BLAS/SRC/drotm.f +++ b/BLAS/SRC/drotm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DROTM(N,DX,INCX,DY,INCY,DPARAM) * @@ -17,11 +17,11 @@ * DOUBLE PRECISION DPARAM(5),DX(*),DY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> APPLY THE MODIFIED GIVENS TRANSFORMATION, H, TO THE 2 BY N MATRIX *> @@ -38,11 +38,10 @@ *> H=( ) ( ) ( ) ( ) *> (DH21 DH22), (DH21 1.D0), (-1.D0 DH22), (0.D0 1.D0). *> SEE DROTMG FOR A DESCRIPTION OF DATA STORAGE IN DPARAM. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -83,10 +82,9 @@ *> DPARAM(4)=DH12 *> DPARAM(5)=DH22 *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/BLAS/SRC/drotmg.f b/BLAS/SRC/drotmg.f index 694d37aa..d18d258f 100644 --- a/BLAS/SRC/drotmg.f +++ b/BLAS/SRC/drotmg.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DROTMG(DD1,DD2,DX1,DY1,DPARAM) * @@ -17,11 +17,11 @@ * DOUBLE PRECISION DPARAM(5) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CONSTRUCT THE MODIFIED GIVENS TRANSFORMATION MATRIX H WHICH ZEROS *> THE SECOND COMPONENT OF THE 2-VECTOR (DSQRT(DD1)*DX1,DSQRT(DD2)*> DY2)**T. @@ -40,11 +40,10 @@ *> INEXACT. THIS IS OK AS THEY ARE ONLY USED FOR TESTING THE SIZE *> OF DD1 AND DD2. ALL ACTUAL SCALING OF DATA IS DONE USING GAM. *> -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in,out] DD1 *> \verbatim @@ -75,10 +74,9 @@ *> DPARAM(4)=DH12 *> DPARAM(5)=DH22 *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/BLAS/SRC/dsbmv.f b/BLAS/SRC/dsbmv.f index 128864f9..734668b0 100644 --- a/BLAS/SRC/dsbmv.f +++ b/BLAS/SRC/dsbmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DSBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * DOUBLE PRECISION A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DSBMV performs the matrix-vector operation *> @@ -31,11 +31,10 @@ *> *> where alpha and beta are scalars, x and y are n element vectors and *> A is an n by n symmetric band matrix, with k super-diagonals. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -154,10 +153,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -168,10 +166,9 @@ * *> \ingroup double_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -182,7 +179,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dscal.f b/BLAS/SRC/dscal.f index 50dd2eb5..3337de8e 100644 --- a/BLAS/SRC/dscal.f +++ b/BLAS/SRC/dscal.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DSCAL(N,DA,DX,INCX) * @@ -18,19 +18,18 @@ * DOUBLE PRECISION DX(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DSCAL scales a vector by a constant. *> uses unrolled loops for increment equal to one. -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -41,16 +40,14 @@ * *> \ingroup double_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 3/93 to return if incx .le. 0. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dsdot.f b/BLAS/SRC/dsdot.f index a6f4ea88..f95a9ab5 100644 --- a/BLAS/SRC/dsdot.f +++ b/BLAS/SRC/dsdot.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * DOUBLE PRECISION FUNCTION DSDOT(N,SX,INCX,SY,INCY) * @@ -22,11 +22,12 @@ * Lawson, C. L., (JPL), Hanson, R. J., (SNLA), * Kincaid, D. R., (U. of Texas), Krogh, F. T., (JPL) * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim +*> *> Compute the inner product of two vectors with extended *> precision accumulation and result. *> @@ -34,11 +35,10 @@ *> DSDOT = sum for I = 0 to N-1 of SX(LX+I*INCX) * SY(LY+I*INCY), *> where LX = 1 if INCX .GE. 0, else LX = 1+(1-N)*INCX, and LY is *> defined in a similar way using INCY. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -75,10 +75,9 @@ *> DSDOT is DOUBLE PRECISION *> DSDOT double precision dot product (zero if N.LE.0) *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -89,13 +88,17 @@ * *> \ingroup double_blas_level1 * +*> \par Further Details: +* ===================== +*> +*> \verbatim +*> \endverbatim * -* Further Details -* =============== -*>\details \b Further \b Details +*> \par References: +* ================ +*> *> \verbatim *> -*> REFERENCES *> *> C. L. Lawson, R. J. Hanson, D. R. Kincaid and F. T. *> Krogh, Basic linear algebra subprograms for Fortran @@ -111,7 +114,6 @@ *> 920310 Corrected definition of LX in DESCRIPTION. (WRB) *> 920501 Reformatted the REFERENCES section. (WRB) *> 070118 Reformat to LAPACK style (JL) -*> *> \endverbatim *> * ===================================================================== @@ -129,8 +131,8 @@ REAL SX(*),SY(*) * .. * -* AUTHORS -* ======= +* Authors: +* ======== * Lawson, C. L., (JPL), Hanson, R. J., (SNLA), * Kincaid, D. R., (U. of Texas), Krogh, F. T., (JPL) * diff --git a/BLAS/SRC/dspmv.f b/BLAS/SRC/dspmv.f index ddebd55d..fd3e2a04 100644 --- a/BLAS/SRC/dspmv.f +++ b/BLAS/SRC/dspmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DSPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * DOUBLE PRECISION AP(*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DSPMV performs the matrix-vector operation *> @@ -31,11 +31,10 @@ *> *> where alpha and beta are scalars, x and y are n element vectors and *> A is an n by n symmetric matrix, supplied in packed form. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -117,10 +116,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -131,10 +129,9 @@ * *> \ingroup double_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -145,7 +142,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dspr.f b/BLAS/SRC/dspr.f index 543dce9b..6a575e7d 100644 --- a/BLAS/SRC/dspr.f +++ b/BLAS/SRC/dspr.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DSPR(UPLO,N,ALPHA,X,INCX,AP) * @@ -19,11 +19,11 @@ * DOUBLE PRECISION AP(*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DSPR performs the symmetric rank 1 operation *> @@ -31,11 +31,10 @@ *> *> where alpha is a real scalar, x is an n element vector and A is an *> n by n symmetric matrix, supplied in packed form. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -98,10 +97,9 @@ *> AP is overwritten by the lower triangular part of the *> updated matrix. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -112,10 +110,9 @@ * *> \ingroup double_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -125,7 +122,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dspr2.f b/BLAS/SRC/dspr2.f index cae156bd..5861b29a 100644 --- a/BLAS/SRC/dspr2.f +++ b/BLAS/SRC/dspr2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DSPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP) * @@ -19,11 +19,11 @@ * DOUBLE PRECISION AP(*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DSPR2 performs the symmetric rank 2 operation *> @@ -31,11 +31,10 @@ *> *> where alpha is a scalar, x and y are n element vectors and A is an *> n by n symmetric matrix, supplied in packed form. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -113,10 +112,9 @@ *> AP is overwritten by the lower triangular part of the *> updated matrix. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -127,10 +125,9 @@ * *> \ingroup double_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -140,7 +137,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dswap.f b/BLAS/SRC/dswap.f index 27760582..e567bd93 100644 --- a/BLAS/SRC/dswap.f +++ b/BLAS/SRC/dswap.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DSWAP(N,DX,INCX,DY,INCY) * @@ -17,19 +17,18 @@ * DOUBLE PRECISION DX(*),DY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> interchanges two vectors. *> uses unrolled loops for increments equal one. -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,15 +39,13 @@ * *> \ingroup double_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dsymm.f b/BLAS/SRC/dsymm.f index 3a1710f6..ee8df4df 100644 --- a/BLAS/SRC/dsymm.f +++ b/BLAS/SRC/dsymm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DSYMM(SIDE,UPLO,M,N,ALPHA,A,LDA,B,LDB,BETA,C,LDC) * @@ -19,11 +19,11 @@ * DOUBLE PRECISION A(LDA,*),B(LDB,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DSYMM performs one of the matrix-matrix operations *> @@ -35,11 +35,10 @@ *> *> where alpha and beta are scalars, A is a symmetric matrix and B and *> C are m by n matrices. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -160,10 +159,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -174,10 +172,9 @@ * *> \ingroup double_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -187,7 +184,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dsymv.f b/BLAS/SRC/dsymv.f index f919dbcd..55220238 100644 --- a/BLAS/SRC/dsymv.f +++ b/BLAS/SRC/dsymv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DSYMV(UPLO,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * DOUBLE PRECISION A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DSYMV performs the matrix-vector operation *> @@ -31,11 +31,10 @@ *> *> where alpha and beta are scalars, x and y are n element vectors and *> A is an n by n symmetric matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -122,10 +121,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -136,10 +134,9 @@ * *> \ingroup double_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -150,7 +147,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dsyr.f b/BLAS/SRC/dsyr.f index 73ed1e51..0b8a7628 100644 --- a/BLAS/SRC/dsyr.f +++ b/BLAS/SRC/dsyr.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DSYR(UPLO,N,ALPHA,X,INCX,A,LDA) * @@ -19,11 +19,11 @@ * DOUBLE PRECISION A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DSYR performs the symmetric rank 1 operation *> @@ -31,11 +31,10 @@ *> *> where alpha is a real scalar, x is an n element vector and A is an *> n by n symmetric matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -103,10 +102,9 @@ *> in the calling (sub) program. LDA must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -117,10 +115,9 @@ * *> \ingroup double_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -130,7 +127,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dsyr2.f b/BLAS/SRC/dsyr2.f index f6686944..05e14810 100644 --- a/BLAS/SRC/dsyr2.f +++ b/BLAS/SRC/dsyr2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DSYR2(UPLO,N,ALPHA,X,INCX,Y,INCY,A,LDA) * @@ -19,11 +19,11 @@ * DOUBLE PRECISION A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DSYR2 performs the symmetric rank 2 operation *> @@ -31,11 +31,10 @@ *> *> where alpha is a scalar, x and y are n element vectors and A is an n *> by n symmetric matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -118,10 +117,9 @@ *> in the calling (sub) program. LDA must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -132,10 +130,9 @@ * *> \ingroup double_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -145,7 +142,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dsyr2k.f b/BLAS/SRC/dsyr2k.f index 409f7e31..2dde293e 100644 --- a/BLAS/SRC/dsyr2k.f +++ b/BLAS/SRC/dsyr2k.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DSYR2K(UPLO,TRANS,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC) * @@ -19,11 +19,11 @@ * DOUBLE PRECISION A(LDA,*),B(LDB,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DSYR2K performs one of the symmetric rank 2k operations *> @@ -36,11 +36,10 @@ *> where alpha and beta are scalars, C is an n by n symmetric matrix *> and A and B are n by k matrices in the first case and k by n *> matrices in the second case. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -162,10 +161,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -176,10 +174,9 @@ * *> \ingroup double_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -190,7 +187,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dsyrk.f b/BLAS/SRC/dsyrk.f index 73f2a661..d91c3369 100644 --- a/BLAS/SRC/dsyrk.f +++ b/BLAS/SRC/dsyrk.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DSYRK(UPLO,TRANS,N,K,ALPHA,A,LDA,BETA,C,LDC) * @@ -19,11 +19,11 @@ * DOUBLE PRECISION A(LDA,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DSYRK performs one of the symmetric rank k operations *> @@ -36,11 +36,10 @@ *> where alpha and beta are scalars, C is an n by n symmetric matrix *> and A is an n by k matrix in the first case and a k by n matrix *> in the second case. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -140,10 +139,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -154,10 +152,9 @@ * *> \ingroup double_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -167,7 +164,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dtbmv.f b/BLAS/SRC/dtbmv.f index 2b7ed080..86e027f8 100644 --- a/BLAS/SRC/dtbmv.f +++ b/BLAS/SRC/dtbmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DTBMV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX) * @@ -18,11 +18,11 @@ * DOUBLE PRECISION A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DTBMV performs one of the matrix-vector operations *> @@ -30,11 +30,10 @@ *> *> where x is an n element vector and A is an n by n unit, or non-unit, *> upper or lower triangular band matrix, with ( k + 1 ) diagonals. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -156,10 +155,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -170,10 +168,9 @@ * *> \ingroup double_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -184,7 +181,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dtbsv.f b/BLAS/SRC/dtbsv.f index e80fe009..5e25a927 100644 --- a/BLAS/SRC/dtbsv.f +++ b/BLAS/SRC/dtbsv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DTBSV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX) * @@ -18,11 +18,11 @@ * DOUBLE PRECISION A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DTBSV solves one of the systems of equations *> @@ -34,11 +34,10 @@ *> *> No test for singularity or near-singularity is included in this *> routine. Such tests must be performed before calling this routine. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -160,10 +159,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -174,10 +172,9 @@ * *> \ingroup double_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -187,7 +184,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dtpmv.f b/BLAS/SRC/dtpmv.f index 9f643dc7..5af8f1d9 100644 --- a/BLAS/SRC/dtpmv.f +++ b/BLAS/SRC/dtpmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DTPMV(UPLO,TRANS,DIAG,N,AP,X,INCX) * @@ -18,11 +18,11 @@ * DOUBLE PRECISION AP(*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DTPMV performs one of the matrix-vector operations *> @@ -30,11 +30,10 @@ *> *> where x is an n element vector and A is an n by n unit, or non-unit, *> upper or lower triangular matrix, supplied in packed form. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -112,10 +111,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -126,10 +124,9 @@ * *> \ingroup double_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -140,7 +137,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dtpsv.f b/BLAS/SRC/dtpsv.f index 937afcca..9376f21a 100644 --- a/BLAS/SRC/dtpsv.f +++ b/BLAS/SRC/dtpsv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DTPSV(UPLO,TRANS,DIAG,N,AP,X,INCX) * @@ -18,11 +18,11 @@ * DOUBLE PRECISION AP(*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DTPSV solves one of the systems of equations *> @@ -33,11 +33,10 @@ *> *> No test for singularity or near-singularity is included in this *> routine. Such tests must be performed before calling this routine. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -115,10 +114,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -129,10 +127,9 @@ * *> \ingroup double_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -142,7 +139,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dtrmm.f b/BLAS/SRC/dtrmm.f index 71a7e0d6..cbd5ce70 100644 --- a/BLAS/SRC/dtrmm.f +++ b/BLAS/SRC/dtrmm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DTRMM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB) * @@ -19,11 +19,11 @@ * DOUBLE PRECISION A(LDA,*),B(LDB,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DTRMM performs one of the matrix-matrix operations *> @@ -33,11 +33,10 @@ *> non-unit, upper or lower triangular matrix and op( A ) is one of *> *> op( A ) = A or op( A ) = A**T. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -148,10 +147,9 @@ *> in the calling (sub) program. LDB must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -162,10 +160,9 @@ * *> \ingroup double_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -175,7 +172,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dtrmv.f b/BLAS/SRC/dtrmv.f index 7bb9d748..71459fe7 100644 --- a/BLAS/SRC/dtrmv.f +++ b/BLAS/SRC/dtrmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DTRMV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX) * @@ -18,11 +18,11 @@ * DOUBLE PRECISION A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DTRMV performs one of the matrix-vector operations *> @@ -30,11 +30,10 @@ *> *> where x is an n element vector and A is an n by n unit, or non-unit, *> upper or lower triangular matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -117,10 +116,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -131,10 +129,9 @@ * *> \ingroup double_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -145,7 +142,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dtrsm.f b/BLAS/SRC/dtrsm.f index 6adb99eb..065df9a1 100644 --- a/BLAS/SRC/dtrsm.f +++ b/BLAS/SRC/dtrsm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DTRSM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB) * @@ -19,11 +19,11 @@ * DOUBLE PRECISION A(LDA,*),B(LDB,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DTRSM solves one of the matrix equations *> @@ -35,11 +35,10 @@ *> op( A ) = A or op( A ) = A**T. *> *> The matrix X is overwritten on B. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -151,10 +150,9 @@ *> in the calling (sub) program. LDB must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -165,10 +163,9 @@ * *> \ingroup double_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -179,7 +176,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dtrsv.f b/BLAS/SRC/dtrsv.f index ce82d7de..e54303a9 100644 --- a/BLAS/SRC/dtrsv.f +++ b/BLAS/SRC/dtrsv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE DTRSV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX) * @@ -18,11 +18,11 @@ * DOUBLE PRECISION A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DTRSV solves one of the systems of equations *> @@ -33,11 +33,10 @@ *> *> No test for singularity or near-singularity is included in this *> routine. Such tests must be performed before calling this routine. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -128,10 +127,9 @@ *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/BLAS/SRC/dzasum.f b/BLAS/SRC/dzasum.f index ea61e0bb..cbeee993 100644 --- a/BLAS/SRC/dzasum.f +++ b/BLAS/SRC/dzasum.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * DOUBLE PRECISION FUNCTION DZASUM(N,ZX,INCX) * @@ -17,18 +17,17 @@ * COMPLEX*16 ZX(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> DZASUM takes the sum of the absolute values. +*> \verbatim *> -*>\endverbatim +*> DZASUM takes the sum of the absolute values. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -39,16 +38,14 @@ * *> \ingroup double_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, 3/11/78. *> modified 3/93 to return if incx .le. 0. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/dznrm2.f b/BLAS/SRC/dznrm2.f index 4a6b7573..b5713a2b 100644 --- a/BLAS/SRC/dznrm2.f +++ b/BLAS/SRC/dznrm2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * DOUBLE PRECISION FUNCTION DZNRM2(N,X,INCX) * @@ -17,21 +17,20 @@ * COMPLEX*16 X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> DZNRM2 returns the euclidean norm of a vector via the function *> name, so that *> *> DZNRM2 := sqrt( x**H*x ) -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -42,16 +41,14 @@ * *> \ingroup double_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> -- This version written on 25-October-1982. *> Modified on 14-October-1993 to inline the call to ZLASSQ. *> Sven Hammarling, Nag Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/icamax.f b/BLAS/SRC/icamax.f index 5e060ec0..2120db98 100644 --- a/BLAS/SRC/icamax.f +++ b/BLAS/SRC/icamax.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * INTEGER FUNCTION ICAMAX(N,CX,INCX) * @@ -17,18 +17,17 @@ * COMPLEX CX(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> ICAMAX finds the index of element having max. absolute value. +*> \verbatim *> -*>\endverbatim +*> ICAMAX finds the index of element having max. absolute value. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -39,16 +38,14 @@ * *> \ingroup aux_blas * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 3/93 to return if incx .le. 0. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/idamax.f b/BLAS/SRC/idamax.f index e10fa057..4233fcc2 100644 --- a/BLAS/SRC/idamax.f +++ b/BLAS/SRC/idamax.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * INTEGER FUNCTION IDAMAX(N,DX,INCX) * @@ -17,18 +17,17 @@ * DOUBLE PRECISION DX(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> IDAMAX finds the index of element having max. absolute value. +*> \verbatim *> -*>\endverbatim +*> IDAMAX finds the index of element having max. absolute value. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -39,16 +38,14 @@ * *> \ingroup aux_blas * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 3/93 to return if incx .le. 0. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/isamax.f b/BLAS/SRC/isamax.f index 4e03d89a..af977c59 100644 --- a/BLAS/SRC/isamax.f +++ b/BLAS/SRC/isamax.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * INTEGER FUNCTION ISAMAX(N,SX,INCX) * @@ -17,18 +17,17 @@ * REAL SX(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> ISAMAX finds the index of element having max. absolute value. +*> \verbatim *> -*>\endverbatim +*> ISAMAX finds the index of element having max. absolute value. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -39,16 +38,14 @@ * *> \ingroup aux_blas * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 3/93 to return if incx .le. 0. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/izamax.f b/BLAS/SRC/izamax.f index 592c3363..d51cd582 100644 --- a/BLAS/SRC/izamax.f +++ b/BLAS/SRC/izamax.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * INTEGER FUNCTION IZAMAX(N,ZX,INCX) * @@ -17,18 +17,17 @@ * COMPLEX*16 ZX(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> IZAMAX finds the index of element having max. absolute value. +*> \verbatim *> -*>\endverbatim +*> IZAMAX finds the index of element having max. absolute value. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -39,16 +38,14 @@ * *> \ingroup aux_blas * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, 1/15/85. *> modified 3/93 to return if incx .le. 0. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/lsame.f b/BLAS/SRC/lsame.f index 7c0c8a07..f19f9cda 100644 --- a/BLAS/SRC/lsame.f +++ b/BLAS/SRC/lsame.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * LOGICAL FUNCTION LSAME(CA,CB) * @@ -14,19 +14,18 @@ * CHARACTER CA,CB * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> LSAME returns .TRUE. if CA is the same letter as CB regardless of *> case. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] CA *> \verbatim @@ -38,10 +37,9 @@ *> CB is CHARACTER*1 *> CA and CB specify the single characters to be compared. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/BLAS/SRC/sasum.f b/BLAS/SRC/sasum.f index 400eab05..46a4ecc1 100644 --- a/BLAS/SRC/sasum.f +++ b/BLAS/SRC/sasum.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * REAL FUNCTION SASUM(N,SX,INCX) * @@ -17,19 +17,18 @@ * REAL SX(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SASUM takes the sum of the absolute values. *> uses unrolled loops for increment equal to one. -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,16 +39,14 @@ * *> \ingroup single_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 3/93 to return if incx .le. 0. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/saxpy.f b/BLAS/SRC/saxpy.f index 648be35f..3fd45d73 100644 --- a/BLAS/SRC/saxpy.f +++ b/BLAS/SRC/saxpy.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SAXPY(N,SA,SX,INCX,SY,INCY) * @@ -18,19 +18,18 @@ * REAL SX(*),SY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SAXPY constant times a vector plus a vector. *> uses unrolled loops for increments equal to one. -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -41,15 +40,13 @@ * *> \ingroup single_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/scabs1.f b/BLAS/SRC/scabs1.f index f17280fe..cdb5c0b9 100644 --- a/BLAS/SRC/scabs1.f +++ b/BLAS/SRC/scabs1.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * REAL FUNCTION SCABS1(Z) * @@ -14,18 +14,17 @@ * COMPLEX Z * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> SCABS1 computes absolute value of a complex number +*> \verbatim *> -*>\endverbatim +*> SCABS1 computes absolute value of a complex number +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/BLAS/SRC/scasum.f b/BLAS/SRC/scasum.f index dde1badb..03154eb5 100644 --- a/BLAS/SRC/scasum.f +++ b/BLAS/SRC/scasum.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * REAL FUNCTION SCASUM(N,CX,INCX) * @@ -17,19 +17,18 @@ * COMPLEX CX(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SCASUM takes the sum of the absolute values of a complex vector and *> returns a single precision result. -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,16 +39,14 @@ * *> \ingroup single_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 3/93 to return if incx .le. 0. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/scnrm2.f b/BLAS/SRC/scnrm2.f index 8b3f8e06..4a581e8e 100644 --- a/BLAS/SRC/scnrm2.f +++ b/BLAS/SRC/scnrm2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * REAL FUNCTION SCNRM2(N,X,INCX) * @@ -17,21 +17,20 @@ * COMPLEX X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SCNRM2 returns the euclidean norm of a vector via the function *> name, so that *> *> SCNRM2 := sqrt( x**H*x ) -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -42,16 +41,14 @@ * *> \ingroup single_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> -- This version written on 25-October-1982. *> Modified on 14-October-1993 to inline the call to CLASSQ. *> Sven Hammarling, Nag Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/scopy.f b/BLAS/SRC/scopy.f index f8b5d676..3376fb01 100644 --- a/BLAS/SRC/scopy.f +++ b/BLAS/SRC/scopy.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SCOPY(N,SX,INCX,SY,INCY) * @@ -17,19 +17,18 @@ * REAL SX(*),SY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SCOPY copies a vector, x, to a vector, y. *> uses unrolled loops for increments equal to 1. -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,15 +39,13 @@ * *> \ingroup single_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/sdot.f b/BLAS/SRC/sdot.f index d3429a24..68555aad 100644 --- a/BLAS/SRC/sdot.f +++ b/BLAS/SRC/sdot.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * REAL FUNCTION SDOT(N,SX,INCX,SY,INCY) * @@ -17,19 +17,18 @@ * REAL SX(*),SY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SDOT forms the dot product of two vectors. *> uses unrolled loops for increments equal to one. -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,15 +39,13 @@ * *> \ingroup single_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/sdsdot.f b/BLAS/SRC/sdsdot.f index 7be8af19..39d3a2e6 100644 --- a/BLAS/SRC/sdsdot.f +++ b/BLAS/SRC/sdsdot.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * REAL FUNCTION SDSDOT(N,SB,SX,INCX,SY,INCY) * @@ -118,15 +118,15 @@ * SDSDOT = DSDOT * RETURN * END -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim -*>\endverbatim +*> \par Purpose: +* ============= +*> +*> \verbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/BLAS/SRC/sgbmv.f b/BLAS/SRC/sgbmv.f index fde4e37a..797ac7fc 100644 --- a/BLAS/SRC/sgbmv.f +++ b/BLAS/SRC/sgbmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SGBMV(TRANS,M,N,KL,KU,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * REAL A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SGBMV performs one of the matrix-vector operations *> @@ -31,11 +31,10 @@ *> *> where alpha and beta are scalars, x and y are vectors and A is an *> m by n band matrix, with kl sub-diagonals and ku super-diagonals. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TRANS *> \verbatim @@ -155,10 +154,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -169,10 +167,9 @@ * *> \ingroup single_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -183,7 +180,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/sgemm.f b/BLAS/SRC/sgemm.f index 7708dc92..9a3d9e1a 100644 --- a/BLAS/SRC/sgemm.f +++ b/BLAS/SRC/sgemm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SGEMM(TRANSA,TRANSB,M,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC) * @@ -19,11 +19,11 @@ * REAL A(LDA,*),B(LDB,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SGEMM performs one of the matrix-matrix operations *> @@ -35,11 +35,10 @@ *> *> alpha and beta are scalars, and A, B and C are matrices, with op( A ) *> an m by k matrix, op( B ) a k by n matrix and C an m by n matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TRANSA *> \verbatim @@ -158,10 +157,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -172,10 +170,9 @@ * *> \ingroup single_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -185,7 +182,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/sgemv.f b/BLAS/SRC/sgemv.f index ba1d3fac..eef133f3 100644 --- a/BLAS/SRC/sgemv.f +++ b/BLAS/SRC/sgemv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SGEMV(TRANS,M,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * REAL A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SGEMV performs one of the matrix-vector operations *> @@ -31,11 +31,10 @@ *> *> where alpha and beta are scalars, x and y are vectors and A is an *> m by n matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TRANS *> \verbatim @@ -126,10 +125,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -140,10 +138,9 @@ * *> \ingroup single_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -154,7 +151,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/sger.f b/BLAS/SRC/sger.f index c34a2a91..cf85ffdc 100644 --- a/BLAS/SRC/sger.f +++ b/BLAS/SRC/sger.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SGER(M,N,ALPHA,X,INCX,Y,INCY,A,LDA) * @@ -18,11 +18,11 @@ * REAL A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SGER performs the rank 1 operation *> @@ -30,11 +30,10 @@ *> *> where alpha is a scalar, x is an m element vector, y is an n element *> vector and A is an m by n matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -101,10 +100,9 @@ *> in the calling (sub) program. LDA must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -115,10 +113,9 @@ * *> \ingroup single_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -128,7 +125,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/snrm2.f b/BLAS/SRC/snrm2.f index 6e122ccc..a3674a6d 100644 --- a/BLAS/SRC/snrm2.f +++ b/BLAS/SRC/snrm2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * REAL FUNCTION SNRM2(N,X,INCX) * @@ -17,21 +17,20 @@ * REAL X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SNRM2 returns the euclidean norm of a vector via the function *> name, so that *> *> SNRM2 := sqrt( x'*x ). -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -42,16 +41,14 @@ * *> \ingroup single_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> -- This version written on 25-October-1982. *> Modified on 14-October-1993 to inline the call to SLASSQ. *> Sven Hammarling, Nag Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/srot.f b/BLAS/SRC/srot.f index 50e20ed8..c326e1c7 100644 --- a/BLAS/SRC/srot.f +++ b/BLAS/SRC/srot.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SROT(N,SX,INCX,SY,INCY,C,S) * @@ -18,18 +18,17 @@ * REAL SX(*),SY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> applies a plane rotation. +*> \verbatim *> -*>\endverbatim +*> applies a plane rotation. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,15 +39,13 @@ * *> \ingroup single_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/srotg.f b/BLAS/SRC/srotg.f index 666d5501..90ba220e 100644 --- a/BLAS/SRC/srotg.f +++ b/BLAS/SRC/srotg.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SROTG(SA,SB,C,S) * @@ -14,18 +14,17 @@ * REAL C,S,SA,SB * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> SROTG construct givens plane rotation. +*> \verbatim *> -*>\endverbatim +*> SROTG construct givens plane rotation. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -36,14 +35,12 @@ * *> \ingroup single_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/srotm.f b/BLAS/SRC/srotm.f index be84807f..f465f448 100644 --- a/BLAS/SRC/srotm.f +++ b/BLAS/SRC/srotm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SROTM(N,SX,INCX,SY,INCY,SPARAM) * @@ -17,11 +17,11 @@ * REAL SPARAM(5),SX(*),SY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> APPLY THE MODIFIED GIVENS TRANSFORMATION, H, TO THE 2 BY N MATRIX *> @@ -39,11 +39,10 @@ *> (SH21 SH22), (SH21 1.E0), (-1.E0 SH22), (0.E0 1.E0). *> SEE SROTMG FOR A DESCRIPTION OF DATA STORAGE IN SPARAM. *> -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -84,10 +83,9 @@ *> SPARAM(4)=SH12 *> SPARAM(5)=SH22 *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/BLAS/SRC/srotmg.f b/BLAS/SRC/srotmg.f index 62a76e42..9a41e0a9 100644 --- a/BLAS/SRC/srotmg.f +++ b/BLAS/SRC/srotmg.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SROTMG(SD1,SD2,SX1,SY1,SPARAM) * @@ -17,11 +17,11 @@ * REAL SPARAM(5) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> CONSTRUCT THE MODIFIED GIVENS TRANSFORMATION MATRIX H WHICH ZEROS *> THE SECOND COMPONENT OF THE 2-VECTOR (SQRT(SD1)*SX1,SQRT(SD2)*> SY2)**T. @@ -40,11 +40,10 @@ *> INEXACT. THIS IS OK AS THEY ARE ONLY USED FOR TESTING THE SIZE *> OF SD1 AND SD2. ALL ACTUAL SCALING OF DATA IS DONE USING GAM. *> -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in,out] SD1 *> \verbatim @@ -75,10 +74,9 @@ *> SPARAM(4)=SH12 *> SPARAM(5)=SH22 *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/BLAS/SRC/ssbmv.f b/BLAS/SRC/ssbmv.f index c91cb18d..483f80bf 100644 --- a/BLAS/SRC/ssbmv.f +++ b/BLAS/SRC/ssbmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SSBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * REAL A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SSBMV performs the matrix-vector operation *> @@ -31,11 +31,10 @@ *> *> where alpha and beta are scalars, x and y are n element vectors and *> A is an n by n symmetric band matrix, with k super-diagonals. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -154,10 +153,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -168,10 +166,9 @@ * *> \ingroup single_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -182,7 +179,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/sscal.f b/BLAS/SRC/sscal.f index d3d7130a..b4b08625 100644 --- a/BLAS/SRC/sscal.f +++ b/BLAS/SRC/sscal.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SSCAL(N,SA,SX,INCX) * @@ -18,19 +18,18 @@ * REAL SX(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> scales a vector by a constant. *> uses unrolled loops for increment equal to 1. -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -41,16 +40,14 @@ * *> \ingroup single_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 3/93 to return if incx .le. 0. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/sspmv.f b/BLAS/SRC/sspmv.f index 393700a4..b19f902b 100644 --- a/BLAS/SRC/sspmv.f +++ b/BLAS/SRC/sspmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SSPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * REAL AP(*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SSPMV performs the matrix-vector operation *> @@ -31,11 +31,10 @@ *> *> where alpha and beta are scalars, x and y are n element vectors and *> A is an n by n symmetric matrix, supplied in packed form. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -117,10 +116,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -131,10 +129,9 @@ * *> \ingroup single_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -145,7 +142,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/sspr.f b/BLAS/SRC/sspr.f index 4088b3f0..9350cea0 100644 --- a/BLAS/SRC/sspr.f +++ b/BLAS/SRC/sspr.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SSPR(UPLO,N,ALPHA,X,INCX,AP) * @@ -19,11 +19,11 @@ * REAL AP(*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SSPR performs the symmetric rank 1 operation *> @@ -31,11 +31,10 @@ *> *> where alpha is a real scalar, x is an n element vector and A is an *> n by n symmetric matrix, supplied in packed form. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -98,10 +97,9 @@ *> AP is overwritten by the lower triangular part of the *> updated matrix. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -112,10 +110,9 @@ * *> \ingroup single_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -125,7 +122,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/sspr2.f b/BLAS/SRC/sspr2.f index 38466916..50fa67c4 100644 --- a/BLAS/SRC/sspr2.f +++ b/BLAS/SRC/sspr2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SSPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP) * @@ -19,11 +19,11 @@ * REAL AP(*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SSPR2 performs the symmetric rank 2 operation *> @@ -31,11 +31,10 @@ *> *> where alpha is a scalar, x and y are n element vectors and A is an *> n by n symmetric matrix, supplied in packed form. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -113,10 +112,9 @@ *> AP is overwritten by the lower triangular part of the *> updated matrix. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -127,10 +125,9 @@ * *> \ingroup single_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -140,7 +137,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/sswap.f b/BLAS/SRC/sswap.f index d0dcddfa..ad5a7f5c 100644 --- a/BLAS/SRC/sswap.f +++ b/BLAS/SRC/sswap.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SSWAP(N,SX,INCX,SY,INCY) * @@ -17,19 +17,18 @@ * REAL SX(*),SY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> interchanges two vectors. *> uses unrolled loops for increments equal to 1. -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,15 +39,13 @@ * *> \ingroup single_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ssymm.f b/BLAS/SRC/ssymm.f index 0fc8fc5c..ac10d0b3 100644 --- a/BLAS/SRC/ssymm.f +++ b/BLAS/SRC/ssymm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SSYMM(SIDE,UPLO,M,N,ALPHA,A,LDA,B,LDB,BETA,C,LDC) * @@ -19,11 +19,11 @@ * REAL A(LDA,*),B(LDB,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SSYMM performs one of the matrix-matrix operations *> @@ -35,11 +35,10 @@ *> *> where alpha and beta are scalars, A is a symmetric matrix and B and *> C are m by n matrices. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -160,10 +159,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -174,10 +172,9 @@ * *> \ingroup single_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -187,7 +184,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ssymv.f b/BLAS/SRC/ssymv.f index 362a8f40..2b9ef177 100644 --- a/BLAS/SRC/ssymv.f +++ b/BLAS/SRC/ssymv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SSYMV(UPLO,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * REAL A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SSYMV performs the matrix-vector operation *> @@ -31,11 +31,10 @@ *> *> where alpha and beta are scalars, x and y are n element vectors and *> A is an n by n symmetric matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -122,10 +121,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -136,10 +134,9 @@ * *> \ingroup single_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -150,7 +147,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ssyr.f b/BLAS/SRC/ssyr.f index 96fce78e..18a1a913 100644 --- a/BLAS/SRC/ssyr.f +++ b/BLAS/SRC/ssyr.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SSYR(UPLO,N,ALPHA,X,INCX,A,LDA) * @@ -19,11 +19,11 @@ * REAL A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SSYR performs the symmetric rank 1 operation *> @@ -31,11 +31,10 @@ *> *> where alpha is a real scalar, x is an n element vector and A is an *> n by n symmetric matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -103,10 +102,9 @@ *> in the calling (sub) program. LDA must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -117,10 +115,9 @@ * *> \ingroup single_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -130,7 +127,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ssyr2.f b/BLAS/SRC/ssyr2.f index 88305522..4c90ae8f 100644 --- a/BLAS/SRC/ssyr2.f +++ b/BLAS/SRC/ssyr2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SSYR2(UPLO,N,ALPHA,X,INCX,Y,INCY,A,LDA) * @@ -19,11 +19,11 @@ * REAL A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SSYR2 performs the symmetric rank 2 operation *> @@ -31,11 +31,10 @@ *> *> where alpha is a scalar, x and y are n element vectors and A is an n *> by n symmetric matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -118,10 +117,9 @@ *> in the calling (sub) program. LDA must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -132,10 +130,9 @@ * *> \ingroup single_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -145,7 +142,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ssyr2k.f b/BLAS/SRC/ssyr2k.f index a7968577..435e9969 100644 --- a/BLAS/SRC/ssyr2k.f +++ b/BLAS/SRC/ssyr2k.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SSYR2K(UPLO,TRANS,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC) * @@ -19,11 +19,11 @@ * REAL A(LDA,*),B(LDB,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SSYR2K performs one of the symmetric rank 2k operations *> @@ -36,11 +36,10 @@ *> where alpha and beta are scalars, C is an n by n symmetric matrix *> and A and B are n by k matrices in the first case and k by n *> matrices in the second case. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -162,10 +161,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -176,10 +174,9 @@ * *> \ingroup single_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -190,7 +187,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ssyrk.f b/BLAS/SRC/ssyrk.f index b38025b4..c428029d 100644 --- a/BLAS/SRC/ssyrk.f +++ b/BLAS/SRC/ssyrk.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE SSYRK(UPLO,TRANS,N,K,ALPHA,A,LDA,BETA,C,LDC) * @@ -19,11 +19,11 @@ * REAL A(LDA,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> SSYRK performs one of the symmetric rank k operations *> @@ -36,11 +36,10 @@ *> where alpha and beta are scalars, C is an n by n symmetric matrix *> and A is an n by k matrix in the first case and a k by n matrix *> in the second case. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -140,10 +139,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -154,10 +152,9 @@ * *> \ingroup single_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -167,7 +164,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/stbmv.f b/BLAS/SRC/stbmv.f index ebd5f6f3..bd5036c0 100644 --- a/BLAS/SRC/stbmv.f +++ b/BLAS/SRC/stbmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE STBMV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX) * @@ -18,11 +18,11 @@ * REAL A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> STBMV performs one of the matrix-vector operations *> @@ -30,11 +30,10 @@ *> *> where x is an n element vector and A is an n by n unit, or non-unit, *> upper or lower triangular band matrix, with ( k + 1 ) diagonals. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -156,10 +155,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -170,10 +168,9 @@ * *> \ingroup single_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -184,7 +181,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/stbsv.f b/BLAS/SRC/stbsv.f index f4e2688c..4c313479 100644 --- a/BLAS/SRC/stbsv.f +++ b/BLAS/SRC/stbsv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE STBSV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX) * @@ -18,11 +18,11 @@ * REAL A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> STBSV solves one of the systems of equations *> @@ -34,11 +34,10 @@ *> *> No test for singularity or near-singularity is included in this *> routine. Such tests must be performed before calling this routine. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -160,10 +159,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -174,10 +172,9 @@ * *> \ingroup single_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -187,7 +184,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/stpmv.f b/BLAS/SRC/stpmv.f index 5dac03aa..e66dc4ce 100644 --- a/BLAS/SRC/stpmv.f +++ b/BLAS/SRC/stpmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE STPMV(UPLO,TRANS,DIAG,N,AP,X,INCX) * @@ -18,11 +18,11 @@ * REAL AP(*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> STPMV performs one of the matrix-vector operations *> @@ -30,11 +30,10 @@ *> *> where x is an n element vector and A is an n by n unit, or non-unit, *> upper or lower triangular matrix, supplied in packed form. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -112,10 +111,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -126,10 +124,9 @@ * *> \ingroup single_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -140,7 +137,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/stpsv.f b/BLAS/SRC/stpsv.f index d615193b..9c58591c 100644 --- a/BLAS/SRC/stpsv.f +++ b/BLAS/SRC/stpsv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE STPSV(UPLO,TRANS,DIAG,N,AP,X,INCX) * @@ -18,11 +18,11 @@ * REAL AP(*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> STPSV solves one of the systems of equations *> @@ -33,11 +33,10 @@ *> *> No test for singularity or near-singularity is included in this *> routine. Such tests must be performed before calling this routine. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -115,10 +114,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -129,10 +127,9 @@ * *> \ingroup single_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -142,7 +139,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/strmm.f b/BLAS/SRC/strmm.f index 2a000630..e713d195 100644 --- a/BLAS/SRC/strmm.f +++ b/BLAS/SRC/strmm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE STRMM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB) * @@ -19,11 +19,11 @@ * REAL A(LDA,*),B(LDB,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> STRMM performs one of the matrix-matrix operations *> @@ -33,11 +33,10 @@ *> non-unit, upper or lower triangular matrix and op( A ) is one of *> *> op( A ) = A or op( A ) = A**T. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -148,10 +147,9 @@ *> in the calling (sub) program. LDB must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -162,10 +160,9 @@ * *> \ingroup single_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -175,7 +172,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/strmv.f b/BLAS/SRC/strmv.f index f3581cd5..8f3a36f1 100644 --- a/BLAS/SRC/strmv.f +++ b/BLAS/SRC/strmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE STRMV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX) * @@ -18,11 +18,11 @@ * REAL A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> STRMV performs one of the matrix-vector operations *> @@ -30,11 +30,10 @@ *> *> where x is an n element vector and A is an n by n unit, or non-unit, *> upper or lower triangular matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -117,10 +116,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -131,10 +129,9 @@ * *> \ingroup single_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -145,7 +142,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/strsm.f b/BLAS/SRC/strsm.f index 48f7dcf0..dad4bb05 100644 --- a/BLAS/SRC/strsm.f +++ b/BLAS/SRC/strsm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE STRSM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB) * @@ -19,11 +19,11 @@ * REAL A(LDA,*),B(LDB,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> STRSM solves one of the matrix equations *> @@ -35,11 +35,10 @@ *> op( A ) = A or op( A ) = A**T. *> *> The matrix X is overwritten on B. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -151,10 +150,9 @@ *> in the calling (sub) program. LDB must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -165,10 +163,9 @@ * *> \ingroup single_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -179,7 +176,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/strsv.f b/BLAS/SRC/strsv.f index 61a54c63..03262fb0 100644 --- a/BLAS/SRC/strsv.f +++ b/BLAS/SRC/strsv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE STRSV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX) * @@ -18,11 +18,11 @@ * REAL A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> STRSV solves one of the systems of equations *> @@ -33,11 +33,10 @@ *> *> No test for singularity or near-singularity is included in this *> routine. Such tests must be performed before calling this routine. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -120,10 +119,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -134,10 +132,9 @@ * *> \ingroup single_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -147,7 +144,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/xerbla.f b/BLAS/SRC/xerbla.f index 5d287b91..eb1c037d 100644 --- a/BLAS/SRC/xerbla.f +++ b/BLAS/SRC/xerbla.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE XERBLA( SRNAME, INFO ) * @@ -15,11 +15,11 @@ * INTEGER INFO * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> XERBLA is an error handler for the LAPACK routines. *> It is called by an LAPACK routine if an input parameter has an @@ -27,11 +27,10 @@ *> *> Installers may consider modifying the STOP statement in order to *> call system-specific exception-handling facilities. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SRNAME *> \verbatim @@ -45,10 +44,9 @@ *> The position of the invalid parameter in the parameter list *> of the calling routine. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/BLAS/SRC/xerbla_array.f b/BLAS/SRC/xerbla_array.f index c6173eee..7fceaeb1 100644 --- a/BLAS/SRC/xerbla_array.f +++ b/BLAS/SRC/xerbla_array.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE XERBLA_ARRAY(SRNAME_ARRAY, SRNAME_LEN, INFO) * @@ -17,11 +17,11 @@ * CHARACTER(1) SRNAME_ARRAY(SRNAME_LEN) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> XERBLA_ARRAY assists other languages in calling XERBLA, the LAPACK *> and BLAS error handler. Rather than taking a Fortran string argument @@ -41,11 +41,10 @@ *> *> Providing XERBLA_ARRAY is not necessary for intercepting LAPACK *> errors. XERBLA_ARRAY calls XERBLA. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SRNAME_ARRAY *> \verbatim @@ -65,10 +64,9 @@ *> The position of the invalid parameter in the parameter list *> of the calling routine. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/BLAS/SRC/zaxpy.f b/BLAS/SRC/zaxpy.f index 0daa8870..e6f5e1f6 100644 --- a/BLAS/SRC/zaxpy.f +++ b/BLAS/SRC/zaxpy.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZAXPY(N,ZA,ZX,INCX,ZY,INCY) * @@ -18,18 +18,17 @@ * COMPLEX*16 ZX(*),ZY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> ZAXPY constant times a vector plus a vector. +*> \verbatim *> -*>\endverbatim +*> ZAXPY constant times a vector plus a vector. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,15 +39,13 @@ * *> \ingroup complex16_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zcopy.f b/BLAS/SRC/zcopy.f index 93ee92d0..baeafd5c 100644 --- a/BLAS/SRC/zcopy.f +++ b/BLAS/SRC/zcopy.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZCOPY(N,ZX,INCX,ZY,INCY) * @@ -17,18 +17,17 @@ * COMPLEX*16 ZX(*),ZY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> ZCOPY copies a vector, x, to a vector, y. +*> \verbatim *> -*>\endverbatim +*> ZCOPY copies a vector, x, to a vector, y. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -39,15 +38,13 @@ * *> \ingroup complex16_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, linpack, 4/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zdotc.f b/BLAS/SRC/zdotc.f index 4ed407d0..660648bb 100644 --- a/BLAS/SRC/zdotc.f +++ b/BLAS/SRC/zdotc.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * COMPLEX*16 FUNCTION ZDOTC(N,ZX,INCX,ZY,INCY) * @@ -17,18 +17,17 @@ * COMPLEX*16 ZX(*),ZY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> ZDOTC forms the dot product of a vector. +*> \verbatim *> -*>\endverbatim +*> ZDOTC forms the dot product of a vector. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -39,15 +38,13 @@ * *> \ingroup complex16_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zdotu.f b/BLAS/SRC/zdotu.f index 9d481a97..dd863521 100644 --- a/BLAS/SRC/zdotu.f +++ b/BLAS/SRC/zdotu.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * COMPLEX*16 FUNCTION ZDOTU(N,ZX,INCX,ZY,INCY) * @@ -17,18 +17,17 @@ * COMPLEX*16 ZX(*),ZY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> ZDOTU forms the dot product of two vectors. +*> \verbatim *> -*>\endverbatim +*> ZDOTU forms the dot product of two vectors. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -39,15 +38,13 @@ * *> \ingroup complex16_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zdrot.f b/BLAS/SRC/zdrot.f index 3caaaca6..f8bdcd79 100644 --- a/BLAS/SRC/zdrot.f +++ b/BLAS/SRC/zdrot.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZDROT( N, CX, INCX, CY, INCY, C, S ) * @@ -18,20 +18,19 @@ * COMPLEX*16 CX( * ), CY( * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Applies a plane rotation, where the cos and sin (c and s) are real *> and the vectors cx and cy are complex. *> jack dongarra, linpack, 3/11/78. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] N *> \verbatim @@ -83,10 +82,9 @@ *> S is DOUBLE PRECISION *> On entry, S specifies the sine, sin. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/BLAS/SRC/zdscal.f b/BLAS/SRC/zdscal.f index 327309cf..57a94902 100644 --- a/BLAS/SRC/zdscal.f +++ b/BLAS/SRC/zdscal.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZDSCAL(N,DA,ZX,INCX) * @@ -18,18 +18,17 @@ * COMPLEX*16 ZX(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> ZDSCAL scales a vector by a constant. +*> \verbatim *> -*>\endverbatim +*> ZDSCAL scales a vector by a constant. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,16 +39,14 @@ * *> \ingroup complex16_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, 3/11/78. *> modified 3/93 to return if incx .le. 0. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zgbmv.f b/BLAS/SRC/zgbmv.f index 77aff8d0..0e7311a0 100644 --- a/BLAS/SRC/zgbmv.f +++ b/BLAS/SRC/zgbmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZGBMV(TRANS,M,N,KL,KU,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * COMPLEX*16 A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZGBMV performs one of the matrix-vector operations *> @@ -33,11 +33,10 @@ *> *> where alpha and beta are scalars, x and y are vectors and A is an *> m by n band matrix, with kl sub-diagonals and ku super-diagonals. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TRANS *> \verbatim @@ -157,10 +156,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -171,10 +169,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -185,7 +182,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zgemm.f b/BLAS/SRC/zgemm.f index 6f7fe980..f4233155 100644 --- a/BLAS/SRC/zgemm.f +++ b/BLAS/SRC/zgemm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZGEMM(TRANSA,TRANSB,M,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC) * @@ -19,11 +19,11 @@ * COMPLEX*16 A(LDA,*),B(LDB,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZGEMM performs one of the matrix-matrix operations *> @@ -35,11 +35,10 @@ *> *> alpha and beta are scalars, and A, B and C are matrices, with op( A ) *> an m by k matrix, op( B ) a k by n matrix and C an m by n matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TRANSA *> \verbatim @@ -158,10 +157,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -172,10 +170,9 @@ * *> \ingroup complex16_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -185,7 +182,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zgemv.f b/BLAS/SRC/zgemv.f index b3ffbb84..4e174c95 100644 --- a/BLAS/SRC/zgemv.f +++ b/BLAS/SRC/zgemv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZGEMV(TRANS,M,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * COMPLEX*16 A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZGEMV performs one of the matrix-vector operations *> @@ -33,11 +33,10 @@ *> *> where alpha and beta are scalars, x and y are vectors and A is an *> m by n matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TRANS *> \verbatim @@ -128,10 +127,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -142,10 +140,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -156,7 +153,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zgerc.f b/BLAS/SRC/zgerc.f index 9457319f..accfeafc 100644 --- a/BLAS/SRC/zgerc.f +++ b/BLAS/SRC/zgerc.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZGERC(M,N,ALPHA,X,INCX,Y,INCY,A,LDA) * @@ -18,11 +18,11 @@ * COMPLEX*16 A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZGERC performs the rank 1 operation *> @@ -30,11 +30,10 @@ *> *> where alpha is a scalar, x is an m element vector, y is an n element *> vector and A is an m by n matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -101,10 +100,9 @@ *> in the calling (sub) program. LDA must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -115,10 +113,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -128,7 +125,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zgeru.f b/BLAS/SRC/zgeru.f index 26acb99f..bf23ed7f 100644 --- a/BLAS/SRC/zgeru.f +++ b/BLAS/SRC/zgeru.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZGERU(M,N,ALPHA,X,INCX,Y,INCY,A,LDA) * @@ -18,11 +18,11 @@ * COMPLEX*16 A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZGERU performs the rank 1 operation *> @@ -30,11 +30,10 @@ *> *> where alpha is a scalar, x is an m element vector, y is an n element *> vector and A is an m by n matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] M *> \verbatim @@ -101,10 +100,9 @@ *> in the calling (sub) program. LDA must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -115,10 +113,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -128,7 +125,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zhbmv.f b/BLAS/SRC/zhbmv.f index 14f4fa87..6a668c20 100644 --- a/BLAS/SRC/zhbmv.f +++ b/BLAS/SRC/zhbmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZHBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * COMPLEX*16 A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZHBMV performs the matrix-vector operation *> @@ -31,11 +31,10 @@ *> *> where alpha and beta are scalars, x and y are n element vectors and *> A is an n by n hermitian band matrix, with k super-diagonals. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -157,10 +156,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -171,10 +169,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -185,7 +182,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zhemm.f b/BLAS/SRC/zhemm.f index 608138c3..77abea14 100644 --- a/BLAS/SRC/zhemm.f +++ b/BLAS/SRC/zhemm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZHEMM(SIDE,UPLO,M,N,ALPHA,A,LDA,B,LDB,BETA,C,LDC) * @@ -19,11 +19,11 @@ * COMPLEX*16 A(LDA,*),B(LDB,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZHEMM performs one of the matrix-matrix operations *> @@ -35,11 +35,10 @@ *> *> where alpha and beta are scalars, A is an hermitian matrix and B and *> C are m by n matrices. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -162,10 +161,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -176,10 +174,9 @@ * *> \ingroup complex16_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -189,7 +186,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zhemv.f b/BLAS/SRC/zhemv.f index baa29300..34216fbf 100644 --- a/BLAS/SRC/zhemv.f +++ b/BLAS/SRC/zhemv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZHEMV(UPLO,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * COMPLEX*16 A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZHEMV performs the matrix-vector operation *> @@ -31,11 +31,10 @@ *> *> where alpha and beta are scalars, x and y are n element vectors and *> A is an n by n hermitian matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -124,10 +123,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -138,10 +136,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -152,7 +149,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zher.f b/BLAS/SRC/zher.f index 5f684821..0edc1191 100644 --- a/BLAS/SRC/zher.f +++ b/BLAS/SRC/zher.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZHER(UPLO,N,ALPHA,X,INCX,A,LDA) * @@ -19,11 +19,11 @@ * COMPLEX*16 A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZHER performs the hermitian rank 1 operation *> @@ -31,11 +31,10 @@ *> *> where alpha is a real scalar, x is an n element vector and A is an *> n by n hermitian matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -106,10 +105,9 @@ *> in the calling (sub) program. LDA must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -120,10 +118,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -133,7 +130,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zher2.f b/BLAS/SRC/zher2.f index 1b98c63a..e2a02c3c 100644 --- a/BLAS/SRC/zher2.f +++ b/BLAS/SRC/zher2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZHER2(UPLO,N,ALPHA,X,INCX,Y,INCY,A,LDA) * @@ -19,11 +19,11 @@ * COMPLEX*16 A(LDA,*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZHER2 performs the hermitian rank 2 operation *> @@ -31,11 +31,10 @@ *> *> where alpha is a scalar, x and y are n element vectors and A is an n *> by n hermitian matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -121,10 +120,9 @@ *> in the calling (sub) program. LDA must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -135,10 +133,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -148,7 +145,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zher2k.f b/BLAS/SRC/zher2k.f index b577e1b9..0b91bd2c 100644 --- a/BLAS/SRC/zher2k.f +++ b/BLAS/SRC/zher2k.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZHER2K(UPLO,TRANS,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC) * @@ -20,11 +20,11 @@ * COMPLEX*16 A(LDA,*),B(LDB,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZHER2K performs one of the hermitian rank 2k operations *> @@ -37,11 +37,10 @@ *> where alpha and beta are scalars with beta real, C is an n by n *> hermitian matrix and A and B are n by k matrices in the first case *> and k by n matrices in the second case. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -166,10 +165,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -180,10 +178,9 @@ * *> \ingroup complex16_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -196,7 +193,6 @@ *> *> -- Modified 8-Nov-93 to set C(J,J) to DBLE( C(J,J) ) when BETA = 1. *> Ed Anderson, Cray Research Inc. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zherk.f b/BLAS/SRC/zherk.f index cd4fed59..7e561e81 100644 --- a/BLAS/SRC/zherk.f +++ b/BLAS/SRC/zherk.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZHERK(UPLO,TRANS,N,K,ALPHA,A,LDA,BETA,C,LDC) * @@ -19,11 +19,11 @@ * COMPLEX*16 A(LDA,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZHERK performs one of the hermitian rank k operations *> @@ -36,11 +36,10 @@ *> where alpha and beta are real scalars, C is an n by n hermitian *> matrix and A is an n by k matrix in the first case and a k by n *> matrix in the second case. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -141,10 +140,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -155,10 +153,9 @@ * *> \ingroup complex16_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -171,7 +168,6 @@ *> *> -- Modified 8-Nov-93 to set C(J,J) to DBLE( C(J,J) ) when BETA = 1. *> Ed Anderson, Cray Research Inc. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zhpmv.f b/BLAS/SRC/zhpmv.f index c81456f0..23dad366 100644 --- a/BLAS/SRC/zhpmv.f +++ b/BLAS/SRC/zhpmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZHPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY) * @@ -19,11 +19,11 @@ * COMPLEX*16 AP(*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZHPMV performs the matrix-vector operation *> @@ -31,11 +31,10 @@ *> *> where alpha and beta are scalars, x and y are n element vectors and *> A is an n by n hermitian matrix, supplied in packed form. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -119,10 +118,9 @@ *> On entry, INCY specifies the increment for the elements of *> Y. INCY must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -133,10 +131,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -147,7 +144,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zhpr.f b/BLAS/SRC/zhpr.f index 0b0bd68c..42e61196 100644 --- a/BLAS/SRC/zhpr.f +++ b/BLAS/SRC/zhpr.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZHPR(UPLO,N,ALPHA,X,INCX,AP) * @@ -19,11 +19,11 @@ * COMPLEX*16 AP(*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZHPR performs the hermitian rank 1 operation *> @@ -31,11 +31,10 @@ *> *> where alpha is a real scalar, x is an n element vector and A is an *> n by n hermitian matrix, supplied in packed form. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -101,10 +100,9 @@ *> not be set, they are assumed to be zero, and on exit they *> are set to zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -115,10 +113,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -128,7 +125,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zhpr2.f b/BLAS/SRC/zhpr2.f index f160418b..2c6f353b 100644 --- a/BLAS/SRC/zhpr2.f +++ b/BLAS/SRC/zhpr2.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZHPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP) * @@ -19,11 +19,11 @@ * COMPLEX*16 AP(*),X(*),Y(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZHPR2 performs the hermitian rank 2 operation *> @@ -31,11 +31,10 @@ *> *> where alpha is a scalar, x and y are n element vectors and A is an *> n by n hermitian matrix, supplied in packed form. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -116,10 +115,9 @@ *> not be set, they are assumed to be zero, and on exit they *> are set to zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -130,10 +128,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -143,7 +140,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zrotg.f b/BLAS/SRC/zrotg.f index daa0f667..ca03e068 100644 --- a/BLAS/SRC/zrotg.f +++ b/BLAS/SRC/zrotg.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZROTG(CA,CB,C,S) * @@ -15,18 +15,17 @@ * DOUBLE PRECISION C * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> ZROTG determines a double complex Givens rotation. +*> \verbatim *> -*>\endverbatim +*> ZROTG determines a double complex Givens rotation. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley diff --git a/BLAS/SRC/zscal.f b/BLAS/SRC/zscal.f index 67148062..ad28a10a 100644 --- a/BLAS/SRC/zscal.f +++ b/BLAS/SRC/zscal.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZSCAL(N,ZA,ZX,INCX) * @@ -18,18 +18,17 @@ * COMPLEX*16 ZX(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> ZSCAL scales a vector by a constant. +*> \verbatim *> -*>\endverbatim +*> ZSCAL scales a vector by a constant. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -40,16 +39,14 @@ * *> \ingroup complex16_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, 3/11/78. *> modified 3/93 to return if incx .le. 0. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zswap.f b/BLAS/SRC/zswap.f index 8000bfc2..ca2f3472 100644 --- a/BLAS/SRC/zswap.f +++ b/BLAS/SRC/zswap.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZSWAP(N,ZX,INCX,ZY,INCY) * @@ -17,18 +17,17 @@ * COMPLEX*16 ZX(*),ZY(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= *> -*> ZSWAP interchanges two vectors. +*> \verbatim *> -*>\endverbatim +*> ZSWAP interchanges two vectors. +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -39,15 +38,13 @@ * *> \ingroup complex16_blas_level1 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> jack dongarra, 3/11/78. *> modified 12/3/93, array(1) declarations changed to array(*) -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zsymm.f b/BLAS/SRC/zsymm.f index 57e70208..b0ff42e6 100644 --- a/BLAS/SRC/zsymm.f +++ b/BLAS/SRC/zsymm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZSYMM(SIDE,UPLO,M,N,ALPHA,A,LDA,B,LDB,BETA,C,LDC) * @@ -19,11 +19,11 @@ * COMPLEX*16 A(LDA,*),B(LDB,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZSYMM performs one of the matrix-matrix operations *> @@ -35,11 +35,10 @@ *> *> where alpha and beta are scalars, A is a symmetric matrix and B and *> C are m by n matrices. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -160,10 +159,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -174,10 +172,9 @@ * *> \ingroup complex16_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -187,7 +184,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zsyr2k.f b/BLAS/SRC/zsyr2k.f index 5f88db42..f46ede12 100644 --- a/BLAS/SRC/zsyr2k.f +++ b/BLAS/SRC/zsyr2k.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZSYR2K(UPLO,TRANS,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC) * @@ -19,11 +19,11 @@ * COMPLEX*16 A(LDA,*),B(LDB,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZSYR2K performs one of the symmetric rank 2k operations *> @@ -36,11 +36,10 @@ *> where alpha and beta are scalars, C is an n by n symmetric matrix *> and A and B are n by k matrices in the first case and k by n *> matrices in the second case. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -159,10 +158,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -173,10 +171,9 @@ * *> \ingroup complex16_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -186,7 +183,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/zsyrk.f b/BLAS/SRC/zsyrk.f index 8508988b..c3484f99 100644 --- a/BLAS/SRC/zsyrk.f +++ b/BLAS/SRC/zsyrk.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZSYRK(UPLO,TRANS,N,K,ALPHA,A,LDA,BETA,C,LDC) * @@ -19,11 +19,11 @@ * COMPLEX*16 A(LDA,*),C(LDC,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZSYRK performs one of the symmetric rank k operations *> @@ -36,11 +36,10 @@ *> where alpha and beta are scalars, C is an n by n symmetric matrix *> and A is an n by k matrix in the first case and a k by n matrix *> in the second case. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -138,10 +137,9 @@ *> in the calling (sub) program. LDC must be at least *> max( 1, n ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -152,10 +150,9 @@ * *> \ingroup complex16_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -165,7 +162,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ztbmv.f b/BLAS/SRC/ztbmv.f index 690af3c6..2b5780b1 100644 --- a/BLAS/SRC/ztbmv.f +++ b/BLAS/SRC/ztbmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZTBMV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX) * @@ -18,11 +18,11 @@ * COMPLEX*16 A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZTBMV performs one of the matrix-vector operations *> @@ -30,11 +30,10 @@ *> *> where x is an n element vector and A is an n by n unit, or non-unit, *> upper or lower triangular band matrix, with ( k + 1 ) diagonals. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -156,10 +155,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -170,10 +168,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -184,7 +181,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ztbsv.f b/BLAS/SRC/ztbsv.f index 7a7b02c2..ea272195 100644 --- a/BLAS/SRC/ztbsv.f +++ b/BLAS/SRC/ztbsv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZTBSV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX) * @@ -18,11 +18,11 @@ * COMPLEX*16 A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZTBSV solves one of the systems of equations *> @@ -34,11 +34,10 @@ *> *> No test for singularity or near-singularity is included in this *> routine. Such tests must be performed before calling this routine. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -160,10 +159,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -174,10 +172,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -187,7 +184,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ztpmv.f b/BLAS/SRC/ztpmv.f index d5d8da90..e277ec1a 100644 --- a/BLAS/SRC/ztpmv.f +++ b/BLAS/SRC/ztpmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZTPMV(UPLO,TRANS,DIAG,N,AP,X,INCX) * @@ -18,11 +18,11 @@ * COMPLEX*16 AP(*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZTPMV performs one of the matrix-vector operations *> @@ -30,11 +30,10 @@ *> *> where x is an n element vector and A is an n by n unit, or non-unit, *> upper or lower triangular matrix, supplied in packed form. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -112,10 +111,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -126,10 +124,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -140,7 +137,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ztpsv.f b/BLAS/SRC/ztpsv.f index 94463428..0e75f9fa 100644 --- a/BLAS/SRC/ztpsv.f +++ b/BLAS/SRC/ztpsv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZTPSV(UPLO,TRANS,DIAG,N,AP,X,INCX) * @@ -18,11 +18,11 @@ * COMPLEX*16 AP(*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZTPSV solves one of the systems of equations *> @@ -33,11 +33,10 @@ *> *> No test for singularity or near-singularity is included in this *> routine. Such tests must be performed before calling this routine. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -115,10 +114,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -129,10 +127,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -142,7 +139,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ztrmm.f b/BLAS/SRC/ztrmm.f index 16d6c95d..ba7aead6 100644 --- a/BLAS/SRC/ztrmm.f +++ b/BLAS/SRC/ztrmm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZTRMM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB) * @@ -19,11 +19,11 @@ * COMPLEX*16 A(LDA,*),B(LDB,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZTRMM performs one of the matrix-matrix operations *> @@ -33,11 +33,10 @@ *> non-unit, upper or lower triangular matrix and op( A ) is one of *> *> op( A ) = A or op( A ) = A**T or op( A ) = A**H. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -148,10 +147,9 @@ *> in the calling (sub) program. LDB must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -162,10 +160,9 @@ * *> \ingroup complex16_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -175,7 +172,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ztrmv.f b/BLAS/SRC/ztrmv.f index ae8c40f6..8d7974a0 100644 --- a/BLAS/SRC/ztrmv.f +++ b/BLAS/SRC/ztrmv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZTRMV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX) * @@ -18,11 +18,11 @@ * COMPLEX*16 A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZTRMV performs one of the matrix-vector operations *> @@ -30,11 +30,10 @@ *> *> where x is an n element vector and A is an n by n unit, or non-unit, *> upper or lower triangular matrix. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -117,10 +116,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -131,10 +129,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -145,7 +142,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ztrsm.f b/BLAS/SRC/ztrsm.f index f51fd2ab..8e012546 100644 --- a/BLAS/SRC/ztrsm.f +++ b/BLAS/SRC/ztrsm.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZTRSM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB) * @@ -19,11 +19,11 @@ * COMPLEX*16 A(LDA,*),B(LDB,*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZTRSM solves one of the matrix equations *> @@ -35,11 +35,10 @@ *> op( A ) = A or op( A ) = A**T or op( A ) = A**H. *> *> The matrix X is overwritten on B. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] SIDE *> \verbatim @@ -151,10 +150,9 @@ *> in the calling (sub) program. LDB must be at least *> max( 1, m ). *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -165,10 +163,9 @@ * *> \ingroup complex16_blas_level3 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 3 Blas routine. @@ -178,7 +175,6 @@ *> Iain Duff, AERE Harwell. *> Jeremy Du Croz, Numerical Algorithms Group Ltd. *> Sven Hammarling, Numerical Algorithms Group Ltd. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/SRC/ztrsv.f b/BLAS/SRC/ztrsv.f index 8270da1d..f9fd4f84 100644 --- a/BLAS/SRC/ztrsv.f +++ b/BLAS/SRC/ztrsv.f @@ -5,8 +5,8 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZTRSV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX) * @@ -18,11 +18,11 @@ * COMPLEX*16 A(LDA,*),X(*) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> ZTRSV solves one of the systems of equations *> @@ -33,11 +33,10 @@ *> *> No test for singularity or near-singularity is included in this *> routine. Such tests must be performed before calling this routine. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] UPLO *> \verbatim @@ -120,10 +119,9 @@ *> On entry, INCX specifies the increment for the elements of *> X. INCX must not be zero. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -134,10 +132,9 @@ * *> \ingroup complex16_blas_level2 * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> Level 2 Blas routine. @@ -147,7 +144,6 @@ *> Jeremy Du Croz, Nag Central Office. *> Sven Hammarling, Nag Central Office. *> Richard Hanson, Sandia National Labs. -*> *> \endverbatim *> * ===================================================================== diff --git a/BLAS/TESTING/cblat1.f b/BLAS/TESTING/cblat1.f index c8be436f..450df9e3 100644 --- a/BLAS/TESTING/cblat1.f +++ b/BLAS/TESTING/cblat1.f @@ -5,26 +5,25 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * PROGRAM CBLAT1 * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Test program for the COMPLEX Level 1 BLAS. *> Based upon the original BLAS test routine together with: *> *> F06GAF Example Program Text -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -35,8 +34,7 @@ * *> \ingroup complex_blas_testing * -* ===================================================================== - PROGRAM CBLAT1 +* ===================================================================== PROGRAM CBLAT1 * * -- Reference BLAS test routine (version 3.4.0) -- * -- Reference BLAS is a software package provided by Univ. of Tennessee, -- diff --git a/BLAS/TESTING/cblat2.f b/BLAS/TESTING/cblat2.f index 35f76afa..e8467d25 100644 --- a/BLAS/TESTING/cblat2.f +++ b/BLAS/TESTING/cblat2.f @@ -5,16 +5,16 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * PROGRAM CBLAT2 * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Test program for the COMPLEX Level 2 Blas. *> @@ -86,11 +86,10 @@ *> 10-9-00: Change STATUS='NEW' to 'UNKNOWN' so that the testers *> can be run multiple times without deleting generated *> output files (susan) -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -101,8 +100,7 @@ * *> \ingroup complex_blas_testing * -* ===================================================================== - PROGRAM CBLAT2 +* ===================================================================== PROGRAM CBLAT2 * * -- Reference BLAS test routine (version 3.4.0) -- * -- Reference BLAS is a software package provided by Univ. of Tennessee, -- diff --git a/BLAS/TESTING/cblat3.f b/BLAS/TESTING/cblat3.f index a84229ee..25bc741c 100644 --- a/BLAS/TESTING/cblat3.f +++ b/BLAS/TESTING/cblat3.f @@ -5,16 +5,16 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * PROGRAM CBLAT3 * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Test program for the COMPLEX Level 3 Blas. *> @@ -68,11 +68,10 @@ *> 10-9-00: Change STATUS='NEW' to 'UNKNOWN' so that the testers *> can be run multiple times without deleting generated *> output files (susan) -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -83,8 +82,7 @@ * *> \ingroup complex_blas_testing * -* ===================================================================== - PROGRAM CBLAT3 +* ===================================================================== PROGRAM CBLAT3 * * -- Reference BLAS test routine (version 3.4.0) -- * -- Reference BLAS is a software package provided by Univ. of Tennessee, -- diff --git a/BLAS/TESTING/dblat1.f b/BLAS/TESTING/dblat1.f index 568160a3..bda7aa78 100644 --- a/BLAS/TESTING/dblat1.f +++ b/BLAS/TESTING/dblat1.f @@ -5,26 +5,25 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * PROGRAM DBLAT1 * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Test program for the DOUBLE PRECISION Level 1 BLAS. *> *> Based upon the original BLAS test routine together with: *> F06EAF Example Program Text -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -35,8 +34,7 @@ * *> \ingroup double_blas_testing * -* ===================================================================== - PROGRAM DBLAT1 +* ===================================================================== PROGRAM DBLAT1 * * -- Reference BLAS test routine (version 3.4.0) -- * -- Reference BLAS is a software package provided by Univ. of Tennessee, -- diff --git a/BLAS/TESTING/dblat2.f b/BLAS/TESTING/dblat2.f index 5e07e2ab..52eefcc6 100644 --- a/BLAS/TESTING/dblat2.f +++ b/BLAS/TESTING/dblat2.f @@ -5,16 +5,16 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * PROGRAM DBLAT2 * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Test program for the DOUBLE PRECISION Level 2 Blas. *> @@ -85,11 +85,10 @@ *> 10-9-00: Change STATUS='NEW' to 'UNKNOWN' so that the testers *> can be run multiple times without deleting generated *> output files (susan) -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -100,8 +99,7 @@ * *> \ingroup double_blas_testing * -* ===================================================================== - PROGRAM DBLAT2 +* ===================================================================== PROGRAM DBLAT2 * * -- Reference BLAS test routine (version 3.4.0) -- * -- Reference BLAS is a software package provided by Univ. of Tennessee, -- diff --git a/BLAS/TESTING/dblat3.f b/BLAS/TESTING/dblat3.f index 87a3e09d..d716f1ec 100644 --- a/BLAS/TESTING/dblat3.f +++ b/BLAS/TESTING/dblat3.f @@ -5,16 +5,16 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * PROGRAM DBLAT3 * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Test program for the DOUBLE PRECISION Level 3 Blas. *> @@ -65,11 +65,10 @@ *> 10-9-00: Change STATUS='NEW' to 'UNKNOWN' so that the testers *> can be run multiple times without deleting generated *> output files (susan) -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -80,8 +79,7 @@ * *> \ingroup double_blas_testing * -* ===================================================================== - PROGRAM DBLAT3 +* ===================================================================== PROGRAM DBLAT3 * * -- Reference BLAS test routine (version 3.4.0) -- * -- Reference BLAS is a software package provided by Univ. of Tennessee, -- diff --git a/BLAS/TESTING/sblat1.f b/BLAS/TESTING/sblat1.f index c465f630..744f2d9e 100644 --- a/BLAS/TESTING/sblat1.f +++ b/BLAS/TESTING/sblat1.f @@ -5,26 +5,25 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * PROGRAM SBLAT1 * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Test program for the REAL Level 1 BLAS. *> *> Based upon the original BLAS test routine together with: *> F06EAF Example Program Text -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -35,8 +34,7 @@ * *> \ingroup single_blas_testing * -* ===================================================================== - PROGRAM SBLAT1 +* ===================================================================== PROGRAM SBLAT1 * * -- Reference BLAS test routine (version 3.4.0) -- * -- Reference BLAS is a software package provided by Univ. of Tennessee, -- diff --git a/BLAS/TESTING/sblat2.f b/BLAS/TESTING/sblat2.f index 10a0adcb..53f760b4 100644 --- a/BLAS/TESTING/sblat2.f +++ b/BLAS/TESTING/sblat2.f @@ -5,16 +5,16 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * PROGRAM SBLAT2 * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Test program for the REAL Level 2 Blas. *> @@ -85,11 +85,10 @@ *> 10-9-00: Change STATUS='NEW' to 'UNKNOWN' so that the testers *> can be run multiple times without deleting generated *> output files (susan) -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -100,8 +99,7 @@ * *> \ingroup single_blas_testing * -* ===================================================================== - PROGRAM SBLAT2 +* ===================================================================== PROGRAM SBLAT2 * * -- Reference BLAS test routine (version 3.4.0) -- * -- Reference BLAS is a software package provided by Univ. of Tennessee, -- diff --git a/BLAS/TESTING/sblat3.f b/BLAS/TESTING/sblat3.f index 535e2e26..a07e8e69 100644 --- a/BLAS/TESTING/sblat3.f +++ b/BLAS/TESTING/sblat3.f @@ -5,16 +5,16 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * PROGRAM SBLAT3 * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Test program for the REAL Level 3 Blas. *> @@ -65,11 +65,10 @@ *> 10-9-00: Change STATUS='NEW' to 'UNKNOWN' so that the testers *> can be run multiple times without deleting generated *> output files (susan) -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -80,8 +79,7 @@ * *> \ingroup single_blas_testing * -* ===================================================================== - PROGRAM SBLAT3 +* ===================================================================== PROGRAM SBLAT3 * * -- Reference BLAS test routine (version 3.4.0) -- * -- Reference BLAS is a software package provided by Univ. of Tennessee, -- diff --git a/BLAS/TESTING/zblat1.f b/BLAS/TESTING/zblat1.f index a8ad681b..3482afa1 100644 --- a/BLAS/TESTING/zblat1.f +++ b/BLAS/TESTING/zblat1.f @@ -5,26 +5,25 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * PROGRAM ZBLAT1 * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Test program for the COMPLEX*16 Level 1 BLAS. *> *> Based upon the original BLAS test routine together with: *> F06GAF Example Program Text -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -35,8 +34,7 @@ * *> \ingroup complex16_blas_testing * -* ===================================================================== - PROGRAM ZBLAT1 +* ===================================================================== PROGRAM ZBLAT1 * * -- Reference BLAS test routine (version 3.4.0) -- * -- Reference BLAS is a software package provided by Univ. of Tennessee, -- diff --git a/BLAS/TESTING/zblat2.f b/BLAS/TESTING/zblat2.f index 014ed665..71e8c21d 100644 --- a/BLAS/TESTING/zblat2.f +++ b/BLAS/TESTING/zblat2.f @@ -5,16 +5,16 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * PROGRAM ZBLAT2 * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Test program for the COMPLEX*16 Level 2 Blas. *> @@ -86,11 +86,10 @@ *> 10-9-00: Change STATUS='NEW' to 'UNKNOWN' so that the testers *> can be run multiple times without deleting generated *> output files (susan) -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -101,8 +100,7 @@ * *> \ingroup complex16_blas_testing * -* ===================================================================== - PROGRAM ZBLAT2 +* ===================================================================== PROGRAM ZBLAT2 * * -- Reference BLAS test routine (version 3.4.0) -- * -- Reference BLAS is a software package provided by Univ. of Tennessee, -- diff --git a/BLAS/TESTING/zblat3.f b/BLAS/TESTING/zblat3.f index b189e284..18556809 100644 --- a/BLAS/TESTING/zblat3.f +++ b/BLAS/TESTING/zblat3.f @@ -5,16 +5,16 @@ * Online html documentation available at * http://www.netlib.org/lapack/explore-html/ * -* Definition -* ========== +* Definition: +* =========== * * PROGRAM ZBLAT3 * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Test program for the COMPLEX*16 Level 3 Blas. *> @@ -69,11 +69,10 @@ *> 10-9-00: Change STATUS='NEW' to 'UNKNOWN' so that the testers *> can be run multiple times without deleting generated *> output files (susan) -*> -*>\endverbatim +*> \endverbatim * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -84,8 +83,7 @@ * *> \ingroup complex16_blas_testing * -* ===================================================================== - PROGRAM ZBLAT3 +* ===================================================================== PROGRAM ZBLAT3 * * -- Reference BLAS test routine (version 3.4.0) -- * -- Reference BLAS is a software package provided by Univ. of Tennessee, -- |