diff options
| author | julie <julielangou@users.noreply.github.com> | 2012-07-03 04:39:13 +0000 |
|---|---|---|
| committer | julie <julielangou@users.noreply.github.com> | 2012-07-03 04:39:13 +0000 |
| commit | 1b56352b8583b08bd97239e3f2fbb44f0b65030b (patch) | |
| tree | 2d308e639515c468978c2f6420d1d49b92beda92 | |
| parent | 38febd8f674d1a3adf98334c422509d755b08a4b (diff) | |
Add Brief description for auxiliary routines
750 files changed, 750 insertions, 750 deletions
diff --git a/SRC/cgbtf2.f b/SRC/cgbtf2.f index fdfa30ec..382e24b6 100644 --- a/SRC/cgbtf2.f +++ b/SRC/cgbtf2.f @@ -1,4 +1,4 @@ -*> \brief \b CGBTF2 +*> \brief \b CGBTF2 computes the LU factorization of a general band matrix using the unblocked version of the algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cgebd2.f b/SRC/cgebd2.f index a88f0391..8bf97bc5 100644 --- a/SRC/cgebd2.f +++ b/SRC/cgebd2.f @@ -1,4 +1,4 @@ -*> \brief \b CGEBD2 +*> \brief \b CGEBD2 reduces a general matrix to bidiagonal form using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cgehd2.f b/SRC/cgehd2.f index de751b15..99de31b9 100644 --- a/SRC/cgehd2.f +++ b/SRC/cgehd2.f @@ -1,4 +1,4 @@ -*> \brief \b CGEHD2 +*> \brief \b CGEHD2 reduces a general square matrix to upper Hessenberg form using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cgelq2.f b/SRC/cgelq2.f index bca5e6ca..b944670f 100644 --- a/SRC/cgelq2.f +++ b/SRC/cgelq2.f @@ -1,4 +1,4 @@ -*> \brief \b CGELQ2 +*> \brief \b CGELQ2 computes the LQ factorization of a general rectangular matrix using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cgeql2.f b/SRC/cgeql2.f index 4c4e2993..e831aa1c 100644 --- a/SRC/cgeql2.f +++ b/SRC/cgeql2.f @@ -1,4 +1,4 @@ -*> \brief \b CGEQL2 +*> \brief \b CGEQL2 computes the QL factorization of a general rectangular matrix using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cgeqp3.f b/SRC/cgeqp3.f index e4a2f41e..9fe687e5 100644 --- a/SRC/cgeqp3.f +++ b/SRC/cgeqp3.f @@ -144,7 +144,7 @@ *> *> H(i) = I - tau * v * v**H *> -*> where tau is a real/complex scalar, and v is a real/complex vector +*> where tau is a complex scalar, and v is a real/complex vector *> with v(1:i-1) = 0 and v(i) = 1; v(i+1:m) is stored on exit in *> A(i+1:m,i), and tau in TAU(i). *> \endverbatim diff --git a/SRC/cgeqr2.f b/SRC/cgeqr2.f index 4ca5571d..cc401be3 100644 --- a/SRC/cgeqr2.f +++ b/SRC/cgeqr2.f @@ -1,4 +1,4 @@ -*> \brief \b CGEQR2 +*> \brief \b CGEQR2 computes the QR factorization of a general rectangular matrix using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cgeqr2p.f b/SRC/cgeqr2p.f index 7e7f15bb..5824e81a 100644 --- a/SRC/cgeqr2p.f +++ b/SRC/cgeqr2p.f @@ -1,4 +1,4 @@ -*> \brief \b CGEQR2P +*> \brief \b CGEQR2P computes the QR factorization of a general rectangular matrix with non-negative diagonal elements using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cgeqrt2.f b/SRC/cgeqrt2.f index c6d37905..d1c57467 100644 --- a/SRC/cgeqrt2.f +++ b/SRC/cgeqrt2.f @@ -1,4 +1,4 @@ -*> \brief \b CGEQRT2 +*> \brief \b CGEQRT2 computes a QR factorization of a general real or complex matrix using the compact WY representation of Q. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cgeqrt3.f b/SRC/cgeqrt3.f index 17474e78..520076b7 100644 --- a/SRC/cgeqrt3.f +++ b/SRC/cgeqrt3.f @@ -1,4 +1,4 @@ -*> \brief \b CGEQRT3 +*> \brief \b CGEQRT3 recursively computes a QR factorization of a general real or complex matrix using the compact WY representation of Q. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cgerq2.f b/SRC/cgerq2.f index 3c5f8d6a..6ee90678 100644 --- a/SRC/cgerq2.f +++ b/SRC/cgerq2.f @@ -1,4 +1,4 @@ -*> \brief \b CGERQ2 +*> \brief \b CGERQ2 computes the RQ factorization of a general rectangular matrix using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cgesc2.f b/SRC/cgesc2.f index 847af9b1..80958a53 100644 --- a/SRC/cgesc2.f +++ b/SRC/cgesc2.f @@ -1,4 +1,4 @@ -*> \brief \b CGESC2 +*> \brief \b CGESC2 solves a system of linear equations using the LU factorization with complete pivoting computed by sgetc2. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cgetc2.f b/SRC/cgetc2.f index a67de9c4..2c3e8cce 100644 --- a/SRC/cgetc2.f +++ b/SRC/cgetc2.f @@ -1,4 +1,4 @@ -*> \brief \b CGETC2 +*> \brief \b CGETC2 computes the LU factorization with complete pivoting of the general n-by-n matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cgetf2.f b/SRC/cgetf2.f index 220f043e..78e9f352 100644 --- a/SRC/cgetf2.f +++ b/SRC/cgetf2.f @@ -1,4 +1,4 @@ -*> \brief \b CGETF2 +*> \brief \b CGETF2 computes the LU factorization of a general m-by-n matrix using partial pivoting with row interchanges (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/cgtts2.f b/SRC/cgtts2.f index e25f881e..c6014c4b 100644 --- a/SRC/cgtts2.f +++ b/SRC/cgtts2.f @@ -1,4 +1,4 @@ -*> \brief \b CGTTS2 +*> \brief \b CGTTS2 solves a system of linear equations with a tridiagonal matrix using the LU factorization computed by sgttrf. * * =========== DOCUMENTATION =========== * diff --git a/SRC/chegs2.f b/SRC/chegs2.f index cab90ac6..9c59ecce 100644 --- a/SRC/chegs2.f +++ b/SRC/chegs2.f @@ -1,4 +1,4 @@ -*> \brief \b CHEGS2 +*> \brief \b CHEGS2 reduces a Hermitian definite generalized eigenproblem to standard form, using the factorization results obtained from cpotrf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/cheswapr.f b/SRC/cheswapr.f index 9fb0fdb9..7005560e 100644 --- a/SRC/cheswapr.f +++ b/SRC/cheswapr.f @@ -1,4 +1,4 @@ -*> \brief \b CHESWAPR +*> \brief \b CHESWAPR applies an elementary permutation on the rows and columns of a Hermitian matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/chetd2.f b/SRC/chetd2.f index 0db98424..799acf87 100644 --- a/SRC/chetd2.f +++ b/SRC/chetd2.f @@ -1,4 +1,4 @@ -*> \brief \b CHETD2 +*> \brief \b CHETD2 reduces a Hermitian matrix to real symmetric tridiagonal form by an unitary similarity transformation (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/chetf2.f b/SRC/chetf2.f index 7ee32eb1..57e86269 100644 --- a/SRC/chetf2.f +++ b/SRC/chetf2.f @@ -1,4 +1,4 @@ -*> \brief \b CHETF2 +*> \brief \b CHETF2 computes the factorization of a complex Hermitian matrix, using the diagonal pivoting method (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/chfrk.f b/SRC/chfrk.f index 2729bdf4..8a5807ce 100644 --- a/SRC/chfrk.f +++ b/SRC/chfrk.f @@ -1,4 +1,4 @@ -*> \brief \b CHFRK +*> \brief \b CHFRK performs a Hermitian rank-k operation for matrix in RFP format. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_gbamv.f b/SRC/cla_gbamv.f index 2179293e..ff56948e 100644 --- a/SRC/cla_gbamv.f +++ b/SRC/cla_gbamv.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_GBAMV +*> \brief \b CLA_GBAMV performs a matrix-vector operation to calculate error bounds. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_gbrcond_c.f b/SRC/cla_gbrcond_c.f index d0aae5be..2a6265bb 100644 --- a/SRC/cla_gbrcond_c.f +++ b/SRC/cla_gbrcond_c.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_GBRCOND_C +*> \brief \b CLA_GBRCOND_C computes the infinity norm condition number of op(A)*inv(diag(c)) for general banded matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_gbrcond_x.f b/SRC/cla_gbrcond_x.f index a65b5203..57f6b35e 100644 --- a/SRC/cla_gbrcond_x.f +++ b/SRC/cla_gbrcond_x.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_GBRCOND_X +*> \brief \b CLA_GBRCOND_X computes the infinity norm condition number of op(A)*diag(x) for general banded matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_gbrfsx_extended.f b/SRC/cla_gbrfsx_extended.f index 29bed66e..2908c82d 100644 --- a/SRC/cla_gbrfsx_extended.f +++ b/SRC/cla_gbrfsx_extended.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_GBRFSX_EXTENDED +*> \brief \b CLA_GBRFSX_EXTENDED improves the computed solution to a system of linear equations for general banded matrices by performing extra-precise iterative refinement and provides error bounds and backward error estimates for the solution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_gbrpvgrw.f b/SRC/cla_gbrpvgrw.f index b03408d4..33fc1555 100644 --- a/SRC/cla_gbrpvgrw.f +++ b/SRC/cla_gbrpvgrw.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_GBRPVGRW +*> \brief \b CLA_GBRPVGRW computes the reciprocal pivot growth factor norm(A)/norm(U) for a general banded matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_geamv.f b/SRC/cla_geamv.f index 06d1d0c2..482f2895 100644 --- a/SRC/cla_geamv.f +++ b/SRC/cla_geamv.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_GEAMV +*> \brief \b CLA_GEAMV computes a matrix-vector product using a general matrix to calculate error bounds. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_gercond_c.f b/SRC/cla_gercond_c.f index 6a516897..71a44bba 100644 --- a/SRC/cla_gercond_c.f +++ b/SRC/cla_gercond_c.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_GERCOND_C +*> \brief \b CLA_GERCOND_C computes the infinity norm condition number of op(A)*inv(diag(c)) for general matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_gercond_x.f b/SRC/cla_gercond_x.f index a458f2b7..46dfa488 100644 --- a/SRC/cla_gercond_x.f +++ b/SRC/cla_gercond_x.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_GERCOND_X +*> \brief \b CLA_GERCOND_X computes the infinity norm condition number of op(A)*diag(x) for general matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_gerpvgrw.f b/SRC/cla_gerpvgrw.f index 93c2b16b..4dabc1f8 100644 --- a/SRC/cla_gerpvgrw.f +++ b/SRC/cla_gerpvgrw.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_GERPVGRW +*> \brief \b CLA_GERPVGRW multiplies a square real matrix by a complex matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_heamv.f b/SRC/cla_heamv.f index 473e3ec9..1822e7c6 100644 --- a/SRC/cla_heamv.f +++ b/SRC/cla_heamv.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_HEAMV +*> \brief \b CLA_HEAMV computes a matrix-vector product using a Hermitian indefinite matrix to calculate error bounds. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_hercond_c.f b/SRC/cla_hercond_c.f index 2762cddc..d8223a99 100644 --- a/SRC/cla_hercond_c.f +++ b/SRC/cla_hercond_c.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_HERCOND_C +*> \brief \b CLA_HERCOND_C computes the infinity norm condition number of op(A)*inv(diag(c)) for Hermitian indefinite matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_hercond_x.f b/SRC/cla_hercond_x.f index b7a93ccf..de1b632b 100644 --- a/SRC/cla_hercond_x.f +++ b/SRC/cla_hercond_x.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_HERCOND_X +*> \brief \b CLA_HERCOND_X computes the infinity norm condition number of op(A)*diag(x) for Hermitian indefinite matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_herfsx_extended.f b/SRC/cla_herfsx_extended.f index 013ff43e..59d60c21 100644 --- a/SRC/cla_herfsx_extended.f +++ b/SRC/cla_herfsx_extended.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_HERFSX_EXTENDED +*> \brief \b CLA_HERFSX_EXTENDED improves the computed solution to a system of linear equations for Hermitian indefinite matrices by performing extra-precise iterative refinement and provides error bounds and backward error estimates for the solution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_lin_berr.f b/SRC/cla_lin_berr.f index 4fcf6de7..c19bc9bf 100644 --- a/SRC/cla_lin_berr.f +++ b/SRC/cla_lin_berr.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_LIN_BERR +*> \brief \b CLA_LIN_BERR computes a component-wise relative backward error. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_porcond_c.f b/SRC/cla_porcond_c.f index fdbbe98f..5acff83b 100644 --- a/SRC/cla_porcond_c.f +++ b/SRC/cla_porcond_c.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_PORCOND_C +*> \brief \b CLA_PORCOND_C computes the infinity norm condition number of op(A)*inv(diag(c)) for Hermitian positive-definite matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_porcond_x.f b/SRC/cla_porcond_x.f index e7bd8c1a..849a250f 100644 --- a/SRC/cla_porcond_x.f +++ b/SRC/cla_porcond_x.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_PORCOND_X +*> \brief \b CLA_PORCOND_X computes the infinity norm condition number of op(A)*diag(x) for Hermitian positive-definite matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_porfsx_extended.f b/SRC/cla_porfsx_extended.f index ecf51822..13f125b1 100644 --- a/SRC/cla_porfsx_extended.f +++ b/SRC/cla_porfsx_extended.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_PORFSX_EXTENDED +*> \brief \b CLA_PORFSX_EXTENDED improves the computed solution to a system of linear equations for symmetric or Hermitian positive-definite matrices by performing extra-precise iterative refinement and provides error bounds and backward error estimates for the solution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_porpvgrw.f b/SRC/cla_porpvgrw.f index b8616781..dfd2c44e 100644 --- a/SRC/cla_porpvgrw.f +++ b/SRC/cla_porpvgrw.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_PORPVGRW +*> \brief \b CLA_PORPVGRW computes the reciprocal pivot growth factor norm(A)/norm(U) for a symmetric or Hermitian positive-definite matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_syamv.f b/SRC/cla_syamv.f index ffdb69ce..f48df4fe 100644 --- a/SRC/cla_syamv.f +++ b/SRC/cla_syamv.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_SYAMV +*> \brief \b CLA_SYAMV computes a matrix-vector product using a symmetric indefinite matrix to calculate error bounds. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_syrcond_c.f b/SRC/cla_syrcond_c.f index c696546c..442bebb9 100644 --- a/SRC/cla_syrcond_c.f +++ b/SRC/cla_syrcond_c.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_SYRCOND_C +*> \brief \b CLA_SYRCOND_C computes the infinity norm condition number of op(A)*inv(diag(c)) for symmetric indefinite matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_syrcond_x.f b/SRC/cla_syrcond_x.f index 5d232a35..ee925401 100644 --- a/SRC/cla_syrcond_x.f +++ b/SRC/cla_syrcond_x.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_SYRCOND_X +*> \brief \b CLA_SYRCOND_X computes the infinity norm condition number of op(A)*diag(x) for symmetric indefinite matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_syrfsx_extended.f b/SRC/cla_syrfsx_extended.f index fc0b74a6..d7392ecc 100644 --- a/SRC/cla_syrfsx_extended.f +++ b/SRC/cla_syrfsx_extended.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_SYRFSX_EXTENDED +*> \brief \b CLA_SYRFSX_EXTENDED improves the computed solution to a system of linear equations for symmetric indefinite matrices by performing extra-precise iterative refinement and provides error bounds and backward error estimates for the solution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_syrpvgrw.f b/SRC/cla_syrpvgrw.f index ea0ddb7b..0ee8c259 100644 --- a/SRC/cla_syrpvgrw.f +++ b/SRC/cla_syrpvgrw.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_SYRPVGRW +*> \brief \b CLA_SYRPVGRW computes the reciprocal pivot growth factor norm(A)/norm(U) for a symmetric indefinite matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cla_wwaddw.f b/SRC/cla_wwaddw.f index 273816f5..17bd3aa3 100644 --- a/SRC/cla_wwaddw.f +++ b/SRC/cla_wwaddw.f @@ -1,4 +1,4 @@ -*> \brief \b CLA_WWADDW +*> \brief \b CLA_WWADDW adds a vector into a doubled-single vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clabrd.f b/SRC/clabrd.f index fd5ab6e1..94bbd856 100644 --- a/SRC/clabrd.f +++ b/SRC/clabrd.f @@ -1,4 +1,4 @@ -*> \brief \b CLABRD +*> \brief \b CLABRD reduces the first nb rows and columns of a general matrix to a bidiagonal form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clacgv.f b/SRC/clacgv.f index 359eb07f..ff830aa3 100644 --- a/SRC/clacgv.f +++ b/SRC/clacgv.f @@ -1,4 +1,4 @@ -*> \brief \b CLACGV +*> \brief \b CLACGV conjugates a complex vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clacn2.f b/SRC/clacn2.f index 9eafabb1..3b981d52 100644 --- a/SRC/clacn2.f +++ b/SRC/clacn2.f @@ -1,4 +1,4 @@ -*> \brief \b CLACN2 +*> \brief \b CLACN2 estimates the 1-norm of a square matrix, using reverse communication for evaluating matrix-vector products. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clacon.f b/SRC/clacon.f index 43e331f1..c95aa438 100644 --- a/SRC/clacon.f +++ b/SRC/clacon.f @@ -1,4 +1,4 @@ -*> \brief \b CLACON +*> \brief \b CLACON estimates the 1-norm of a square matrix, using reverse communication for evaluating matrix-vector products. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clacp2.f b/SRC/clacp2.f index 74264f2d..48fd7beb 100644 --- a/SRC/clacp2.f +++ b/SRC/clacp2.f @@ -1,4 +1,4 @@ -*> \brief \b CLACP2 +*> \brief \b CLACP2 copies all or part of a real two-dimensional array to a complex array. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clacpy.f b/SRC/clacpy.f index 15092b35..932b1a83 100644 --- a/SRC/clacpy.f +++ b/SRC/clacpy.f @@ -1,4 +1,4 @@ -*> \brief \b CLACPY +*> \brief \b CLACPY copies all or part of one two-dimensional array to another. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clacrm.f b/SRC/clacrm.f index 2c4c46cb..f6bcc52a 100644 --- a/SRC/clacrm.f +++ b/SRC/clacrm.f @@ -1,4 +1,4 @@ -*> \brief \b CLACRM +*> \brief \b CLACRM multiplies a complex matrix by a square real matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clacrt.f b/SRC/clacrt.f index 5a3916aa..b9cd293b 100644 --- a/SRC/clacrt.f +++ b/SRC/clacrt.f @@ -1,4 +1,4 @@ -*> \brief \b CLACRT +*> \brief \b CLACRT performs a linear transformation of a pair of complex vectors. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cladiv.f b/SRC/cladiv.f index 2807ac5f..531a582b 100644 --- a/SRC/cladiv.f +++ b/SRC/cladiv.f @@ -1,4 +1,4 @@ -*> \brief \b CLADIV +*> \brief \b CLADIV performs complex division in real arithmetic, avoiding unnecessary overflow. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claed0.f b/SRC/claed0.f index b2fbb55a..aebf1056 100644 --- a/SRC/claed0.f +++ b/SRC/claed0.f @@ -1,4 +1,4 @@ -*> \brief \b CLAED0 +*> \brief \b CLAED0 used by sstedc. Computes all eigenvalues and corresponding eigenvectors of an unreduced symmetric tridiagonal matrix using the divide and conquer method. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claed7.f b/SRC/claed7.f index 41cea313..ea06608a 100644 --- a/SRC/claed7.f +++ b/SRC/claed7.f @@ -1,4 +1,4 @@ -*> \brief \b CLAED7 +*> \brief \b CLAED7 used by sstedc. Computes the updated eigensystem of a diagonal matrix after modification by a rank-one symmetric matrix. Used when the original matrix is dense. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claed8.f b/SRC/claed8.f index 90a6c51f..8834b0ff 100644 --- a/SRC/claed8.f +++ b/SRC/claed8.f @@ -1,4 +1,4 @@ -*> \brief \b CLAED8 +*> \brief \b CLAED8 used by sstedc. Merges eigenvalues and deflates secular equation. Used when the original matrix is dense. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claein.f b/SRC/claein.f index 23ad916a..745dc36d 100644 --- a/SRC/claein.f +++ b/SRC/claein.f @@ -1,4 +1,4 @@ -*> \brief \b CLAEIN +*> \brief \b CLAEIN computes a specified right or left eigenvector of an upper Hessenberg matrix by inverse iteration. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claesy.f b/SRC/claesy.f index 3e6c384c..91201424 100644 --- a/SRC/claesy.f +++ b/SRC/claesy.f @@ -1,4 +1,4 @@ -*> \brief \b CLAESY +*> \brief \b CLAESY computes the eigenvalues and eigenvectors of a 2-by-2 complex symmetric matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claev2.f b/SRC/claev2.f index ff19ded4..a0786288 100644 --- a/SRC/claev2.f +++ b/SRC/claev2.f @@ -1,4 +1,4 @@ -*> \brief \b CLAEV2 +*> \brief \b CLAEV2 computes the eigenvalues and eigenvectors of a 2-by-2 symmetric/Hermitian matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clag2z.f b/SRC/clag2z.f index f4cba617..ae91b42f 100644 --- a/SRC/clag2z.f +++ b/SRC/clag2z.f @@ -1,4 +1,4 @@ -*> \brief \b CLAG2Z +*> \brief \b CLAG2Z converts a complex single precision matrix to a complex double precision matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clagtm.f b/SRC/clagtm.f index f710b5f5..77b01d90 100644 --- a/SRC/clagtm.f +++ b/SRC/clagtm.f @@ -1,4 +1,4 @@ -*> \brief \b CLAGTM +*> \brief \b CLAGTM performs a matrix-matrix product of the form C = αAB+βC, where A is a tridiagonal matrix, B and C are rectangular matrices, and α and β are scalars, which may be 0, 1, or -1. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clahef.f b/SRC/clahef.f index dcd05b1c..d5887584 100644 --- a/SRC/clahef.f +++ b/SRC/clahef.f @@ -1,4 +1,4 @@ -*> \brief \b CLAHEF +*> \brief \b CLAHEF computes a partial factorization of a complex Hermitian indefinite matrix, using the diagonal pivoting method. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clahqr.f b/SRC/clahqr.f index f23a71bd..0388eadb 100644 --- a/SRC/clahqr.f +++ b/SRC/clahqr.f @@ -1,4 +1,4 @@ -*> \brief \b CLAHQR +*> \brief \b CLAHQR computes the eigenvalues and Schur factorization of an upper Hessenberg matrix, using the double-shift/single-shift QR algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clahr2.f b/SRC/clahr2.f index bc57106c..d1841bbb 100644 --- a/SRC/clahr2.f +++ b/SRC/clahr2.f @@ -1,4 +1,4 @@ -*> \brief \b CLAHR2 +*> \brief \b CLAHR2 reduces the specified number of first columns of a general rectangular matrix A so that elements below the specified subdiagonal are zero, and returns auxiliary matrices which are needed to apply the transformation to the unreduced part of A. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clahrd.f b/SRC/clahrd.f index 062bdfdb..067da097 100644 --- a/SRC/clahrd.f +++ b/SRC/clahrd.f @@ -1,4 +1,4 @@ -*> \brief \b CLAHRD +*> \brief \b CLAHRD reduces the first nb columns of a general rectangular matrix A so that elements below the k-th subdiagonal are zero, and returns auxiliary matrices which are needed to apply the transformation to the unreduced part of A. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claic1.f b/SRC/claic1.f index 45e34fe6..8c6153bf 100644 --- a/SRC/claic1.f +++ b/SRC/claic1.f @@ -1,4 +1,4 @@ -*> \brief \b CLAIC1 +*> \brief \b CLAIC1 applies one step of incremental condition estimation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clals0.f b/SRC/clals0.f index aa3f5c33..981ee77b 100644 --- a/SRC/clals0.f +++ b/SRC/clals0.f @@ -1,4 +1,4 @@ -*> \brief \b CLALS0 +*> \brief \b CLALS0 applies back multiplying factors in solving the least squares problem using divide and conquer SVD approach. Used by sgelsd. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clalsa.f b/SRC/clalsa.f index bafacbf6..bd06c962 100644 --- a/SRC/clalsa.f +++ b/SRC/clalsa.f @@ -1,4 +1,4 @@ -*> \brief \b CLALSA +*> \brief \b CLALSA computes the SVD of the coefficient matrix in compact form. Used by sgelsd. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clalsd.f b/SRC/clalsd.f index 51e56412..6eb36782 100644 --- a/SRC/clalsd.f +++ b/SRC/clalsd.f @@ -1,4 +1,4 @@ -*> \brief \b CLALSD +*> \brief \b CLALSD uses the singular value decomposition of A to solve the least squares problem. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clangb.f b/SRC/clangb.f index 90b293d2..9f9f2355 100644 --- a/SRC/clangb.f +++ b/SRC/clangb.f @@ -1,4 +1,4 @@ -*> \brief \b CLANGB +*> \brief \b CLANGB returns the value of the 1-norm, Frobenius norm, infinity-norm, or the largest absolute value of any element of general band matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clange.f b/SRC/clange.f index cfca7aa4..9db808e5 100644 --- a/SRC/clange.f +++ b/SRC/clange.f @@ -1,4 +1,4 @@ -*> \brief \b CLANGE +*> \brief \b CLANGE returns the value of the 1-norm, Frobenius norm, infinity-norm, or the largest absolute value of any element of a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clangt.f b/SRC/clangt.f index baf342ec..ea32ac2d 100644 --- a/SRC/clangt.f +++ b/SRC/clangt.f @@ -1,4 +1,4 @@ -*> \brief \b CLANGT +*> \brief \b CLANGT returns the value of the 1-norm, Frobenius norm, infinity-norm, or the largest absolute value of any element of a general tridiagonal matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clanhb.f b/SRC/clanhb.f index 37aaadc7..a0a70cc3 100644 --- a/SRC/clanhb.f +++ b/SRC/clanhb.f @@ -1,4 +1,4 @@ -*> \brief \b CLANHB +*> \brief \b CLANHB returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a Hermitian band matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clanhe.f b/SRC/clanhe.f index 4bdf5147..fb7a36a9 100644 --- a/SRC/clanhe.f +++ b/SRC/clanhe.f @@ -1,4 +1,4 @@ -*> \brief \b CLANHE +*> \brief \b CLANHE returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a complex Hermitian matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clanhf.f b/SRC/clanhf.f index db846edb..5f38ff33 100644 --- a/SRC/clanhf.f +++ b/SRC/clanhf.f @@ -1,4 +1,4 @@ -*> \brief \b CLANHF +*> \brief \b CLANHF returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a Hermitian matrix in RFP format. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clanhp.f b/SRC/clanhp.f index 1263884f..8c3f4de9 100644 --- a/SRC/clanhp.f +++ b/SRC/clanhp.f @@ -1,4 +1,4 @@ -*> \brief \b CLANHP +*> \brief \b CLANHP returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a complex Hermitian matrix supplied in packed form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clanhs.f b/SRC/clanhs.f index 29254b82..972c3ff5 100644 --- a/SRC/clanhs.f +++ b/SRC/clanhs.f @@ -1,4 +1,4 @@ -*> \brief \b CLANHS +*> \brief \b CLANHS returns the value of the 1-norm, Frobenius norm, infinity-norm, or the largest absolute value of any element of an upper Hessenberg matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clanht.f b/SRC/clanht.f index fa019231..be2481a6 100644 --- a/SRC/clanht.f +++ b/SRC/clanht.f @@ -1,4 +1,4 @@ -*> \brief \b CLANHT +*> \brief \b CLANHT returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a complex Hermitian tridiagonal matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clansb.f b/SRC/clansb.f index c751c85b..efc46dae 100644 --- a/SRC/clansb.f +++ b/SRC/clansb.f @@ -1,4 +1,4 @@ -*> \brief \b CLANSB +*> \brief \b CLANSB returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a symmetric band matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clansp.f b/SRC/clansp.f index fd6d7852..0f182e4b 100644 --- a/SRC/clansp.f +++ b/SRC/clansp.f @@ -1,4 +1,4 @@ -*> \brief \b CLANSP +*> \brief \b CLANSP returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a symmetric matrix supplied in packed form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clansy.f b/SRC/clansy.f index b5730c41..20c35560 100644 --- a/SRC/clansy.f +++ b/SRC/clansy.f @@ -1,4 +1,4 @@ -*> \brief \b CLANSY +*> \brief \b CLANSY returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a complex symmetric matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clantb.f b/SRC/clantb.f index bad4ec4a..5462dc8e 100644 --- a/SRC/clantb.f +++ b/SRC/clantb.f @@ -1,4 +1,4 @@ -*> \brief \b CLANTB +*> \brief \b CLANTB returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a triangular band matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clantp.f b/SRC/clantp.f index a670c42c..bafab3f2 100644 --- a/SRC/clantp.f +++ b/SRC/clantp.f @@ -1,4 +1,4 @@ -*> \brief \b CLANTP +*> \brief \b CLANTP returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a triangular matrix supplied in packed form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clantr.f b/SRC/clantr.f index 11e65f30..658fbbe5 100644 --- a/SRC/clantr.f +++ b/SRC/clantr.f @@ -1,4 +1,4 @@ -*> \brief \b CLANTR +*> \brief \b CLANTR returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a trapezoidal or triangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clapll.f b/SRC/clapll.f index 61c5837f..1908be75 100644 --- a/SRC/clapll.f +++ b/SRC/clapll.f @@ -1,4 +1,4 @@ -*> \brief \b CLAPLL +*> \brief \b CLAPLL measures the linear dependence of two vectors. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clapmr.f b/SRC/clapmr.f index ba184093..17444677 100644 --- a/SRC/clapmr.f +++ b/SRC/clapmr.f @@ -1,4 +1,4 @@ -*> \brief \b CLAPMR +*> \brief \b CLAPMR rearranges rows of a matrix as specified by a permutation vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clapmt.f b/SRC/clapmt.f index 5b1c15bd..a46524fb 100644 --- a/SRC/clapmt.f +++ b/SRC/clapmt.f @@ -1,4 +1,4 @@ -*> \brief \b CLAPMT +*> \brief \b CLAPMT performs a forward or backward permutation of the columns of a matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claqgb.f b/SRC/claqgb.f index f6b38478..c08df83c 100644 --- a/SRC/claqgb.f +++ b/SRC/claqgb.f @@ -1,4 +1,4 @@ -*> \brief \b CLAQGB +*> \brief \b CLAQGB scales a general band matrix, using row and column scaling factors computed by sgbequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claqge.f b/SRC/claqge.f index f66bb133..247caedc 100644 --- a/SRC/claqge.f +++ b/SRC/claqge.f @@ -1,4 +1,4 @@ -*> \brief \b CLAQGE +*> \brief \b CLAQGE scales a general rectangular matrix, using row and column scaling factors computed by sgeequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claqhb.f b/SRC/claqhb.f index a9175a62..5c2cf500 100644 --- a/SRC/claqhb.f +++ b/SRC/claqhb.f @@ -1,4 +1,4 @@ -*> \brief \b CLAQHB +*> \brief \b CLAQHB scales a Hermitian band matrix, using scaling factors computed by cpbequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claqhe.f b/SRC/claqhe.f index c7b2dfef..8e448863 100644 --- a/SRC/claqhe.f +++ b/SRC/claqhe.f @@ -1,4 +1,4 @@ -*> \brief \b CLAQHE +*> \brief \b CLAQHE scales a Hermitian matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claqhp.f b/SRC/claqhp.f index 4b017b20..fa8546de 100644 --- a/SRC/claqhp.f +++ b/SRC/claqhp.f @@ -1,4 +1,4 @@ -*> \brief \b CLAQHP +*> \brief \b CLAQHP scales a Hermitian matrix stored in packed form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claqp2.f b/SRC/claqp2.f index a01f4a02..674b5bcf 100644 --- a/SRC/claqp2.f +++ b/SRC/claqp2.f @@ -1,4 +1,4 @@ -*> \brief \b CLAQP2 +*> \brief \b CLAQP2 computes a QR factorization with column pivoting of the matrix block. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claqps.f b/SRC/claqps.f index efc39cc7..0a003e81 100644 --- a/SRC/claqps.f +++ b/SRC/claqps.f @@ -1,4 +1,4 @@ -*> \brief \b CLAQPS +*> \brief \b CLAQPS computes a step of QR factorization with column pivoting of a real m-by-n matrix A by using BLAS level 3. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claqr0.f b/SRC/claqr0.f index 6444e5a0..8034f9d4 100644 --- a/SRC/claqr0.f +++ b/SRC/claqr0.f @@ -1,4 +1,4 @@ -*> \brief \b CLAQR0 +*> \brief \b CLAQR0 computes the eigenvalues of a Hessenberg matrix, and optionally the matrices from the Schur decomposition. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claqr1.f b/SRC/claqr1.f index a9b23607..89d2987e 100644 --- a/SRC/claqr1.f +++ b/SRC/claqr1.f @@ -1,4 +1,4 @@ -*> \brief \b CLAQR1 +*> \brief \b CLAQR1 sets a scalar multiple of the first column of the product of 2-by-2 or 3-by-3 matrix H and specified shifts. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claqr2.f b/SRC/claqr2.f index 2456efaa..ccffb1d4 100644 --- a/SRC/claqr2.f +++ b/SRC/claqr2.f @@ -1,4 +1,4 @@ -*> \brief \b CLAQR2 +*> \brief \b CLAQR2 performs the unitary similarity transformation of a Hessenberg matrix to detect and deflate fully converged eigenvalues from a trailing principal submatrix (aggressive early deflation). * * =========== DOCUMENTATION =========== * diff --git a/SRC/claqr3.f b/SRC/claqr3.f index 2bea9d65..15542ee2 100644 --- a/SRC/claqr3.f +++ b/SRC/claqr3.f @@ -1,4 +1,4 @@ -*> \brief \b CLAQR3 +*> \brief \b CLAQR3 performs the unitary similarity transformation of a Hessenberg matrix to detect and deflate fully converged eigenvalues from a trailing principal submatrix (aggressive early deflation). * * =========== DOCUMENTATION =========== * diff --git a/SRC/claqr4.f b/SRC/claqr4.f index 48ff25be..0fb2c252 100644 --- a/SRC/claqr4.f +++ b/SRC/claqr4.f @@ -1,4 +1,4 @@ -*> \brief \b CLAQR4 +*> \brief \b CLAQR4 computes the eigenvalues of a Hessenberg matrix, and optionally the matrices from the Schur decomposition. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claqr5.f b/SRC/claqr5.f index 04a2906a..0a69f42a 100644 --- a/SRC/claqr5.f +++ b/SRC/claqr5.f @@ -1,4 +1,4 @@ -*> \brief \b CLAQR5 +*> \brief \b CLAQR5 performs a single small-bulge multi-shift QR sweep. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claqsb.f b/SRC/claqsb.f index f5c4aab2..6659d708 100644 --- a/SRC/claqsb.f +++ b/SRC/claqsb.f @@ -1,4 +1,4 @@ -*> \brief \b CLAQSB +*> \brief \b CLAQSB scales a symmetric/Hermitian band matrix, using scaling factors computed by spbequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claqsp.f b/SRC/claqsp.f index e75a25cf..09b6b3e5 100644 --- a/SRC/claqsp.f +++ b/SRC/claqsp.f @@ -1,4 +1,4 @@ -*> \brief \b CLAQSP +*> \brief \b CLAQSP scales a symmetric/Hermitian matrix in packed storage, using scaling factors computed by sppequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claqsy.f b/SRC/claqsy.f index 4b17d061..2dc6b0d0 100644 --- a/SRC/claqsy.f +++ b/SRC/claqsy.f @@ -1,4 +1,4 @@ -*> \brief \b CLAQSY +*> \brief \b CLAQSY scales a symmetric/Hermitian matrix, using scaling factors computed by spoequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clar1v.f b/SRC/clar1v.f index 489667f0..7a65a266 100644 --- a/SRC/clar1v.f +++ b/SRC/clar1v.f @@ -1,4 +1,4 @@ -*> \brief \b CLAR1V +*> \brief \b CLAR1V computes the (scaled) r-th column of the inverse of the submatrix in rows b1 through bn of the tridiagonal matrix LDLT - λI. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clar2v.f b/SRC/clar2v.f index 6aa0152e..3c43d824 100644 --- a/SRC/clar2v.f +++ b/SRC/clar2v.f @@ -1,4 +1,4 @@ -*> \brief \b CLAR2V +*> \brief \b CLAR2V applies a vector of plane rotations with real cosines and complex sines from both sides to a sequence of 2-by-2 symmetric/Hermitian matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clarcm.f b/SRC/clarcm.f index 9b81129d..681254f5 100644 --- a/SRC/clarcm.f +++ b/SRC/clarcm.f @@ -1,4 +1,4 @@ -*> \brief \b CLARCM +*> \brief \b CLARCM copies all or part of a real two-dimensional array to a complex array. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clarf.f b/SRC/clarf.f index ca0328fb..7fbc9891 100644 --- a/SRC/clarf.f +++ b/SRC/clarf.f @@ -1,4 +1,4 @@ -*> \brief \b CLARF +*> \brief \b CLARF applies an elementary reflector to a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clarfb.f b/SRC/clarfb.f index 40bbdf48..83515567 100644 --- a/SRC/clarfb.f +++ b/SRC/clarfb.f @@ -1,4 +1,4 @@ -*> \brief \b CLARFB +*> \brief \b CLARFB applies a block reflector or its conjugate-transpose to a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clarfg.f b/SRC/clarfg.f index d64f396c..06e8a3a9 100644 --- a/SRC/clarfg.f +++ b/SRC/clarfg.f @@ -1,4 +1,4 @@ -*> \brief \b CLARFG +*> \brief \b CLARFG generates an elementary reflector (Householder matrix). * * =========== DOCUMENTATION =========== * diff --git a/SRC/clarfgp.f b/SRC/clarfgp.f index 09f1b0b0..01d9ad05 100644 --- a/SRC/clarfgp.f +++ b/SRC/clarfgp.f @@ -1,4 +1,4 @@ -*> \brief \b CLARFGP +*> \brief \b CLARFGP generates an elementary reflector (Householder matrix) with non-negatibe beta. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clarft.f b/SRC/clarft.f index 981447f7..1f1847a5 100644 --- a/SRC/clarft.f +++ b/SRC/clarft.f @@ -1,4 +1,4 @@ -*> \brief \b CLARFT +*> \brief \b CLARFT forms the triangular factor T of a block reflector H = I - vtvH * * =========== DOCUMENTATION =========== * diff --git a/SRC/clarfx.f b/SRC/clarfx.f index 5a7b4e0c..956ad2d6 100644 --- a/SRC/clarfx.f +++ b/SRC/clarfx.f @@ -1,4 +1,4 @@ -*> \brief \b CLARFX +*> \brief \b CLARFX applies an elementary reflector to a general rectangular matrix, with loop unrolling when the reflector has order ≤ 10. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clargv.f b/SRC/clargv.f index c374e238..a60c1aa3 100644 --- a/SRC/clargv.f +++ b/SRC/clargv.f @@ -1,4 +1,4 @@ -*> \brief \b CLARGV +*> \brief \b CLARGV generates a vector of plane rotations with real cosines and complex sines. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clarnv.f b/SRC/clarnv.f index 4aab0c37..cff58971 100644 --- a/SRC/clarnv.f +++ b/SRC/clarnv.f @@ -1,4 +1,4 @@ -*> \brief \b CLARNV +*> \brief \b CLARNV returns a vector of random numbers from a uniform or normal distribution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clarrv.f b/SRC/clarrv.f index ae89848f..cc3d3ef5 100644 --- a/SRC/clarrv.f +++ b/SRC/clarrv.f @@ -1,4 +1,4 @@ -*> \brief \b CLARRV +*> \brief \b CLARRV computes the eigenvectors of the tridiagonal matrix T = L D LT given L, D and the eigenvalues of L D LT. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clarscl2.f b/SRC/clarscl2.f index 3c215e08..e5a3bec5 100644 --- a/SRC/clarscl2.f +++ b/SRC/clarscl2.f @@ -1,4 +1,4 @@ -*> \brief \b CLARSCL2 +*> \brief \b CLARSCL2 performs reciprocal diagonal scaling on a vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clartg.f b/SRC/clartg.f index d4f6b32c..3524484a 100644 --- a/SRC/clartg.f +++ b/SRC/clartg.f @@ -1,4 +1,4 @@ -*> \brief \b CLARTG +*> \brief \b CLARTG generates a plane rotation with real cosine and complex sine. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clartv.f b/SRC/clartv.f index e548278a..9ba754e4 100644 --- a/SRC/clartv.f +++ b/SRC/clartv.f @@ -1,4 +1,4 @@ -*> \brief \b CLARTV +*> \brief \b CLARTV applies a vector of plane rotations with real cosines and complex sines to the elements of a pair of vectors. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clarz.f b/SRC/clarz.f index 758f267d..6acf2e01 100644 --- a/SRC/clarz.f +++ b/SRC/clarz.f @@ -1,4 +1,4 @@ -*> \brief \b CLARZ +*> \brief \b CLARZ applies an elementary reflector (as returned by stzrzf) to a general matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clarzb.f b/SRC/clarzb.f index 7bc96316..e0d7c440 100644 --- a/SRC/clarzb.f +++ b/SRC/clarzb.f @@ -1,4 +1,4 @@ -*> \brief \b CLARZB +*> \brief \b CLARZB applies a block reflector or its conjugate-transpose to a general matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clarzt.f b/SRC/clarzt.f index 8c57f144..f149be6e 100644 --- a/SRC/clarzt.f +++ b/SRC/clarzt.f @@ -1,4 +1,4 @@ -*> \brief \b CLARZT +*> \brief \b CLARZT forms the triangular factor T of a block reflector H = I - vtvH. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clascl.f b/SRC/clascl.f index acae81af..1a1a25ae 100644 --- a/SRC/clascl.f +++ b/SRC/clascl.f @@ -1,4 +1,4 @@ -*> \brief \b CLASCL +*> \brief \b CLASCL multiplies a general rectangular matrix by a real scalar defined as cto/cfrom. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clascl2.f b/SRC/clascl2.f index d698feec..62e0ecef 100644 --- a/SRC/clascl2.f +++ b/SRC/clascl2.f @@ -1,4 +1,4 @@ -*> \brief \b CLASCL2 +*> \brief \b CLASCL2 performs diagonal scaling on a vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claset.f b/SRC/claset.f index e7b5c42e..0f378966 100644 --- a/SRC/claset.f +++ b/SRC/claset.f @@ -1,4 +1,4 @@ -*> \brief \b CLASET +*> \brief \b CLASET initializes the off-diagonal elements and the diagonal elements of a matrix to given values. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clasr.f b/SRC/clasr.f index 18fb3fb3..b764456f 100644 --- a/SRC/clasr.f +++ b/SRC/clasr.f @@ -1,4 +1,4 @@ -*> \brief \b CLASR +*> \brief \b CLASR applies a sequence of plane rotations to a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/classq.f b/SRC/classq.f index c1df732b..af027f9d 100644 --- a/SRC/classq.f +++ b/SRC/classq.f @@ -1,4 +1,4 @@ -*> \brief \b CLASSQ +*> \brief \b CLASSQ updates a sum of squares represented in scaled form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/claswp.f b/SRC/claswp.f index 4379b55e..c461cae5 100644 --- a/SRC/claswp.f +++ b/SRC/claswp.f @@ -1,4 +1,4 @@ -*> \brief \b CLASWP +*> \brief \b CLASWP performs a series of row interchanges on a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clasyf.f b/SRC/clasyf.f index 34d4bf97..139244f0 100644 --- a/SRC/clasyf.f +++ b/SRC/clasyf.f @@ -1,4 +1,4 @@ -*> \brief \b CLASYF +*> \brief \b CLASYF computes a partial factorization of a complex symmetric matrix, using the diagonal pivoting method. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clatbs.f b/SRC/clatbs.f index 7499c006..7d65e569 100644 --- a/SRC/clatbs.f +++ b/SRC/clatbs.f @@ -1,4 +1,4 @@ -*> \brief \b CLATBS +*> \brief \b CLATBS solves a triangular banded system of equations. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clatdf.f b/SRC/clatdf.f index a69595cb..b378483f 100644 --- a/SRC/clatdf.f +++ b/SRC/clatdf.f @@ -1,4 +1,4 @@ -*> \brief \b CLATDF +*> \brief \b CLATDF uses the LU factorization of the n-by-n matrix computed by sgetc2 and computes a contribution to the reciprocal Dif-estimate. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clatps.f b/SRC/clatps.f index 1a595586..c471cec6 100644 --- a/SRC/clatps.f +++ b/SRC/clatps.f @@ -1,4 +1,4 @@ -*> \brief \b CLATPS +*> \brief \b CLATPS solves a triangular system of equations with the matrix held in packed storage. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clatrd.f b/SRC/clatrd.f index 257dff85..6b2d3136 100644 --- a/SRC/clatrd.f +++ b/SRC/clatrd.f @@ -1,4 +1,4 @@ -*> \brief \b CLATRD +*> \brief \b CLATRD reduces the first nb rows and columns of a symmetric/Hermitian matrix A to real tridiagonal form by an unitary similarity transformation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clatrs.f b/SRC/clatrs.f index db901509..f9dee136 100644 --- a/SRC/clatrs.f +++ b/SRC/clatrs.f @@ -1,4 +1,4 @@ -*> \brief \b CLATRS +*> \brief \b CLATRS solves a triangular system of equations with the scale factor set to prevent overflow. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clatrz.f b/SRC/clatrz.f index d567f369..b74a5f78 100644 --- a/SRC/clatrz.f +++ b/SRC/clatrz.f @@ -1,4 +1,4 @@ -*> \brief \b CLATRZ +*> \brief \b CLATRZ factors an upper trapezoidal matrix by means of unitary transformations. * * =========== DOCUMENTATION =========== * diff --git a/SRC/clauu2.f b/SRC/clauu2.f index ea38ce6d..ed907ddd 100644 --- a/SRC/clauu2.f +++ b/SRC/clauu2.f @@ -1,4 +1,4 @@ -*> \brief \b CLAUU2 +*> \brief \b CLAUU2 computes the product UUH or LHL, where U and L are upper or lower triangular matrices (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/clauum.f b/SRC/clauum.f index f8246262..256f5cea 100644 --- a/SRC/clauum.f +++ b/SRC/clauum.f @@ -1,4 +1,4 @@ -*> \brief \b CLAUUM +*> \brief \b CLAUUM computes the product UUH or LHL, where U and L are upper or lower triangular matrices (blocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/cpbtf2.f b/SRC/cpbtf2.f index ac854da5..bed45ef4 100644 --- a/SRC/cpbtf2.f +++ b/SRC/cpbtf2.f @@ -1,4 +1,4 @@ -*> \brief \b CPBTF2 +*> \brief \b CPBTF2 computes the Cholesky factorization of a symmetric/Hermitian positive definite band matrix (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/cpotf2.f b/SRC/cpotf2.f index 9f6130b6..43b4862a 100644 --- a/SRC/cpotf2.f +++ b/SRC/cpotf2.f @@ -1,4 +1,4 @@ -*> \brief \b CPOTF2 +*> \brief \b CPOTF2 computes the Cholesky factorization of a symmetric/Hermitian positive definite matrix (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/cpstf2.f b/SRC/cpstf2.f index 1ba708db..04a96dcd 100644 --- a/SRC/cpstf2.f +++ b/SRC/cpstf2.f @@ -1,4 +1,4 @@ -*> \brief \b CPSTF2 +*> \brief \b CPSTF2 computes the Cholesky factorization with complete pivoting of a real symmetric or complex Hermitian positive semi-definite matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cptts2.f b/SRC/cptts2.f index 43cd1cb4..72ca6089 100644 --- a/SRC/cptts2.f +++ b/SRC/cptts2.f @@ -1,4 +1,4 @@ -*> \brief \b CPTTS2 +*> \brief \b CPTTS2 solves a tridiagonal system of the form AX=B using the L D LH factorization computed by spttrf. * * =========== DOCUMENTATION =========== * @@ -1,4 +1,4 @@ -*> \brief \b CROT +*> \brief \b CROT applies a plane rotation with real cosine and complex sine to a pair of complex vectors. * * =========== DOCUMENTATION =========== * diff --git a/SRC/cspmv.f b/SRC/cspmv.f index 77df60fb..b2826d10 100644 --- a/SRC/cspmv.f +++ b/SRC/cspmv.f @@ -1,4 +1,4 @@ -*> \brief \b CSPMV +*> \brief \b CSPMV computes a matrix-vector product for complex vectors using a complex symmetric packed matrix * * =========== DOCUMENTATION =========== * @@ -1,4 +1,4 @@ -*> \brief \b CSPR +*> \brief \b CSPR performs the symmetrical rank-1 update of a complex symmetric packed matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/csrscl.f b/SRC/csrscl.f index c5fd2a23..917e95e0 100644 --- a/SRC/csrscl.f +++ b/SRC/csrscl.f @@ -1,4 +1,4 @@ -*> \brief \b CSRSCL +*> \brief \b CSRSCL multiplies a vector by the reciprocal of a real scalar. * * =========== DOCUMENTATION =========== * diff --git a/SRC/csymv.f b/SRC/csymv.f index 5917e321..15183b29 100644 --- a/SRC/csymv.f +++ b/SRC/csymv.f @@ -1,4 +1,4 @@ -*> \brief \b CSYMV +*> \brief \b CSYMV computes a matrix-vector product for a complex symmetric matrix. * * =========== DOCUMENTATION =========== * @@ -1,4 +1,4 @@ -*> \brief \b CSYR +*> \brief \b CSYR performs the symmetric rank-1 update of a complex symmetric matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/csytf2.f b/SRC/csytf2.f index 6dab9878..ca7ab6f9 100644 --- a/SRC/csytf2.f +++ b/SRC/csytf2.f @@ -1,4 +1,4 @@ -*> \brief \b CSYTF2 +*> \brief \b CSYTF2 computes the factorization of a real symmetric indefinite matrix, using the diagonal pivoting method (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ctfsm.f b/SRC/ctfsm.f index 76de0f97..ebd4f7bc 100644 --- a/SRC/ctfsm.f +++ b/SRC/ctfsm.f @@ -1,4 +1,4 @@ -*> \brief \b CTFSM +*> \brief \b CTFSM solves a matrix equation (one operand is a triangular matrix in RFP format). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ctfttp.f b/SRC/ctfttp.f index b2ccea4b..bb1ba12f 100644 --- a/SRC/ctfttp.f +++ b/SRC/ctfttp.f @@ -1,4 +1,4 @@ -*> \brief \b CTFTTP +*> \brief \b CTFTTP copies a triangular matrix from the rectangular full packed format (TF) to the standard packed format (TP). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ctfttr.f b/SRC/ctfttr.f index 99d260bd..dc9fd7aa 100644 --- a/SRC/ctfttr.f +++ b/SRC/ctfttr.f @@ -1,4 +1,4 @@ -*> \brief \b CTFTTR +*> \brief \b CTFTTR copies a triangular matrix from the rectangular full packed format (TF) to the standard full format (TR). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ctgex2.f b/SRC/ctgex2.f index da40a5b9..fd77b677 100644 --- a/SRC/ctgex2.f +++ b/SRC/ctgex2.f @@ -1,4 +1,4 @@ -*> \brief \b CTGEX2 +*> \brief \b CTGEX2 swaps adjacent diagonal blocks in an upper (quasi) triangular matrix pair by an unitary equivalence transformation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/ctgsy2.f b/SRC/ctgsy2.f index 9cd5085e..b9cc7842 100644 --- a/SRC/ctgsy2.f +++ b/SRC/ctgsy2.f @@ -1,4 +1,4 @@ -*> \brief \b CTGSY2 +*> \brief \b CTGSY2 solves the generalized Sylvester equation (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ctpqrt2.f b/SRC/ctpqrt2.f index 8bbf0b04..1038582d 100644 --- a/SRC/ctpqrt2.f +++ b/SRC/ctpqrt2.f @@ -1,4 +1,4 @@ -*> \brief \b CTPQRT2 +*> \brief \b CTPQRT2 computes a QR factorization of a real or complex "triangular-pentagonal" matrix, which is composed of a triangular block and a pentagonal block, using the compact WY representation for Q. * * =========== DOCUMENTATION =========== * diff --git a/SRC/ctprfb.f b/SRC/ctprfb.f index 38e5b38b..1ba56472 100644 --- a/SRC/ctprfb.f +++ b/SRC/ctprfb.f @@ -1,4 +1,4 @@ -*> \brief \b CTPRFB +*> \brief \b CTPRFB applies a real or complex "triangular-pentagonal" blocked reflector to a real or complex matrix, which is composed of two blocks. * * =========== DOCUMENTATION =========== * diff --git a/SRC/ctpttf.f b/SRC/ctpttf.f index 447f7ba5..8dd247a0 100644 --- a/SRC/ctpttf.f +++ b/SRC/ctpttf.f @@ -1,4 +1,4 @@ -*> \brief \b CTPTTF +*> \brief \b CTPTTF copies a triangular matrix from the standard packed format (TP) to the rectangular full packed format (TF). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ctpttr.f b/SRC/ctpttr.f index 6f2ff33e..bdbdaf07 100644 --- a/SRC/ctpttr.f +++ b/SRC/ctpttr.f @@ -1,4 +1,4 @@ -*> \brief \b CTPTTR +*> \brief \b CTPTTR copies a triangular matrix from the standard packed format (TP) to the standard full format (TR). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ctrti2.f b/SRC/ctrti2.f index 39490e37..6eb8ec4b 100644 --- a/SRC/ctrti2.f +++ b/SRC/ctrti2.f @@ -1,4 +1,4 @@ -*> \brief \b CTRTI2 +*> \brief \b CTRTI2 computes the inverse of a triangular matrix (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ctrttf.f b/SRC/ctrttf.f index 08fdd058..c2ef1c19 100644 --- a/SRC/ctrttf.f +++ b/SRC/ctrttf.f @@ -1,4 +1,4 @@ -*> \brief \b CTRTTF +*> \brief \b CTRTTF copies a triangular matrix from the standard full format (TR) to the rectangular full packed format (TF). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ctrttp.f b/SRC/ctrttp.f index b399267a..72e4d82d 100644 --- a/SRC/ctrttp.f +++ b/SRC/ctrttp.f @@ -1,4 +1,4 @@ -*> \brief \b CTRTTP +*> \brief \b CTRTTP copies a triangular matrix from the standard full format (TR) to the standard packed format (TP). * * =========== DOCUMENTATION =========== * diff --git a/SRC/cung2l.f b/SRC/cung2l.f index 0451c30a..b2caffca 100644 --- a/SRC/cung2l.f +++ b/SRC/cung2l.f @@ -1,4 +1,4 @@ -*> \brief \b CUNG2L +*> \brief \b CUNG2L generates all or part of the unitary matrix Q from a QL factorization determined by cgeqlf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/cungl2.f b/SRC/cungl2.f index 45987f22..0889a48d 100644 --- a/SRC/cungl2.f +++ b/SRC/cungl2.f @@ -1,4 +1,4 @@ -*> \brief \b CUNGL2 +*> \brief \b CUNGL2 generates all or part of the unitary matrix Q from an LQ factorization determined by cgelqf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/cungr2.f b/SRC/cungr2.f index 82533c81..5bde3063 100644 --- a/SRC/cungr2.f +++ b/SRC/cungr2.f @@ -1,4 +1,4 @@ -*> \brief \b CUNGR2 +*> \brief \b CUNGR2 generates all or part of the unitary matrix Q from an RQ factorization determined by cgerqf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/cunm2l.f b/SRC/cunm2l.f index f102406f..2489e6b2 100644 --- a/SRC/cunm2l.f +++ b/SRC/cunm2l.f @@ -1,4 +1,4 @@ -*> \brief \b CUNM2L +*> \brief \b CUNM2L multiplies a general matrix by the unitary matrix from a QL factorization determined by cgeqlf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/cunm2r.f b/SRC/cunm2r.f index 7279ff59..da8d5f15 100644 --- a/SRC/cunm2r.f +++ b/SRC/cunm2r.f @@ -1,4 +1,4 @@ -*> \brief \b CUNM2R +*> \brief \b CUNM2R multiplies a general matrix by the unitary matrix from a QR factorization determined by cgeqrf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/cunml2.f b/SRC/cunml2.f index bded7090..78d8a17a 100644 --- a/SRC/cunml2.f +++ b/SRC/cunml2.f @@ -1,4 +1,4 @@ -*> \brief \b CUNML2 +*> \brief \b CUNML2 multiplies a general matrix by the unitary matrix from a LQ factorization determined by cgelqf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/cunmr2.f b/SRC/cunmr2.f index ed42ebf3..6cbe6211 100644 --- a/SRC/cunmr2.f +++ b/SRC/cunmr2.f @@ -1,4 +1,4 @@ -*> \brief \b CUNMR2 +*> \brief \b CUNMR2 multiplies a general matrix by the unitary matrix from a RQ factorization determined by cgerqf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/cunmr3.f b/SRC/cunmr3.f index cd5afe27..1336c84b 100644 --- a/SRC/cunmr3.f +++ b/SRC/cunmr3.f @@ -1,4 +1,4 @@ -*> \brief \b CUNMR3 +*> \brief \b CUNMR3 multiplies a general matrix by the unitary matrix from a RZ factorization determined by ctzrzf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dgbtf2.f b/SRC/dgbtf2.f index d053e413..54506a2e 100644 --- a/SRC/dgbtf2.f +++ b/SRC/dgbtf2.f @@ -1,4 +1,4 @@ -*> \brief \b DGBTF2 +*> \brief \b DGBTF2 computes the LU factorization of a general band matrix using the unblocked version of the algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dgebd2.f b/SRC/dgebd2.f index c35db490..c7191823 100644 --- a/SRC/dgebd2.f +++ b/SRC/dgebd2.f @@ -1,4 +1,4 @@ -*> \brief \b DGEBD2 +*> \brief \b DGEBD2 reduces a general matrix to bidiagonal form using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dgehd2.f b/SRC/dgehd2.f index 499b0d81..f3d45ad8 100644 --- a/SRC/dgehd2.f +++ b/SRC/dgehd2.f @@ -1,4 +1,4 @@ -*> \brief \b DGEHD2 +*> \brief \b DGEHD2 reduces a general square matrix to upper Hessenberg form using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dgelq2.f b/SRC/dgelq2.f index 73315c9c..cd17ada6 100644 --- a/SRC/dgelq2.f +++ b/SRC/dgelq2.f @@ -1,4 +1,4 @@ -*> \brief \b DGELQ2 +*> \brief \b DGELQ2 computes the LQ factorization of a general rectangular matrix using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dgeql2.f b/SRC/dgeql2.f index f44079dd..bf513895 100644 --- a/SRC/dgeql2.f +++ b/SRC/dgeql2.f @@ -1,4 +1,4 @@ -*> \brief \b DGEQL2 +*> \brief \b DGEQL2 computes the QL factorization of a general rectangular matrix using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dgeqp3.f b/SRC/dgeqp3.f index 3d16e861..06f237a5 100644 --- a/SRC/dgeqp3.f +++ b/SRC/dgeqp3.f @@ -137,7 +137,7 @@ *> *> H(i) = I - tau * v * v**T *> -*> where tau is a real/complex scalar, and v is a real/complex vector +*> where tau is a real scalar, and v is a real/complex vector *> with v(1:i-1) = 0 and v(i) = 1; v(i+1:m) is stored on exit in *> A(i+1:m,i), and tau in TAU(i). *> \endverbatim diff --git a/SRC/dgeqr2.f b/SRC/dgeqr2.f index d253d6bd..3d44a7c3 100644 --- a/SRC/dgeqr2.f +++ b/SRC/dgeqr2.f @@ -1,4 +1,4 @@ -*> \brief \b DGEQR2 +*> \brief \b DGEQR2 computes the QR factorization of a general rectangular matrix using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dgeqr2p.f b/SRC/dgeqr2p.f index 76cd5046..2a88f71b 100644 --- a/SRC/dgeqr2p.f +++ b/SRC/dgeqr2p.f @@ -1,4 +1,4 @@ -*> \brief \b DGEQR2P +*> \brief \b DGEQR2P computes the QR factorization of a general rectangular matrix with non-negative diagonal elements using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dgeqrt2.f b/SRC/dgeqrt2.f index 9602ee70..f25f2c8e 100644 --- a/SRC/dgeqrt2.f +++ b/SRC/dgeqrt2.f @@ -1,4 +1,4 @@ -*> \brief \b DGEQRT2 +*> \brief \b DGEQRT2 computes a QR factorization of a general real or complex matrix using the compact WY representation of Q. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dgeqrt3.f b/SRC/dgeqrt3.f index caa1ff82..825c7791 100644 --- a/SRC/dgeqrt3.f +++ b/SRC/dgeqrt3.f @@ -1,4 +1,4 @@ -*> \brief \b DGEQRT3 +*> \brief \b DGEQRT3 recursively computes a QR factorization of a general real or complex matrix using the compact WY representation of Q. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dgerq2.f b/SRC/dgerq2.f index 31e199e1..b8f121be 100644 --- a/SRC/dgerq2.f +++ b/SRC/dgerq2.f @@ -1,4 +1,4 @@ -*> \brief \b DGERQ2 +*> \brief \b DGERQ2 computes the RQ factorization of a general rectangular matrix using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dgesc2.f b/SRC/dgesc2.f index 8217150c..6377d017 100644 --- a/SRC/dgesc2.f +++ b/SRC/dgesc2.f @@ -1,4 +1,4 @@ -*> \brief \b DGESC2 +*> \brief \b DGESC2 solves a system of linear equations using the LU factorization with complete pivoting computed by sgetc2. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dgetc2.f b/SRC/dgetc2.f index 57cf5b8d..8fefc489 100644 --- a/SRC/dgetc2.f +++ b/SRC/dgetc2.f @@ -1,4 +1,4 @@ -*> \brief \b DGETC2 +*> \brief \b DGETC2 computes the LU factorization with complete pivoting of the general n-by-n matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dgetf2.f b/SRC/dgetf2.f index ebe99ab9..417af198 100644 --- a/SRC/dgetf2.f +++ b/SRC/dgetf2.f @@ -1,4 +1,4 @@ -*> \brief \b DGETF2 +*> \brief \b DGETF2 computes the LU factorization of a general m-by-n matrix using partial pivoting with row interchanges (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dgsvj0.f b/SRC/dgsvj0.f index e0bdae39..fecde17c 100644 --- a/SRC/dgsvj0.f +++ b/SRC/dgsvj0.f @@ -1,4 +1,4 @@ -*> \brief \b DGSVJ0 +*> \brief \b DGSVJ0 pre-processor for the routine sgesvj. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dgsvj1.f b/SRC/dgsvj1.f index 7bbc33ce..154873db 100644 --- a/SRC/dgsvj1.f +++ b/SRC/dgsvj1.f @@ -1,4 +1,4 @@ -*> \brief \b DGSVJ1 +*> \brief \b DGSVJ1 pre-processor for the routine sgesvj, applies Jacobi rotations targeting only particular pivots. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dgtts2.f b/SRC/dgtts2.f index a582b733..ec388118 100644 --- a/SRC/dgtts2.f +++ b/SRC/dgtts2.f @@ -1,4 +1,4 @@ -*> \brief \b DGTTS2 +*> \brief \b DGTTS2 solves a system of linear equations with a tridiagonal matrix using the LU factorization computed by sgttrf. * * =========== DOCUMENTATION =========== * diff --git a/SRC/disnan.f b/SRC/disnan.f index f6a02bf1..1fdd97ce 100644 --- a/SRC/disnan.f +++ b/SRC/disnan.f @@ -1,4 +1,4 @@ -*> \brief \b DISNAN +*> \brief \b DISNAN tests input for NaN. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dla_gbamv.f b/SRC/dla_gbamv.f index 96dd22ff..a41d8318 100644 --- a/SRC/dla_gbamv.f +++ b/SRC/dla_gbamv.f @@ -1,4 +1,4 @@ -*> \brief \b DLA_GBAMV +*> \brief \b DLA_GBAMV performs a matrix-vector operation to calculate error bounds. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dla_gbrcond.f b/SRC/dla_gbrcond.f index d1f10844..668adfae 100644 --- a/SRC/dla_gbrcond.f +++ b/SRC/dla_gbrcond.f @@ -1,4 +1,4 @@ -*> \brief \b DLA_GBRCOND +*> \brief \b DLA_GBRCOND estimates the Skeel condition number for a general banded matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dla_gbrfsx_extended.f b/SRC/dla_gbrfsx_extended.f index 8ba76643..66a7ebc6 100644 --- a/SRC/dla_gbrfsx_extended.f +++ b/SRC/dla_gbrfsx_extended.f @@ -1,4 +1,4 @@ -*> \brief \b DLA_GBRFSX_EXTENDED +*> \brief \b DLA_GBRFSX_EXTENDED improves the computed solution to a system of linear equations for general banded matrices by performing extra-precise iterative refinement and provides error bounds and backward error estimates for the solution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dla_gbrpvgrw.f b/SRC/dla_gbrpvgrw.f index 330b488f..cc3cc8d9 100644 --- a/SRC/dla_gbrpvgrw.f +++ b/SRC/dla_gbrpvgrw.f @@ -1,4 +1,4 @@ -*> \brief \b DLA_GBRPVGRW +*> \brief \b DLA_GBRPVGRW computes the reciprocal pivot growth factor norm(A)/norm(U) for a general banded matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dla_geamv.f b/SRC/dla_geamv.f index ef701210..b84201d6 100644 --- a/SRC/dla_geamv.f +++ b/SRC/dla_geamv.f @@ -1,4 +1,4 @@ -*> \brief \b DLA_GEAMV +*> \brief \b DLA_GEAMV computes a matrix-vector product using a general matrix to calculate error bounds. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dla_gercond.f b/SRC/dla_gercond.f index 22e2ab23..4abdcb39 100644 --- a/SRC/dla_gercond.f +++ b/SRC/dla_gercond.f @@ -1,4 +1,4 @@ -*> \brief \b DLA_GERCOND +*> \brief \b DLA_GERCOND estimates the Skeel condition number for a general matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dla_gerfsx_extended.f b/SRC/dla_gerfsx_extended.f index fb97c475..2a9ae792 100644 --- a/SRC/dla_gerfsx_extended.f +++ b/SRC/dla_gerfsx_extended.f @@ -1,4 +1,4 @@ -*> \brief \b DLA_GERFSX_EXTENDED +*> \brief \b DLA_GERFSX_EXTENDED improves the computed solution to a system of linear equations for general matrices by performing extra-precise iterative refinement and provides error bounds and backward error estimates for the solution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dla_lin_berr.f b/SRC/dla_lin_berr.f index f4aa8591..36af203e 100644 --- a/SRC/dla_lin_berr.f +++ b/SRC/dla_lin_berr.f @@ -1,4 +1,4 @@ -*> \brief \b DLA_LIN_BERR +*> \brief \b DLA_LIN_BERR computes a component-wise relative backward error. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dla_porcond.f b/SRC/dla_porcond.f index eb546611..9f492db9 100644 --- a/SRC/dla_porcond.f +++ b/SRC/dla_porcond.f @@ -1,4 +1,4 @@ -*> \brief \b DLA_PORCOND +*> \brief \b DLA_PORCOND estimates the Skeel condition number for a symmetric positive-definite matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dla_porfsx_extended.f b/SRC/dla_porfsx_extended.f index 0d6c76d6..0b2f7b5e 100644 --- a/SRC/dla_porfsx_extended.f +++ b/SRC/dla_porfsx_extended.f @@ -1,4 +1,4 @@ -*> \brief \b DLA_PORFSX_EXTENDED +*> \brief \b DLA_PORFSX_EXTENDED improves the computed solution to a system of linear equations for symmetric or Hermitian positive-definite matrices by performing extra-precise iterative refinement and provides error bounds and backward error estimates for the solution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dla_porpvgrw.f b/SRC/dla_porpvgrw.f index 9620bdd1..01cf8dd2 100644 --- a/SRC/dla_porpvgrw.f +++ b/SRC/dla_porpvgrw.f @@ -1,4 +1,4 @@ -*> \brief \b DLA_PORPVGRW +*> \brief \b DLA_PORPVGRW computes the reciprocal pivot growth factor norm(A)/norm(U) for a symmetric or Hermitian positive-definite matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dla_syamv.f b/SRC/dla_syamv.f index a1c6c849..21704ae5 100644 --- a/SRC/dla_syamv.f +++ b/SRC/dla_syamv.f @@ -1,4 +1,4 @@ -*> \brief \b DLA_SYAMV +*> \brief \b DLA_SYAMV computes a matrix-vector product using a symmetric indefinite matrix to calculate error bounds. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dla_syrcond.f b/SRC/dla_syrcond.f index f279a285..4edfb8b6 100644 --- a/SRC/dla_syrcond.f +++ b/SRC/dla_syrcond.f @@ -1,4 +1,4 @@ -*> \brief \b DLA_SYRCOND +*> \brief \b DLA_SYRCOND estimates the Skeel condition number for a symmetric indefinite matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dla_syrfsx_extended.f b/SRC/dla_syrfsx_extended.f index 3fd8334d..7f715b46 100644 --- a/SRC/dla_syrfsx_extended.f +++ b/SRC/dla_syrfsx_extended.f @@ -1,4 +1,4 @@ -*> \brief \b DLA_SYRFSX_EXTENDED +*> \brief \b DLA_SYRFSX_EXTENDED improves the computed solution to a system of linear equations for symmetric indefinite matrices by performing extra-precise iterative refinement and provides error bounds and backward error estimates for the solution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dla_syrpvgrw.f b/SRC/dla_syrpvgrw.f index 05c89ff6..0a112fc7 100644 --- a/SRC/dla_syrpvgrw.f +++ b/SRC/dla_syrpvgrw.f @@ -1,4 +1,4 @@ -*> \brief \b DLA_SYRPVGRW +*> \brief \b DLA_SYRPVGRW computes the reciprocal pivot growth factor norm(A)/norm(U) for a symmetric indefinite matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dla_wwaddw.f b/SRC/dla_wwaddw.f index e372f286..659036b0 100644 --- a/SRC/dla_wwaddw.f +++ b/SRC/dla_wwaddw.f @@ -1,4 +1,4 @@ -*> \brief \b DLA_WWADDW +*> \brief \b DLA_WWADDW adds a vector into a doubled-single vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlabrd.f b/SRC/dlabrd.f index 4e56f1e3..e030d4bb 100644 --- a/SRC/dlabrd.f +++ b/SRC/dlabrd.f @@ -1,4 +1,4 @@ -*> \brief \b DLABRD +*> \brief \b DLABRD reduces the first nb rows and columns of a general matrix to a bidiagonal form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlacn2.f b/SRC/dlacn2.f index 60959c6e..00e6b3d2 100644 --- a/SRC/dlacn2.f +++ b/SRC/dlacn2.f @@ -1,4 +1,4 @@ -*> \brief \b DLACN2 +*> \brief \b DLACN2 estimates the 1-norm of a square matrix, using reverse communication for evaluating matrix-vector products. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlacon.f b/SRC/dlacon.f index 37b1c0c8..47e835d5 100644 --- a/SRC/dlacon.f +++ b/SRC/dlacon.f @@ -1,4 +1,4 @@ -*> \brief \b DLACON +*> \brief \b DLACON estimates the 1-norm of a square matrix, using reverse communication for evaluating matrix-vector products. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlacpy.f b/SRC/dlacpy.f index f9c7a759..c241742c 100644 --- a/SRC/dlacpy.f +++ b/SRC/dlacpy.f @@ -1,4 +1,4 @@ -*> \brief \b DLACPY +*> \brief \b DLACPY copies all or part of one two-dimensional array to another. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dladiv.f b/SRC/dladiv.f index 090a9065..48f91ad9 100644 --- a/SRC/dladiv.f +++ b/SRC/dladiv.f @@ -1,4 +1,4 @@ -*> \brief \b DLADIV +*> \brief \b DLADIV performs complex division in real arithmetic, avoiding unnecessary overflow. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlae2.f b/SRC/dlae2.f index 09933428..8c5fa4eb 100644 --- a/SRC/dlae2.f +++ b/SRC/dlae2.f @@ -1,4 +1,4 @@ -*> \brief \b DLAE2 +*> \brief \b DLAE2 computes the eigenvalues of a 2-by-2 symmetric matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaebz.f b/SRC/dlaebz.f index 80eb2910..65ca290a 100644 --- a/SRC/dlaebz.f +++ b/SRC/dlaebz.f @@ -1,4 +1,4 @@ -*> \brief \b DLAEBZ +*> \brief \b DLAEBZ computes the number of eigenvalues of a real symmetric tridiagonal matrix which are less than or equal to a given value, and performs other tasks required by the routine sstebz. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaed0.f b/SRC/dlaed0.f index fa106e66..e421ea5e 100644 --- a/SRC/dlaed0.f +++ b/SRC/dlaed0.f @@ -1,4 +1,4 @@ -*> \brief \b DLAED0 +*> \brief \b DLAED0 used by sstedc. Computes all eigenvalues and corresponding eigenvectors of an unreduced symmetric tridiagonal matrix using the divide and conquer method. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaed1.f b/SRC/dlaed1.f index d6eb79f0..237f7514 100644 --- a/SRC/dlaed1.f +++ b/SRC/dlaed1.f @@ -1,4 +1,4 @@ -*> \brief \b DLAED1 +*> \brief \b DLAED1 used by sstedc. Computes the updated eigensystem of a diagonal matrix after modification by a rank-one symmetric matrix. Used when the original matrix is tridiagonal. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaed2.f b/SRC/dlaed2.f index 2f513d51..a53753e3 100644 --- a/SRC/dlaed2.f +++ b/SRC/dlaed2.f @@ -1,4 +1,4 @@ -*> \brief \b DLAED2 +*> \brief \b DLAED2 used by sstedc. Merges eigenvalues and deflates secular equation. Used when the original matrix is tridiagonal. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaed3.f b/SRC/dlaed3.f index 520cb008..de995628 100644 --- a/SRC/dlaed3.f +++ b/SRC/dlaed3.f @@ -1,4 +1,4 @@ -*> \brief \b DLAED3 +*> \brief \b DLAED3 used by sstedc. Finds the roots of the secular equation and updates the eigenvectors. Used when the original matrix is tridiagonal. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaed4.f b/SRC/dlaed4.f index e56393ba..ceea6c36 100644 --- a/SRC/dlaed4.f +++ b/SRC/dlaed4.f @@ -1,4 +1,4 @@ -*> \brief \b DLAED4 +*> \brief \b DLAED4 used by sstedc. Finds a single root of the secular equation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaed5.f b/SRC/dlaed5.f index 95296bc4..9fe4e81f 100644 --- a/SRC/dlaed5.f +++ b/SRC/dlaed5.f @@ -1,4 +1,4 @@ -*> \brief \b DLAED5 +*> \brief \b DLAED5 used by sstedc. Solves the 2-by-2 secular equation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaed6.f b/SRC/dlaed6.f index 75de5169..8d96082d 100644 --- a/SRC/dlaed6.f +++ b/SRC/dlaed6.f @@ -1,4 +1,4 @@ -*> \brief \b DLAED6 +*> \brief \b DLAED6 used by sstedc. Computes one Newton step in solution of the secular equation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaed7.f b/SRC/dlaed7.f index 77b9a17e..a51b9c75 100644 --- a/SRC/dlaed7.f +++ b/SRC/dlaed7.f @@ -1,4 +1,4 @@ -*> \brief \b DLAED7 +*> \brief \b DLAED7 used by sstedc. Computes the updated eigensystem of a diagonal matrix after modification by a rank-one symmetric matrix. Used when the original matrix is dense. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaed8.f b/SRC/dlaed8.f index 0a5b3c0b..53de753a 100644 --- a/SRC/dlaed8.f +++ b/SRC/dlaed8.f @@ -1,4 +1,4 @@ -*> \brief \b DLAED8 +*> \brief \b DLAED8 used by sstedc. Merges eigenvalues and deflates secular equation. Used when the original matrix is dense. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaed9.f b/SRC/dlaed9.f index 3260f96b..0e5cc335 100644 --- a/SRC/dlaed9.f +++ b/SRC/dlaed9.f @@ -1,4 +1,4 @@ -*> \brief \b DLAED9 +*> \brief \b DLAED9 used by sstedc. Finds the roots of the secular equation and updates the eigenvectors. Used when the original matrix is dense. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaeda.f b/SRC/dlaeda.f index de1f8441..8b0552dc 100644 --- a/SRC/dlaeda.f +++ b/SRC/dlaeda.f @@ -1,4 +1,4 @@ -*> \brief \b DLAEDA +*> \brief \b DLAEDA used by sstedc. Computes the Z vector determining the rank-one modification of the diagonal matrix. Used when the original matrix is dense. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaein.f b/SRC/dlaein.f index 84f41f5a..746cdbb8 100644 --- a/SRC/dlaein.f +++ b/SRC/dlaein.f @@ -1,4 +1,4 @@ -*> \brief \b DLAEIN +*> \brief \b DLAEIN computes a specified right or left eigenvector of an upper Hessenberg matrix by inverse iteration. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaev2.f b/SRC/dlaev2.f index 98230d05..d3fae0e6 100644 --- a/SRC/dlaev2.f +++ b/SRC/dlaev2.f @@ -1,4 +1,4 @@ -*> \brief \b DLAEV2 +*> \brief \b DLAEV2 computes the eigenvalues and eigenvectors of a 2-by-2 symmetric/Hermitian matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaexc.f b/SRC/dlaexc.f index b12e1059..1d814f78 100644 --- a/SRC/dlaexc.f +++ b/SRC/dlaexc.f @@ -1,4 +1,4 @@ -*> \brief \b DLAEXC +*> \brief \b DLAEXC swaps adjacent diagonal blocks of a real upper quasi-triangular matrix in Schur canonical form, by an orthogonal similarity transformation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlag2.f b/SRC/dlag2.f index feff766d..f23dd049 100644 --- a/SRC/dlag2.f +++ b/SRC/dlag2.f @@ -1,4 +1,4 @@ -*> \brief \b DLAG2 +*> \brief \b DLAG2 computes the eigenvalues of a 2-by-2 generalized eigenvalue problem, with scaling as necessary to avoid over-/underflow. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlag2s.f b/SRC/dlag2s.f index 26a00359..5fe860ee 100644 --- a/SRC/dlag2s.f +++ b/SRC/dlag2s.f @@ -1,4 +1,4 @@ -*> \brief \b DLAG2S +*> \brief \b DLAG2S converts a double precision matrix to a single precision matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlags2.f b/SRC/dlags2.f index 95a8f339..55f1b44b 100644 --- a/SRC/dlags2.f +++ b/SRC/dlags2.f @@ -1,4 +1,4 @@ -*> \brief \b DLAGS2 +*> \brief \b DLAGS2 computes 2-by-2 orthogonal matrices U, V, and Q, and applies them to matrices A and B such that the rows of the transformed A and B are parallel. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlagtf.f b/SRC/dlagtf.f index d7b22840..6f1a6a36 100644 --- a/SRC/dlagtf.f +++ b/SRC/dlagtf.f @@ -1,4 +1,4 @@ -*> \brief \b DLAGTF +*> \brief \b DLAGTF computes an LU factorization of a matrix T-λI, where T is a general tridiagonal matrix, and λ a scalar, using partial pivoting with row interchanges. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlagtm.f b/SRC/dlagtm.f index 937caf12..520970db 100644 --- a/SRC/dlagtm.f +++ b/SRC/dlagtm.f @@ -1,4 +1,4 @@ -*> \brief \b DLAGTM +*> \brief \b DLAGTM performs a matrix-matrix product of the form C = αAB+βC, where A is a tridiagonal matrix, B and C are rectangular matrices, and α and β are scalars, which may be 0, 1, or -1. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlagts.f b/SRC/dlagts.f index eabf1fb7..b9152a5f 100644 --- a/SRC/dlagts.f +++ b/SRC/dlagts.f @@ -1,4 +1,4 @@ -*> \brief \b DLAGTS +*> \brief \b DLAGTS solves the system of equations (T-λI)x = y or (T-λI)Tx = y,where T is a general tridiagonal matrix and λ a scalar, using the LU factorization computed by slagtf. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlagv2.f b/SRC/dlagv2.f index 2c99436e..a0b1a36c 100644 --- a/SRC/dlagv2.f +++ b/SRC/dlagv2.f @@ -1,4 +1,4 @@ -*> \brief \b DLAGV2 +*> \brief \b DLAGV2 computes the Generalized Schur factorization of a real 2-by-2 matrix pencil (A,B) where B is upper triangular. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlahqr.f b/SRC/dlahqr.f index 8cbf0308..e7c63773 100644 --- a/SRC/dlahqr.f +++ b/SRC/dlahqr.f @@ -1,4 +1,4 @@ -*> \brief \b DLAHQR +*> \brief \b DLAHQR computes the eigenvalues and Schur factorization of an upper Hessenberg matrix, using the double-shift/single-shift QR algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlahr2.f b/SRC/dlahr2.f index 31ea1bb0..f2df5dc6 100644 --- a/SRC/dlahr2.f +++ b/SRC/dlahr2.f @@ -1,4 +1,4 @@ -*> \brief \b DLAHR2 +*> \brief \b DLAHR2 reduces the specified number of first columns of a general rectangular matrix A so that elements below the specified subdiagonal are zero, and returns auxiliary matrices which are needed to apply the transformation to the unreduced part of A. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlahrd.f b/SRC/dlahrd.f index 0be90aae..db99f5f1 100644 --- a/SRC/dlahrd.f +++ b/SRC/dlahrd.f @@ -1,4 +1,4 @@ -*> \brief \b DLAHRD +*> \brief \b DLAHRD reduces the first nb columns of a general rectangular matrix A so that elements below the k-th subdiagonal are zero, and returns auxiliary matrices which are needed to apply the transformation to the unreduced part of A. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaic1.f b/SRC/dlaic1.f index c3993821..ac7e52f5 100644 --- a/SRC/dlaic1.f +++ b/SRC/dlaic1.f @@ -1,4 +1,4 @@ -*> \brief \b DLAIC1 +*> \brief \b DLAIC1 applies one step of incremental condition estimation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaisnan.f b/SRC/dlaisnan.f index c3cd2780..17cd5f42 100644 --- a/SRC/dlaisnan.f +++ b/SRC/dlaisnan.f @@ -1,4 +1,4 @@ -*> \brief \b DLAISNAN +*> \brief \b DLAISNAN tests input for NaN by comparing two arguments for inequality. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaln2.f b/SRC/dlaln2.f index f20624c8..abebd69c 100644 --- a/SRC/dlaln2.f +++ b/SRC/dlaln2.f @@ -1,4 +1,4 @@ -*> \brief \b DLALN2 +*> \brief \b DLALN2 solves a 1-by-1 or 2-by-2 linear system of equations of the specified form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlals0.f b/SRC/dlals0.f index b3293dc0..66679667 100644 --- a/SRC/dlals0.f +++ b/SRC/dlals0.f @@ -1,4 +1,4 @@ -*> \brief \b DLALS0 +*> \brief \b DLALS0 applies back multiplying factors in solving the least squares problem using divide and conquer SVD approach. Used by sgelsd. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlalsa.f b/SRC/dlalsa.f index e81a498b..994d05c3 100644 --- a/SRC/dlalsa.f +++ b/SRC/dlalsa.f @@ -1,4 +1,4 @@ -*> \brief \b DLALSA +*> \brief \b DLALSA computes the SVD of the coefficient matrix in compact form. Used by sgelsd. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlalsd.f b/SRC/dlalsd.f index b25231a0..8d271b13 100644 --- a/SRC/dlalsd.f +++ b/SRC/dlalsd.f @@ -1,4 +1,4 @@ -*> \brief \b DLALSD +*> \brief \b DLALSD uses the singular value decomposition of A to solve the least squares problem. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlamrg.f b/SRC/dlamrg.f index 3419f51a..155621c2 100644 --- a/SRC/dlamrg.f +++ b/SRC/dlamrg.f @@ -1,4 +1,4 @@ -*> \brief \b DLAMRG +*> \brief \b DLAMRG creates a permutation list to merge the entries of two independently sorted sets into a single set sorted in ascending order. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaneg.f b/SRC/dlaneg.f index 0d998036..8115ccfe 100644 --- a/SRC/dlaneg.f +++ b/SRC/dlaneg.f @@ -1,4 +1,4 @@ -*> \brief \b DLANEG +*> \brief \b DLANEG computes the Sturm count. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlangb.f b/SRC/dlangb.f index abf7c2ba..6aa5527b 100644 --- a/SRC/dlangb.f +++ b/SRC/dlangb.f @@ -1,4 +1,4 @@ -*> \brief \b DLANGB +*> \brief \b DLANGB returns the value of the 1-norm, Frobenius norm, infinity-norm, or the largest absolute value of any element of general band matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlange.f b/SRC/dlange.f index 47200c16..d2118974 100644 --- a/SRC/dlange.f +++ b/SRC/dlange.f @@ -1,4 +1,4 @@ -*> \brief \b DLANGE +*> \brief \b DLANGE returns the value of the 1-norm, Frobenius norm, infinity-norm, or the largest absolute value of any element of a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlangt.f b/SRC/dlangt.f index aa562ab6..9b77232e 100644 --- a/SRC/dlangt.f +++ b/SRC/dlangt.f @@ -1,4 +1,4 @@ -*> \brief \b DLANGT +*> \brief \b DLANGT returns the value of the 1-norm, Frobenius norm, infinity-norm, or the largest absolute value of any element of a general tridiagonal matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlanhs.f b/SRC/dlanhs.f index ed13a2c5..66721968 100644 --- a/SRC/dlanhs.f +++ b/SRC/dlanhs.f @@ -1,4 +1,4 @@ -*> \brief \b DLANHS +*> \brief \b DLANHS returns the value of the 1-norm, Frobenius norm, infinity-norm, or the largest absolute value of any element of an upper Hessenberg matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlansb.f b/SRC/dlansb.f index d27aa968..1f6fdb83 100644 --- a/SRC/dlansb.f +++ b/SRC/dlansb.f @@ -1,4 +1,4 @@ -*> \brief \b DLANSB +*> \brief \b DLANSB returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a symmetric band matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlansf.f b/SRC/dlansf.f index 30a3f0a7..b7926267 100644 --- a/SRC/dlansf.f +++ b/SRC/dlansf.f @@ -1,4 +1,4 @@ -*> \brief \b DLANSF +*> \brief \b DLANSF returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a symmetric matrix in RFP format. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlansp.f b/SRC/dlansp.f index a4fa2e79..96adcf6f 100644 --- a/SRC/dlansp.f +++ b/SRC/dlansp.f @@ -1,4 +1,4 @@ -*> \brief \b DLANSP +*> \brief \b DLANSP returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a symmetric matrix supplied in packed form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlanst.f b/SRC/dlanst.f index b4eb093e..1e15ccc5 100644 --- a/SRC/dlanst.f +++ b/SRC/dlanst.f @@ -1,4 +1,4 @@ -*> \brief \b DLANST +*> \brief \b DLANST returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a real symmetric tridiagonal matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlansy.f b/SRC/dlansy.f index 6352f14e..1d5e283c 100644 --- a/SRC/dlansy.f +++ b/SRC/dlansy.f @@ -1,4 +1,4 @@ -*> \brief \b DLANSY +*> \brief \b DLANSY returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a real symmetric matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlantb.f b/SRC/dlantb.f index 08e72b0f..95bc64bc 100644 --- a/SRC/dlantb.f +++ b/SRC/dlantb.f @@ -1,4 +1,4 @@ -*> \brief \b DLANTB +*> \brief \b DLANTB returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a triangular band matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlantp.f b/SRC/dlantp.f index 8c919cdd..389daa65 100644 --- a/SRC/dlantp.f +++ b/SRC/dlantp.f @@ -1,4 +1,4 @@ -*> \brief \b DLANTP +*> \brief \b DLANTP returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a triangular matrix supplied in packed form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlantr.f b/SRC/dlantr.f index 7d7969b0..9ff04b5b 100644 --- a/SRC/dlantr.f +++ b/SRC/dlantr.f @@ -1,4 +1,4 @@ -*> \brief \b DLANTR +*> \brief \b DLANTR returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a trapezoidal or triangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlanv2.f b/SRC/dlanv2.f index b5a97b2f..0b1b5169 100644 --- a/SRC/dlanv2.f +++ b/SRC/dlanv2.f @@ -1,4 +1,4 @@ -*> \brief \b DLANV2 +*> \brief \b DLANV2 computes the Schur factorization of a real 2-by-2 nonsymmetric matrix in standard form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlapll.f b/SRC/dlapll.f index 9a87c160..b18a869e 100644 --- a/SRC/dlapll.f +++ b/SRC/dlapll.f @@ -1,4 +1,4 @@ -*> \brief \b DLAPLL +*> \brief \b DLAPLL measures the linear dependence of two vectors. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlapmr.f b/SRC/dlapmr.f index 59654234..29f7b875 100644 --- a/SRC/dlapmr.f +++ b/SRC/dlapmr.f @@ -1,4 +1,4 @@ -*> \brief \b DLAPMR +*> \brief \b DLAPMR rearranges rows of a matrix as specified by a permutation vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlapmt.f b/SRC/dlapmt.f index 50ce8b3f..03c87140 100644 --- a/SRC/dlapmt.f +++ b/SRC/dlapmt.f @@ -1,4 +1,4 @@ -*> \brief \b DLAPMT +*> \brief \b DLAPMT performs a forward or backward permutation of the columns of a matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlapy2.f b/SRC/dlapy2.f index e6a62bf4..aa22b74a 100644 --- a/SRC/dlapy2.f +++ b/SRC/dlapy2.f @@ -1,4 +1,4 @@ -*> \brief \b DLAPY2 +*> \brief \b DLAPY2 returns sqrt(x2+y2). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlapy3.f b/SRC/dlapy3.f index ae9844f8..9b2d0fe2 100644 --- a/SRC/dlapy3.f +++ b/SRC/dlapy3.f @@ -1,4 +1,4 @@ -*> \brief \b DLAPY3 +*> \brief \b DLAPY3 returns sqrt(x2+y2+z2). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaqgb.f b/SRC/dlaqgb.f index da2a08a0..812ac241 100644 --- a/SRC/dlaqgb.f +++ b/SRC/dlaqgb.f @@ -1,4 +1,4 @@ -*> \brief \b DLAQGB +*> \brief \b DLAQGB scales a general band matrix, using row and column scaling factors computed by sgbequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaqge.f b/SRC/dlaqge.f index 568cc5ae..1d6b6233 100644 --- a/SRC/dlaqge.f +++ b/SRC/dlaqge.f @@ -1,4 +1,4 @@ -*> \brief \b DLAQGE +*> \brief \b DLAQGE scales a general rectangular matrix, using row and column scaling factors computed by sgeequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaqp2.f b/SRC/dlaqp2.f index af115a39..b7ae589c 100644 --- a/SRC/dlaqp2.f +++ b/SRC/dlaqp2.f @@ -1,4 +1,4 @@ -*> \brief \b DLAQP2 +*> \brief \b DLAQP2 computes a QR factorization with column pivoting of the matrix block. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaqps.f b/SRC/dlaqps.f index 5ef98753..c672a7b3 100644 --- a/SRC/dlaqps.f +++ b/SRC/dlaqps.f @@ -1,4 +1,4 @@ -*> \brief \b DLAQPS +*> \brief \b DLAQPS computes a step of QR factorization with column pivoting of a real m-by-n matrix A by using BLAS level 3. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaqr0.f b/SRC/dlaqr0.f index b1affb33..caec0ebf 100644 --- a/SRC/dlaqr0.f +++ b/SRC/dlaqr0.f @@ -1,4 +1,4 @@ -*> \brief \b DLAQR0 +*> \brief \b DLAQR0 computes the eigenvalues of a Hessenberg matrix, and optionally the matrices from the Schur decomposition. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaqr1.f b/SRC/dlaqr1.f index 8263202e..d2bdcf1f 100644 --- a/SRC/dlaqr1.f +++ b/SRC/dlaqr1.f @@ -1,4 +1,4 @@ -*> \brief \b DLAQR1 +*> \brief \b DLAQR1 sets a scalar multiple of the first column of the product of 2-by-2 or 3-by-3 matrix H and specified shifts. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaqr2.f b/SRC/dlaqr2.f index b5de5027..65298a12 100644 --- a/SRC/dlaqr2.f +++ b/SRC/dlaqr2.f @@ -1,4 +1,4 @@ -*> \brief \b DLAQR2 +*> \brief \b DLAQR2 performs the orthogonal similarity transformation of a Hessenberg matrix to detect and deflate fully converged eigenvalues from a trailing principal submatrix (aggressive early deflation). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaqr3.f b/SRC/dlaqr3.f index 97890d16..7a7aa6d2 100644 --- a/SRC/dlaqr3.f +++ b/SRC/dlaqr3.f @@ -1,4 +1,4 @@ -*> \brief \b DLAQR3 +*> \brief \b DLAQR3 performs the orthogonal similarity transformation of a Hessenberg matrix to detect and deflate fully converged eigenvalues from a trailing principal submatrix (aggressive early deflation). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaqr4.f b/SRC/dlaqr4.f index a25c9586..750504f4 100644 --- a/SRC/dlaqr4.f +++ b/SRC/dlaqr4.f @@ -1,4 +1,4 @@ -*> \brief \b DLAQR4 +*> \brief \b DLAQR4 computes the eigenvalues of a Hessenberg matrix, and optionally the matrices from the Schur decomposition. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaqr5.f b/SRC/dlaqr5.f index 9fa95414..021789cf 100644 --- a/SRC/dlaqr5.f +++ b/SRC/dlaqr5.f @@ -1,4 +1,4 @@ -*> \brief \b DLAQR5 +*> \brief \b DLAQR5 performs a single small-bulge multi-shift QR sweep. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaqsb.f b/SRC/dlaqsb.f index 38413af5..f8e76811 100644 --- a/SRC/dlaqsb.f +++ b/SRC/dlaqsb.f @@ -1,4 +1,4 @@ -*> \brief \b DLAQSB +*> \brief \b DLAQSB scales a symmetric/Hermitian band matrix, using scaling factors computed by spbequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaqsp.f b/SRC/dlaqsp.f index ea88ecd8..9b8b1466 100644 --- a/SRC/dlaqsp.f +++ b/SRC/dlaqsp.f @@ -1,4 +1,4 @@ -*> \brief \b DLAQSP +*> \brief \b DLAQSP scales a symmetric/Hermitian matrix in packed storage, using scaling factors computed by sppequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaqsy.f b/SRC/dlaqsy.f index a67fd450..3b8970f7 100644 --- a/SRC/dlaqsy.f +++ b/SRC/dlaqsy.f @@ -1,4 +1,4 @@ -*> \brief \b DLAQSY +*> \brief \b DLAQSY scales a symmetric/Hermitian matrix, using scaling factors computed by spoequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaqtr.f b/SRC/dlaqtr.f index 710e3f1c..776b8714 100644 --- a/SRC/dlaqtr.f +++ b/SRC/dlaqtr.f @@ -1,4 +1,4 @@ -*> \brief \b DLAQTR +*> \brief \b DLAQTR solves a real quasi-triangular system of equations, or a complex quasi-triangular system of special form, in real arithmetic. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlar1v.f b/SRC/dlar1v.f index 2aa46910..983d5d09 100644 --- a/SRC/dlar1v.f +++ b/SRC/dlar1v.f @@ -1,4 +1,4 @@ -*> \brief \b DLAR1V +*> \brief \b DLAR1V computes the (scaled) r-th column of the inverse of the submatrix in rows b1 through bn of the tridiagonal matrix LDLT - λI. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlar2v.f b/SRC/dlar2v.f index 3da915f6..82ee3f5b 100644 --- a/SRC/dlar2v.f +++ b/SRC/dlar2v.f @@ -1,4 +1,4 @@ -*> \brief \b DLAR2V +*> \brief \b DLAR2V applies a vector of plane rotations with real cosines and real sines from both sides to a sequence of 2-by-2 symmetric/Hermitian matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarf.f b/SRC/dlarf.f index 2a82ff43..62ac4723 100644 --- a/SRC/dlarf.f +++ b/SRC/dlarf.f @@ -1,4 +1,4 @@ -*> \brief \b DLARF +*> \brief \b DLARF applies an elementary reflector to a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarfb.f b/SRC/dlarfb.f index 206d3b26..1e6894c3 100644 --- a/SRC/dlarfb.f +++ b/SRC/dlarfb.f @@ -1,4 +1,4 @@ -*> \brief \b DLARFB +*> \brief \b DLARFB applies a block reflector or its transpose to a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarfg.f b/SRC/dlarfg.f index 458ad2e0..58f72455 100644 --- a/SRC/dlarfg.f +++ b/SRC/dlarfg.f @@ -1,4 +1,4 @@ -*> \brief \b DLARFG +*> \brief \b DLARFG generates an elementary reflector (Householder matrix). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarfgp.f b/SRC/dlarfgp.f index 1dfe6687..8d28bb6e 100644 --- a/SRC/dlarfgp.f +++ b/SRC/dlarfgp.f @@ -1,4 +1,4 @@ -*> \brief \b DLARFGP +*> \brief \b DLARFGP generates an elementary reflector (Householder matrix) with non-negatibe beta. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarft.f b/SRC/dlarft.f index 4b755040..38009b78 100644 --- a/SRC/dlarft.f +++ b/SRC/dlarft.f @@ -1,4 +1,4 @@ -*> \brief \b DLARFT +*> \brief \b DLARFT forms the triangular factor T of a block reflector H = I - vtvH * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarfx.f b/SRC/dlarfx.f index 76338199..40963941 100644 --- a/SRC/dlarfx.f +++ b/SRC/dlarfx.f @@ -1,4 +1,4 @@ -*> \brief \b DLARFX +*> \brief \b DLARFX applies an elementary reflector to a general rectangular matrix, with loop unrolling when the reflector has order ≤ 10. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlargv.f b/SRC/dlargv.f index c27e3fb4..4caa81d4 100644 --- a/SRC/dlargv.f +++ b/SRC/dlargv.f @@ -1,4 +1,4 @@ -*> \brief \b DLARGV +*> \brief \b DLARGV generates a vector of plane rotations with real cosines and real sines. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarnv.f b/SRC/dlarnv.f index 8195ae9c..470f0283 100644 --- a/SRC/dlarnv.f +++ b/SRC/dlarnv.f @@ -1,4 +1,4 @@ -*> \brief \b DLARNV +*> \brief \b DLARNV returns a vector of random numbers from a uniform or normal distribution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarra.f b/SRC/dlarra.f index 08b846b4..e05c660d 100644 --- a/SRC/dlarra.f +++ b/SRC/dlarra.f @@ -1,4 +1,4 @@ -*> \brief \b DLARRA +*> \brief \b DLARRA computes the splitting points with the specified threshold. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarrb.f b/SRC/dlarrb.f index b6018b39..d1fad68d 100644 --- a/SRC/dlarrb.f +++ b/SRC/dlarrb.f @@ -1,4 +1,4 @@ -*> \brief \b DLARRB +*> \brief \b DLARRB provides limited bisection to locate eigenvalues for more accuracy. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarrc.f b/SRC/dlarrc.f index 9c2201f3..b16d1be2 100644 --- a/SRC/dlarrc.f +++ b/SRC/dlarrc.f @@ -1,4 +1,4 @@ -*> \brief \b DLARRC +*> \brief \b DLARRC computes the number of eigenvalues of the symmetric tridiagonal matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarrd.f b/SRC/dlarrd.f index a4be90c5..d8881727 100644 --- a/SRC/dlarrd.f +++ b/SRC/dlarrd.f @@ -1,4 +1,4 @@ -*> \brief \b DLARRD +*> \brief \b DLARRD computes the eigenvalues of a symmetric tridiagonal matrix to suitable accuracy. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarre.f b/SRC/dlarre.f index 109328a7..89410c1d 100644 --- a/SRC/dlarre.f +++ b/SRC/dlarre.f @@ -1,4 +1,4 @@ -*> \brief \b DLARRE +*> \brief \b DLARRE given the tridiagonal matrix T, sets small off-diagonal elements to zero and for each unreduced block Ti, finds base representations and eigenvalues. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarrf.f b/SRC/dlarrf.f index 733756a8..4738ed7c 100644 --- a/SRC/dlarrf.f +++ b/SRC/dlarrf.f @@ -1,4 +1,4 @@ -*> \brief \b DLARRF +*> \brief \b DLARRF finds a new relatively robust representation such that at least one of the eigenvalues is relatively isolated. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarrj.f b/SRC/dlarrj.f index 3b4ec34c..73089e48 100644 --- a/SRC/dlarrj.f +++ b/SRC/dlarrj.f @@ -1,4 +1,4 @@ -*> \brief \b DLARRJ +*> \brief \b DLARRJ performs refinement of the initial estimates of the eigenvalues of the matrix T. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarrk.f b/SRC/dlarrk.f index e4db3b94..0fabc125 100644 --- a/SRC/dlarrk.f +++ b/SRC/dlarrk.f @@ -1,4 +1,4 @@ -*> \brief \b DLARRK +*> \brief \b DLARRK computes one eigenvalue of a symmetric tridiagonal matrix T to suitable accuracy. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarrr.f b/SRC/dlarrr.f index df343fe4..eee7fdd4 100644 --- a/SRC/dlarrr.f +++ b/SRC/dlarrr.f @@ -1,4 +1,4 @@ -*> \brief \b DLARRR +*> \brief \b DLARRR performs tests to decide whether the symmetric tridiagonal matrix T warrants expensive computations which guarantee high relative accuracy in the eigenvalues. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarrv.f b/SRC/dlarrv.f index c5826356..b59085d7 100644 --- a/SRC/dlarrv.f +++ b/SRC/dlarrv.f @@ -1,4 +1,4 @@ -*> \brief \b DLARRV +*> \brief \b DLARRV computes the eigenvectors of the tridiagonal matrix T = L D LT given L, D and the eigenvalues of L D LT. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarscl2.f b/SRC/dlarscl2.f index 2daeb97e..65c38526 100644 --- a/SRC/dlarscl2.f +++ b/SRC/dlarscl2.f @@ -1,4 +1,4 @@ -*> \brief \b DLARSCL2 +*> \brief \b DLARSCL2 performs reciprocal diagonal scaling on a vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlartg.f b/SRC/dlartg.f index aa68c377..caa4090b 100644 --- a/SRC/dlartg.f +++ b/SRC/dlartg.f @@ -1,4 +1,4 @@ -*> \brief \b DLARTG +*> \brief \b DLARTG generates a plane rotation with real cosine and real sine. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlartgp.f b/SRC/dlartgp.f index 7b702558..c0945ecc 100644 --- a/SRC/dlartgp.f +++ b/SRC/dlartgp.f @@ -1,4 +1,4 @@ -*> \brief \b DLARTGP +*> \brief \b DLARTGP generates a plane rotation so that the diagonal is nonnegative. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlartgs.f b/SRC/dlartgs.f index a7553eb3..94bff63a 100644 --- a/SRC/dlartgs.f +++ b/SRC/dlartgs.f @@ -1,4 +1,4 @@ -*> \brief \b DLARTGS +*> \brief \b DLARTGS generates a plane rotation designed to introduce a bulge in implicit QR iteration for the bidiagonal SVD problem. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlartv.f b/SRC/dlartv.f index f63e5dfc..f067885f 100644 --- a/SRC/dlartv.f +++ b/SRC/dlartv.f @@ -1,4 +1,4 @@ -*> \brief \b DLARTV +*> \brief \b DLARTV applies a vector of plane rotations with real cosines and real sines to the elements of a pair of vectors. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaruv.f b/SRC/dlaruv.f index 70755a25..db2591c6 100644 --- a/SRC/dlaruv.f +++ b/SRC/dlaruv.f @@ -1,4 +1,4 @@ -*> \brief \b DLARUV +*> \brief \b DLARUV returns a vector of n random real numbers from a uniform distribution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarz.f b/SRC/dlarz.f index a7fb5b4f..d0e5dc4b 100644 --- a/SRC/dlarz.f +++ b/SRC/dlarz.f @@ -1,4 +1,4 @@ -*> \brief \b DLARZ +*> \brief \b DLARZ applies an elementary reflector (as returned by stzrzf) to a general matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarzb.f b/SRC/dlarzb.f index 157a084c..76a46fbe 100644 --- a/SRC/dlarzb.f +++ b/SRC/dlarzb.f @@ -1,4 +1,4 @@ -*> \brief \b DLARZB +*> \brief \b DLARZB applies a block reflector or its transpose to a general matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlarzt.f b/SRC/dlarzt.f index ec6ea72f..3648a9ac 100644 --- a/SRC/dlarzt.f +++ b/SRC/dlarzt.f @@ -1,4 +1,4 @@ -*> \brief \b DLARZT +*> \brief \b DLARZT forms the triangular factor T of a block reflector H = I - vtvH. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlas2.f b/SRC/dlas2.f index a6a711dd..1486da4b 100644 --- a/SRC/dlas2.f +++ b/SRC/dlas2.f @@ -1,4 +1,4 @@ -*> \brief \b DLAS2 +*> \brief \b DLAS2 computes singular values of a 2-by-2 triangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlascl.f b/SRC/dlascl.f index 5b4d3b24..7b057ee1 100644 --- a/SRC/dlascl.f +++ b/SRC/dlascl.f @@ -1,4 +1,4 @@ -*> \brief \b DLASCL +*> \brief \b DLASCL multiplies a general rectangular matrix by a real scalar defined as cto/cfrom. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlascl2.f b/SRC/dlascl2.f index 51683c69..f509c70a 100644 --- a/SRC/dlascl2.f +++ b/SRC/dlascl2.f @@ -1,4 +1,4 @@ -*> \brief \b DLASCL2 +*> \brief \b DLASCL2 performs diagonal scaling on a vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasd0.f b/SRC/dlasd0.f index e5cc456d..f0df712d 100644 --- a/SRC/dlasd0.f +++ b/SRC/dlasd0.f @@ -1,4 +1,4 @@ -*> \brief \b DLASD0 +*> \brief \b DLASD0 computes the singular values of a real upper bidiagonal n-by-m matrix B with diagonal d and off-diagonal e. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasd1.f b/SRC/dlasd1.f index 305ed7c1..027dffa9 100644 --- a/SRC/dlasd1.f +++ b/SRC/dlasd1.f @@ -1,4 +1,4 @@ -*> \brief \b DLASD1 +*> \brief \b DLASD1 computes the SVD of an upper bidiagonal matrix B of the specified size. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasd2.f b/SRC/dlasd2.f index 1c2da364..bb1b3d84 100644 --- a/SRC/dlasd2.f +++ b/SRC/dlasd2.f @@ -1,4 +1,4 @@ -*> \brief \b DLASD2 +*> \brief \b DLASD2 merges the two sets of singular values together into a single sorted set. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasd3.f b/SRC/dlasd3.f index d12d345d..6d2bd584 100644 --- a/SRC/dlasd3.f +++ b/SRC/dlasd3.f @@ -1,4 +1,4 @@ -*> \brief \b DLASD3 +*> \brief \b DLASD3 finds all square roots of the roots of the secular equation, as defined by the values in D and Z, and then updates the singular vectors by matrix multiplication. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasd4.f b/SRC/dlasd4.f index f3420115..47b26f34 100644 --- a/SRC/dlasd4.f +++ b/SRC/dlasd4.f @@ -1,4 +1,4 @@ -*> \brief \b DLASD4 +*> \brief \b DLASD4 computes the square root of the i-th updated eigenvalue of a positive symmetric rank-one modification to a positive diagonal matrix. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasd5.f b/SRC/dlasd5.f index de74420d..c8158d80 100644 --- a/SRC/dlasd5.f +++ b/SRC/dlasd5.f @@ -1,4 +1,4 @@ -*> \brief \b DLASD5 +*> \brief \b DLASD5 computes the square root of the i-th eigenvalue of a positive symmetric rank-one modification of a 2-by-2 diagonal matrix. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasd6.f b/SRC/dlasd6.f index 4e0b6dec..e4072969 100644 --- a/SRC/dlasd6.f +++ b/SRC/dlasd6.f @@ -1,4 +1,4 @@ -*> \brief \b DLASD6 +*> \brief \b DLASD6 computes the SVD of an updated upper bidiagonal matrix obtained by merging two smaller ones by appending a row. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasd7.f b/SRC/dlasd7.f index d7b4bebf..462c2c7d 100644 --- a/SRC/dlasd7.f +++ b/SRC/dlasd7.f @@ -1,4 +1,4 @@ -*> \brief \b DLASD7 +*> \brief \b DLASD7 merges the two sets of singular values together into a single sorted set. Then it tries to deflate the size of the problem. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasd8.f b/SRC/dlasd8.f index 77b5507f..c1d37fb0 100644 --- a/SRC/dlasd8.f +++ b/SRC/dlasd8.f @@ -1,4 +1,4 @@ -*> \brief \b DLASD8 +*> \brief \b DLASD8 finds the square roots of the roots of the secular equation, and stores, for each element in D, the distance to its two nearest poles. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasda.f b/SRC/dlasda.f index 60449b12..5dd7bd23 100644 --- a/SRC/dlasda.f +++ b/SRC/dlasda.f @@ -1,4 +1,4 @@ -*> \brief \b DLASDA +*> \brief \b DLASDA computes the singular value decomposition (SVD) of a real upper bidiagonal matrix with diagonal d and off-diagonal e. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasdq.f b/SRC/dlasdq.f index ae2147d9..a3b527a6 100644 --- a/SRC/dlasdq.f +++ b/SRC/dlasdq.f @@ -1,4 +1,4 @@ -*> \brief \b DLASDQ +*> \brief \b DLASDQ computes the SVD of a real bidiagonal matrix with diagonal d and off-diagonal e. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasdt.f b/SRC/dlasdt.f index f9d65843..a63ef0af 100644 --- a/SRC/dlasdt.f +++ b/SRC/dlasdt.f @@ -1,4 +1,4 @@ -*> \brief \b DLASDT +*> \brief \b DLASDT creates a tree of subproblems for bidiagonal divide and conquer. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaset.f b/SRC/dlaset.f index 166a8da9..21eff81b 100644 --- a/SRC/dlaset.f +++ b/SRC/dlaset.f @@ -1,4 +1,4 @@ -*> \brief \b DLASET +*> \brief \b DLASET initializes the off-diagonal elements and the diagonal elements of a matrix to given values. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasq1.f b/SRC/dlasq1.f index af70675a..e67c0ba0 100644 --- a/SRC/dlasq1.f +++ b/SRC/dlasq1.f @@ -1,4 +1,4 @@ -*> \brief \b DLASQ1 +*> \brief \b DLASQ1 computes the singular values of a real square bidiagonal matrix. Used by sbdsqr. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasq2.f b/SRC/dlasq2.f index 94feaba7..43b57344 100644 --- a/SRC/dlasq2.f +++ b/SRC/dlasq2.f @@ -1,4 +1,4 @@ -*> \brief \b DLASQ2 +*> \brief \b DLASQ2 computes all the eigenvalues of the symmetric positive definite tridiagonal matrix associated with the qd Array Z to high relative accuracy. Used by sbdsqr and sstegr. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasq3.f b/SRC/dlasq3.f index 731a1c5f..a3af4ff4 100644 --- a/SRC/dlasq3.f +++ b/SRC/dlasq3.f @@ -1,4 +1,4 @@ -*> \brief \b DLASQ3 +*> \brief \b DLASQ3 checks for deflation, computes a shift and calls dqds. Used by sbdsqr. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasq4.f b/SRC/dlasq4.f index dc6fb719..ae3624e1 100644 --- a/SRC/dlasq4.f +++ b/SRC/dlasq4.f @@ -1,4 +1,4 @@ -*> \brief \b DLASQ4 +*> \brief \b DLASQ4 computes an approximation to the smallest eigenvalue using values of d from the previous transform. Used by sbdsqr. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasq5.f b/SRC/dlasq5.f index 3724419b..7faaca99 100644 --- a/SRC/dlasq5.f +++ b/SRC/dlasq5.f @@ -1,4 +1,4 @@ -*> \brief \b DLASQ5 +*> \brief \b DLASQ5 computes one dqds transform in ping-pong form. Used by sbdsqr and sstegr. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasq6.f b/SRC/dlasq6.f index e069fa6f..6cdb945e 100644 --- a/SRC/dlasq6.f +++ b/SRC/dlasq6.f @@ -1,4 +1,4 @@ -*> \brief \b DLASQ6 +*> \brief \b DLASQ6 computes one dqd transform in ping-pong form. Used by sbdsqr and sstegr. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasr.f b/SRC/dlasr.f index bbe6217d..0c8ad684 100644 --- a/SRC/dlasr.f +++ b/SRC/dlasr.f @@ -1,4 +1,4 @@ -*> \brief \b DLASR +*> \brief \b DLASR applies a sequence of plane rotations to a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasrt.f b/SRC/dlasrt.f index fe8f526a..a7221617 100644 --- a/SRC/dlasrt.f +++ b/SRC/dlasrt.f @@ -1,4 +1,4 @@ -*> \brief \b DLASRT +*> \brief \b DLASRT sorts numbers in increasing or decreasing order. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlassq.f b/SRC/dlassq.f index 51d5a22d..db5b5946 100644 --- a/SRC/dlassq.f +++ b/SRC/dlassq.f @@ -1,4 +1,4 @@ -*> \brief \b DLASSQ +*> \brief \b DLASSQ updates a sum of squares represented in scaled form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasv2.f b/SRC/dlasv2.f index bf76ac27..9dc3bcda 100644 --- a/SRC/dlasv2.f +++ b/SRC/dlasv2.f @@ -1,4 +1,4 @@ -*> \brief \b DLASV2 +*> \brief \b DLASV2 computes the singular value decomposition of a 2-by-2 triangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlaswp.f b/SRC/dlaswp.f index ff0d1b04..0f41f4c1 100644 --- a/SRC/dlaswp.f +++ b/SRC/dlaswp.f @@ -1,4 +1,4 @@ -*> \brief \b DLASWP +*> \brief \b DLASWP performs a series of row interchanges on a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasy2.f b/SRC/dlasy2.f index 33b53330..e9957da0 100644 --- a/SRC/dlasy2.f +++ b/SRC/dlasy2.f @@ -1,4 +1,4 @@ -*> \brief \b DLASY2 +*> \brief \b DLASY2 solves the Sylvester matrix equation where the matrices are of order 1 or 2. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlasyf.f b/SRC/dlasyf.f index 35c7ba64..ce130444 100644 --- a/SRC/dlasyf.f +++ b/SRC/dlasyf.f @@ -1,4 +1,4 @@ -*> \brief \b DLASYF +*> \brief \b DLASYF computes a partial factorization of a real symmetric matrix, using the diagonal pivoting method. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlat2s.f b/SRC/dlat2s.f index 263f9187..038c47e0 100644 --- a/SRC/dlat2s.f +++ b/SRC/dlat2s.f @@ -1,4 +1,4 @@ -*> \brief \b DLAT2S +*> \brief \b DLAT2S converts a double-precision triangular matrix to a single-precision triangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlatbs.f b/SRC/dlatbs.f index d3fd23d3..09a3bf81 100644 --- a/SRC/dlatbs.f +++ b/SRC/dlatbs.f @@ -1,4 +1,4 @@ -*> \brief \b DLATBS +*> \brief \b DLATBS solves a triangular banded system of equations. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlatdf.f b/SRC/dlatdf.f index ee128e1e..76534ce8 100644 --- a/SRC/dlatdf.f +++ b/SRC/dlatdf.f @@ -1,4 +1,4 @@ -*> \brief \b DLATDF +*> \brief \b DLATDF uses the LU factorization of the n-by-n matrix computed by sgetc2 and computes a contribution to the reciprocal Dif-estimate. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlatps.f b/SRC/dlatps.f index 3ff10e9a..e4ca57bb 100644 --- a/SRC/dlatps.f +++ b/SRC/dlatps.f @@ -1,4 +1,4 @@ -*> \brief \b DLATPS +*> \brief \b DLATPS solves a triangular system of equations with the matrix held in packed storage. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlatrd.f b/SRC/dlatrd.f index b7517460..331c9884 100644 --- a/SRC/dlatrd.f +++ b/SRC/dlatrd.f @@ -1,4 +1,4 @@ -*> \brief \b DLATRD +*> \brief \b DLATRD reduces the first nb rows and columns of a symmetric/Hermitian matrix A to real tridiagonal form by an orthogonal similarity transformation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlatrs.f b/SRC/dlatrs.f index 8ed76e31..bc693b94 100644 --- a/SRC/dlatrs.f +++ b/SRC/dlatrs.f @@ -1,4 +1,4 @@ -*> \brief \b DLATRS +*> \brief \b DLATRS solves a triangular system of equations with the scale factor set to prevent overflow. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlatrz.f b/SRC/dlatrz.f index b036310f..4bd59f95 100644 --- a/SRC/dlatrz.f +++ b/SRC/dlatrz.f @@ -1,4 +1,4 @@ -*> \brief \b DLATRZ +*> \brief \b DLATRZ factors an upper trapezoidal matrix by means of orthogonal transformations. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlauu2.f b/SRC/dlauu2.f index a6f32b7a..ce8d2d7b 100644 --- a/SRC/dlauu2.f +++ b/SRC/dlauu2.f @@ -1,4 +1,4 @@ -*> \brief \b DLAUU2 +*> \brief \b DLAUU2 computes the product UUH or LHL, where U and L are upper or lower triangular matrices (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dlauum.f b/SRC/dlauum.f index ae862fe9..2f49e537 100644 --- a/SRC/dlauum.f +++ b/SRC/dlauum.f @@ -1,4 +1,4 @@ -*> \brief \b DLAUUM +*> \brief \b DLAUUM computes the product UUH or LHL, where U and L are upper or lower triangular matrices (blocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dorg2l.f b/SRC/dorg2l.f index 20a3b6de..35d90df1 100644 --- a/SRC/dorg2l.f +++ b/SRC/dorg2l.f @@ -1,4 +1,4 @@ -*> \brief \b DORG2L +*> \brief \b DORG2L generates all or part of the orthogonal matrix Q from a QL factorization determined by sgeqlf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dorg2r.f b/SRC/dorg2r.f index 4f384428..84d5d99f 100644 --- a/SRC/dorg2r.f +++ b/SRC/dorg2r.f @@ -1,4 +1,4 @@ -*> \brief \b DORG2R +*> \brief \b DORG2R generates all or part of the orthogonal matrix Q from a QR factorization determined by sgeqrf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dorgr2.f b/SRC/dorgr2.f index b57904c7..cf4a0b8c 100644 --- a/SRC/dorgr2.f +++ b/SRC/dorgr2.f @@ -1,4 +1,4 @@ -*> \brief \b DORGR2 +*> \brief \b DORGR2 generates all or part of the orthogonal matrix Q from an RQ factorization determined by sgerqf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dorm2l.f b/SRC/dorm2l.f index f9a6a901..bd509007 100644 --- a/SRC/dorm2l.f +++ b/SRC/dorm2l.f @@ -1,4 +1,4 @@ -*> \brief \b DORM2L +*> \brief \b DORM2L multiplies a general matrix by the orthogonal matrix from a QL factorization determined by sgeqlf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dorm2r.f b/SRC/dorm2r.f index 5a059354..358c7062 100644 --- a/SRC/dorm2r.f +++ b/SRC/dorm2r.f @@ -1,4 +1,4 @@ -*> \brief \b DORM2R +*> \brief \b DORM2R multiplies a general matrix by the orthogonal matrix from a QR factorization determined by sgeqrf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dorml2.f b/SRC/dorml2.f index fe85dc3a..bcbd0903 100644 --- a/SRC/dorml2.f +++ b/SRC/dorml2.f @@ -1,4 +1,4 @@ -*> \brief \b DORML2 +*> \brief \b DORML2 multiplies a general matrix by the orthogonal matrix from a LQ factorization determined by sgelqf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dormr2.f b/SRC/dormr2.f index 7eb3279c..d35ee4b9 100644 --- a/SRC/dormr2.f +++ b/SRC/dormr2.f @@ -1,4 +1,4 @@ -*> \brief \b DORMR2 +*> \brief \b DORMR2 multiplies a general matrix by the orthogonal matrix from a RQ factorization determined by sgerqf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dormr3.f b/SRC/dormr3.f index cc3cdb01..d447a8bf 100644 --- a/SRC/dormr3.f +++ b/SRC/dormr3.f @@ -1,4 +1,4 @@ -*> \brief \b DORMR3 +*> \brief \b DORMR3 multiplies a general matrix by the orthogonal matrix from a RZ factorization determined by stzrzf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dpbtf2.f b/SRC/dpbtf2.f index 1e8c3f37..a02695b9 100644 --- a/SRC/dpbtf2.f +++ b/SRC/dpbtf2.f @@ -1,4 +1,4 @@ -*> \brief \b DPBTF2 +*> \brief \b DPBTF2 computes the Cholesky factorization of a symmetric/Hermitian positive definite band matrix (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dpotf2.f b/SRC/dpotf2.f index 798522bb..2cd3b043 100644 --- a/SRC/dpotf2.f +++ b/SRC/dpotf2.f @@ -1,4 +1,4 @@ -*> \brief \b DPOTF2 +*> \brief \b DPOTF2 computes the Cholesky factorization of a symmetric/Hermitian positive definite matrix (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dpstf2.f b/SRC/dpstf2.f index 79f31ba6..e20cca4d 100644 --- a/SRC/dpstf2.f +++ b/SRC/dpstf2.f @@ -1,4 +1,4 @@ -*> \brief \b DPSTF2 +*> \brief \b DPSTF2 computes the Cholesky factorization with complete pivoting of a real symmetric or complex Hermitian positive semi-definite matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dptts2.f b/SRC/dptts2.f index 2bacaf51..5d1b6128 100644 --- a/SRC/dptts2.f +++ b/SRC/dptts2.f @@ -1,4 +1,4 @@ -*> \brief \b DPTTS2 +*> \brief \b DPTTS2 solves a tridiagonal system of the form AX=B using the L D LH factorization computed by spttrf. * * =========== DOCUMENTATION =========== * diff --git a/SRC/drscl.f b/SRC/drscl.f index d850da05..008605a0 100644 --- a/SRC/drscl.f +++ b/SRC/drscl.f @@ -1,4 +1,4 @@ -*> \brief \b DRSCL +*> \brief \b DRSCL multiplies a vector by the reciprocal of a real scalar. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dsfrk.f b/SRC/dsfrk.f index 22ac5fd1..3d6b3074 100644 --- a/SRC/dsfrk.f +++ b/SRC/dsfrk.f @@ -1,4 +1,4 @@ -*> \brief \b DSFRK +*> \brief \b DSFRK performs a symmetric rank-k operation for matrix in RFP format. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dsygs2.f b/SRC/dsygs2.f index f97142fe..c82dfbac 100644 --- a/SRC/dsygs2.f +++ b/SRC/dsygs2.f @@ -1,4 +1,4 @@ -*> \brief \b DSYGS2 +*> \brief \b DSYGS2 reduces a symmetric definite generalized eigenproblem to standard form, using the factorization results obtained from spotrf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dsyswapr.f b/SRC/dsyswapr.f index d7eb4761..4763a50a 100644 --- a/SRC/dsyswapr.f +++ b/SRC/dsyswapr.f @@ -1,4 +1,4 @@ -*> \brief \b DSYSWAPR +*> \brief \b DSYSWAPR applies an elementary permutation on the rows and columns of a symmetric matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dsytd2.f b/SRC/dsytd2.f index a0e56649..de9e3e92 100644 --- a/SRC/dsytd2.f +++ b/SRC/dsytd2.f @@ -1,4 +1,4 @@ -*> \brief \b DSYTD2 +*> \brief \b DSYTD2 reduces a symmetric matrix to real symmetric tridiagonal form by an orthogonal similarity transformation (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dsytf2.f b/SRC/dsytf2.f index fadab7c3..2bc0300d 100644 --- a/SRC/dsytf2.f +++ b/SRC/dsytf2.f @@ -1,4 +1,4 @@ -*> \brief \b DSYTF2 +*> \brief \b DSYTF2 computes the factorization of a real symmetric indefinite matrix, using the diagonal pivoting method (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dtfsm.f b/SRC/dtfsm.f index 67c54f2d..8148f480 100644 --- a/SRC/dtfsm.f +++ b/SRC/dtfsm.f @@ -1,4 +1,4 @@ -*> \brief \b DTFSM +*> \brief \b DTFSM solves a matrix equation (one operand is a triangular matrix in RFP format). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dtfttp.f b/SRC/dtfttp.f index a8cfcc3c..67432b62 100644 --- a/SRC/dtfttp.f +++ b/SRC/dtfttp.f @@ -1,4 +1,4 @@ -*> \brief \b DTFTTP +*> \brief \b DTFTTP copies a triangular matrix from the rectangular full packed format (TF) to the standard packed format (TP). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dtfttr.f b/SRC/dtfttr.f index 458a9493..2f7f8f61 100644 --- a/SRC/dtfttr.f +++ b/SRC/dtfttr.f @@ -1,4 +1,4 @@ -*> \brief \b DTFTTR +*> \brief \b DTFTTR copies a triangular matrix from the rectangular full packed format (TF) to the standard full format (TR). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dtgex2.f b/SRC/dtgex2.f index 43399089..2f578c14 100644 --- a/SRC/dtgex2.f +++ b/SRC/dtgex2.f @@ -1,4 +1,4 @@ -*> \brief \b DTGEX2 +*> \brief \b DTGEX2 swaps adjacent diagonal blocks in an upper (quasi) triangular matrix pair by an orthogonal equivalence transformation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dtgsy2.f b/SRC/dtgsy2.f index 9ccc9e43..d5a4786f 100644 --- a/SRC/dtgsy2.f +++ b/SRC/dtgsy2.f @@ -1,4 +1,4 @@ -*> \brief \b DTGSY2 +*> \brief \b DTGSY2 solves the generalized Sylvester equation (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dtpqrt2.f b/SRC/dtpqrt2.f index a8793711..812a867c 100644 --- a/SRC/dtpqrt2.f +++ b/SRC/dtpqrt2.f @@ -1,4 +1,4 @@ -*> \brief \b DTPQRT2 +*> \brief \b DTPQRT2 computes a QR factorization of a real or complex "triangular-pentagonal" matrix, which is composed of a triangular block and a pentagonal block, using the compact WY representation for Q. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dtprfb.f b/SRC/dtprfb.f index 7796375f..c9bf6121 100644 --- a/SRC/dtprfb.f +++ b/SRC/dtprfb.f @@ -1,4 +1,4 @@ -*> \brief \b DTPRFB +*> \brief \b DTPRFB applies a real or complex "triangular-pentagonal" blocked reflector to a real or complex matrix, which is composed of two blocks. * * =========== DOCUMENTATION =========== * diff --git a/SRC/dtpttf.f b/SRC/dtpttf.f index e48e3414..1a40a3bc 100644 --- a/SRC/dtpttf.f +++ b/SRC/dtpttf.f @@ -1,4 +1,4 @@ -*> \brief \b DTPTTF +*> \brief \b DTPTTF copies a triangular matrix from the standard packed format (TP) to the rectangular full packed format (TF). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dtpttr.f b/SRC/dtpttr.f index 152621ad..43e8e88d 100644 --- a/SRC/dtpttr.f +++ b/SRC/dtpttr.f @@ -1,4 +1,4 @@ -*> \brief \b DTPTTR +*> \brief \b DTPTTR copies a triangular matrix from the standard packed format (TP) to the standard full format (TR). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dtrti2.f b/SRC/dtrti2.f index bc5a388d..e40c9131 100644 --- a/SRC/dtrti2.f +++ b/SRC/dtrti2.f @@ -1,4 +1,4 @@ -*> \brief \b DTRTI2 +*> \brief \b DTRTI2 computes the inverse of a triangular matrix (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dtrttf.f b/SRC/dtrttf.f index 992be1c2..a3f2a886 100644 --- a/SRC/dtrttf.f +++ b/SRC/dtrttf.f @@ -1,4 +1,4 @@ -*> \brief \b DTRTTF +*> \brief \b DTRTTF copies a triangular matrix from the standard full format (TR) to the rectangular full packed format (TF). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dtrttp.f b/SRC/dtrttp.f index 14a90455..5665b75b 100644 --- a/SRC/dtrttp.f +++ b/SRC/dtrttp.f @@ -1,4 +1,4 @@ -*> \brief \b DTRTTP +*> \brief \b DTRTTP copies a triangular matrix from the standard full format (TR) to the standard packed format (TP). * * =========== DOCUMENTATION =========== * diff --git a/SRC/dzsum1.f b/SRC/dzsum1.f index adb2e705..77de383d 100644 --- a/SRC/dzsum1.f +++ b/SRC/dzsum1.f @@ -1,4 +1,4 @@ -*> \brief \b DZSUM1 +*> \brief \b DZSUM1 forms the 1-norm of the complex vector using the true absolute value. * * =========== DOCUMENTATION =========== * diff --git a/SRC/icmax1.f b/SRC/icmax1.f index ffc80c82..c9c0c270 100644 --- a/SRC/icmax1.f +++ b/SRC/icmax1.f @@ -1,4 +1,4 @@ -*> \brief \b ICMAX1 +*> \brief \b ICMAX1 finds the index of the vector element whose real part has maximum absolute value. * * =========== DOCUMENTATION =========== * diff --git a/SRC/ilaclc.f b/SRC/ilaclc.f index 4ceb61c5..72e783e3 100644 --- a/SRC/ilaclc.f +++ b/SRC/ilaclc.f @@ -1,4 +1,4 @@ -*> \brief \b ILACLC +*> \brief \b ILACLC scans a matrix for its last non-zero column. * * =========== DOCUMENTATION =========== * diff --git a/SRC/ilaclr.f b/SRC/ilaclr.f index d8ab09c5..eb4a29b9 100644 --- a/SRC/ilaclr.f +++ b/SRC/ilaclr.f @@ -1,4 +1,4 @@ -*> \brief \b ILACLR +*> \brief \b ILACLR scans a matrix for its last non-zero row. * * =========== DOCUMENTATION =========== * diff --git a/SRC/iladlc.f b/SRC/iladlc.f index f84bd833..1d5f4954 100644 --- a/SRC/iladlc.f +++ b/SRC/iladlc.f @@ -1,4 +1,4 @@ -*> \brief \b ILADLC +*> \brief \b ILADLC scans a matrix for its last non-zero column. * * =========== DOCUMENTATION =========== * diff --git a/SRC/iladlr.f b/SRC/iladlr.f index 2114c616..630483f8 100644 --- a/SRC/iladlr.f +++ b/SRC/iladlr.f @@ -1,4 +1,4 @@ -*> \brief \b ILADLR +*> \brief \b ILADLR scans a matrix for its last non-zero row. * * =========== DOCUMENTATION =========== * diff --git a/SRC/ilaslc.f b/SRC/ilaslc.f index e3db0f4a..f61fc043 100644 --- a/SRC/ilaslc.f +++ b/SRC/ilaslc.f @@ -1,4 +1,4 @@ -*> \brief \b ILASLC +*> \brief \b ILASLC scans a matrix for its last non-zero column. * * =========== DOCUMENTATION =========== * diff --git a/SRC/ilaslr.f b/SRC/ilaslr.f index 48b73f44..5efa7211 100644 --- a/SRC/ilaslr.f +++ b/SRC/ilaslr.f @@ -1,4 +1,4 @@ -*> \brief \b ILASLR +*> \brief \b ILASLR scans a matrix for its last non-zero row. * * =========== DOCUMENTATION =========== * diff --git a/SRC/ilazlc.f b/SRC/ilazlc.f index 15b14902..457c5aa6 100644 --- a/SRC/ilazlc.f +++ b/SRC/ilazlc.f @@ -1,4 +1,4 @@ -*> \brief \b ILAZLC +*> \brief \b ILAZLC scans a matrix for its last non-zero column. * * =========== DOCUMENTATION =========== * diff --git a/SRC/ilazlr.f b/SRC/ilazlr.f index b2ab943c..69c96df2 100644 --- a/SRC/ilazlr.f +++ b/SRC/ilazlr.f @@ -1,4 +1,4 @@ -*> \brief \b ILAZLR +*> \brief \b ILAZLR scans a matrix for its last non-zero row. * * =========== DOCUMENTATION =========== * diff --git a/SRC/izmax1.f b/SRC/izmax1.f index a156c923..29efdd70 100644 --- a/SRC/izmax1.f +++ b/SRC/izmax1.f @@ -1,4 +1,4 @@ -*> \brief \b IZMAX1 +*> \brief \b IZMAX1 finds the index of the vector element whose real part has maximum absolute value. * * =========== DOCUMENTATION =========== * diff --git a/SRC/scsum1.f b/SRC/scsum1.f index 42ee9a17..6599821f 100644 --- a/SRC/scsum1.f +++ b/SRC/scsum1.f @@ -1,4 +1,4 @@ -*> \brief \b SCSUM1 +*> \brief \b SCSUM1 forms the 1-norm of the complex vector using the true absolute value. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sgbtf2.f b/SRC/sgbtf2.f index 337abd41..7428b490 100644 --- a/SRC/sgbtf2.f +++ b/SRC/sgbtf2.f @@ -1,4 +1,4 @@ -*> \brief \b SGBTF2 +*> \brief \b SGBTF2 computes the LU factorization of a general band matrix using the unblocked version of the algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sgebd2.f b/SRC/sgebd2.f index f5928eed..0bb771e7 100644 --- a/SRC/sgebd2.f +++ b/SRC/sgebd2.f @@ -1,4 +1,4 @@ -*> \brief \b SGEBD2 +*> \brief \b SGEBD2 reduces a general matrix to bidiagonal form using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sgehd2.f b/SRC/sgehd2.f index 89996b3e..4976c78c 100644 --- a/SRC/sgehd2.f +++ b/SRC/sgehd2.f @@ -1,4 +1,4 @@ -*> \brief \b SGEHD2 +*> \brief \b SGEHD2 reduces a general square matrix to upper Hessenberg form using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sgelq2.f b/SRC/sgelq2.f index 1f8c2cc2..010a2562 100644 --- a/SRC/sgelq2.f +++ b/SRC/sgelq2.f @@ -1,4 +1,4 @@ -*> \brief \b SGELQ2 +*> \brief \b SGELQ2 computes the LQ factorization of a general rectangular matrix using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sgeql2.f b/SRC/sgeql2.f index d1d59a10..cb0a5ba5 100644 --- a/SRC/sgeql2.f +++ b/SRC/sgeql2.f @@ -1,4 +1,4 @@ -*> \brief \b SGEQL2 +*> \brief \b SGEQL2 computes the QL factorization of a general rectangular matrix using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sgeqp3.f b/SRC/sgeqp3.f index 4f72bfa9..bd120b7a 100644 --- a/SRC/sgeqp3.f +++ b/SRC/sgeqp3.f @@ -137,7 +137,7 @@ *> *> H(i) = I - tau * v * v**T *> -*> where tau is a real/complex scalar, and v is a real/complex vector +*> where tau is a real scalar, and v is a real/complex vector *> with v(1:i-1) = 0 and v(i) = 1; v(i+1:m) is stored on exit in *> A(i+1:m,i), and tau in TAU(i). *> \endverbatim diff --git a/SRC/sgeqr2.f b/SRC/sgeqr2.f index 6a6c9eea..b4957c20 100644 --- a/SRC/sgeqr2.f +++ b/SRC/sgeqr2.f @@ -1,4 +1,4 @@ -*> \brief \b SGEQR2 +*> \brief \b SGEQR2 computes the QR factorization of a general rectangular matrix using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sgeqr2p.f b/SRC/sgeqr2p.f index 50371dd3..73ea4cc2 100644 --- a/SRC/sgeqr2p.f +++ b/SRC/sgeqr2p.f @@ -1,4 +1,4 @@ -*> \brief \b SGEQR2P +*> \brief \b SGEQR2P computes the QR factorization of a general rectangular matrix with non-negative diagonal elements using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sgeqrt2.f b/SRC/sgeqrt2.f index 8175013f..be39d0d2 100644 --- a/SRC/sgeqrt2.f +++ b/SRC/sgeqrt2.f @@ -1,4 +1,4 @@ -*> \brief \b SGEQRT2 +*> \brief \b SGEQRT2 computes a QR factorization of a general real or complex matrix using the compact WY representation of Q. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sgeqrt3.f b/SRC/sgeqrt3.f index 83b2cc29..4ecdad7e 100644 --- a/SRC/sgeqrt3.f +++ b/SRC/sgeqrt3.f @@ -1,4 +1,4 @@ -*> \brief \b SGEQRT3 +*> \brief \b SGEQRT3 recursively computes a QR factorization of a general real or complex matrix using the compact WY representation of Q. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sgerq2.f b/SRC/sgerq2.f index 2eaaea24..a1c954c6 100644 --- a/SRC/sgerq2.f +++ b/SRC/sgerq2.f @@ -1,4 +1,4 @@ -*> \brief \b SGERQ2 +*> \brief \b SGERQ2 computes the RQ factorization of a general rectangular matrix using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sgesc2.f b/SRC/sgesc2.f index 080f0fba..fbaa7413 100644 --- a/SRC/sgesc2.f +++ b/SRC/sgesc2.f @@ -1,4 +1,4 @@ -*> \brief \b SGESC2 +*> \brief \b SGESC2 solves a system of linear equations using the LU factorization with complete pivoting computed by sgetc2. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sgetc2.f b/SRC/sgetc2.f index 9d4a3760..c6347f41 100644 --- a/SRC/sgetc2.f +++ b/SRC/sgetc2.f @@ -1,4 +1,4 @@ -*> \brief \b SGETC2 +*> \brief \b SGETC2 computes the LU factorization with complete pivoting of the general n-by-n matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sgetf2.f b/SRC/sgetf2.f index 0cab948b..74ba6cd6 100644 --- a/SRC/sgetf2.f +++ b/SRC/sgetf2.f @@ -1,4 +1,4 @@ -*> \brief \b SGETF2 +*> \brief \b SGETF2 computes the LU factorization of a general m-by-n matrix using partial pivoting with row interchanges (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/sgsvj0.f b/SRC/sgsvj0.f index 087bc7fe..7032065c 100644 --- a/SRC/sgsvj0.f +++ b/SRC/sgsvj0.f @@ -1,4 +1,4 @@ -*> \brief \b SGSVJ0 +*> \brief \b SGSVJ0 pre-processor for the routine sgesvj. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sgsvj1.f b/SRC/sgsvj1.f index 1fca6ff7..0b9102ef 100644 --- a/SRC/sgsvj1.f +++ b/SRC/sgsvj1.f @@ -1,4 +1,4 @@ -*> \brief \b SGSVJ1 +*> \brief \b SGSVJ1 pre-processor for the routine sgesvj, applies Jacobi rotations targeting only particular pivots. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sgtts2.f b/SRC/sgtts2.f index 87ca8461..f50d2ccb 100644 --- a/SRC/sgtts2.f +++ b/SRC/sgtts2.f @@ -1,4 +1,4 @@ -*> \brief \b SGTTS2 +*> \brief \b SGTTS2 solves a system of linear equations with a tridiagonal matrix using the LU factorization computed by sgttrf. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sisnan.f b/SRC/sisnan.f index 31e10012..3f8b7ec9 100644 --- a/SRC/sisnan.f +++ b/SRC/sisnan.f @@ -1,4 +1,4 @@ -*> \brief \b SISNAN +*> \brief \b SISNAN tests input for NaN. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sla_gbamv.f b/SRC/sla_gbamv.f index da60d97a..950151f1 100644 --- a/SRC/sla_gbamv.f +++ b/SRC/sla_gbamv.f @@ -1,4 +1,4 @@ -*> \brief \b SLA_GBAMV +*> \brief \b SLA_GBAMV performs a matrix-vector operation to calculate error bounds. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sla_gbrcond.f b/SRC/sla_gbrcond.f index e7bbf72e..08521f2d 100644 --- a/SRC/sla_gbrcond.f +++ b/SRC/sla_gbrcond.f @@ -1,4 +1,4 @@ -*> \brief \b SLA_GBRCOND +*> \brief \b SLA_GBRCOND estimates the Skeel condition number for a general banded matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sla_gbrfsx_extended.f b/SRC/sla_gbrfsx_extended.f index 4e56afa1..f3b95b96 100644 --- a/SRC/sla_gbrfsx_extended.f +++ b/SRC/sla_gbrfsx_extended.f @@ -1,4 +1,4 @@ -*> \brief \b SLA_GBRFSX_EXTENDED +*> \brief \b SLA_GBRFSX_EXTENDED improves the computed solution to a system of linear equations for general banded matrices by performing extra-precise iterative refinement and provides error bounds and backward error estimates for the solution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sla_gbrpvgrw.f b/SRC/sla_gbrpvgrw.f index a8dfa9dd..11964dd0 100644 --- a/SRC/sla_gbrpvgrw.f +++ b/SRC/sla_gbrpvgrw.f @@ -1,4 +1,4 @@ -*> \brief \b SLA_GBRPVGRW +*> \brief \b SLA_GBRPVGRW computes the reciprocal pivot growth factor norm(A)/norm(U) for a general banded matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sla_geamv.f b/SRC/sla_geamv.f index 0cc352ca..3887ceb3 100644 --- a/SRC/sla_geamv.f +++ b/SRC/sla_geamv.f @@ -1,4 +1,4 @@ -*> \brief \b SLA_GEAMV +*> \brief \b SLA_GEAMV computes a matrix-vector product using a general matrix to calculate error bounds. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sla_gercond.f b/SRC/sla_gercond.f index 04217db5..f6f1e580 100644 --- a/SRC/sla_gercond.f +++ b/SRC/sla_gercond.f @@ -1,4 +1,4 @@ -*> \brief \b SLA_GERCOND +*> \brief \b SLA_GERCOND estimates the Skeel condition number for a general matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sla_gerfsx_extended.f b/SRC/sla_gerfsx_extended.f index e2b487c8..bd508bb3 100644 --- a/SRC/sla_gerfsx_extended.f +++ b/SRC/sla_gerfsx_extended.f @@ -1,4 +1,4 @@ -*> \brief \b SLA_GERFSX_EXTENDED +*> \brief \b SLA_GERFSX_EXTENDED improves the computed solution to a system of linear equations for general matrices by performing extra-precise iterative refinement and provides error bounds and backward error estimates for the solution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sla_lin_berr.f b/SRC/sla_lin_berr.f index c805d930..d4e2033e 100644 --- a/SRC/sla_lin_berr.f +++ b/SRC/sla_lin_berr.f @@ -1,4 +1,4 @@ -*> \brief \b SLA_LIN_BERR +*> \brief \b SLA_LIN_BERR computes a component-wise relative backward error. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sla_porcond.f b/SRC/sla_porcond.f index 40605e3e..ec3ff156 100644 --- a/SRC/sla_porcond.f +++ b/SRC/sla_porcond.f @@ -1,4 +1,4 @@ -*> \brief \b SLA_PORCOND +*> \brief \b SLA_PORCOND estimates the Skeel condition number for a symmetric positive-definite matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sla_porfsx_extended.f b/SRC/sla_porfsx_extended.f index fcaf08c4..aad7f119 100644 --- a/SRC/sla_porfsx_extended.f +++ b/SRC/sla_porfsx_extended.f @@ -1,4 +1,4 @@ -*> \brief \b SLA_PORFSX_EXTENDED +*> \brief \b SLA_PORFSX_EXTENDED improves the computed solution to a system of linear equations for symmetric or Hermitian positive-definite matrices by performing extra-precise iterative refinement and provides error bounds and backward error estimates for the solution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sla_porpvgrw.f b/SRC/sla_porpvgrw.f index 6cfa3a88..fde7f0ca 100644 --- a/SRC/sla_porpvgrw.f +++ b/SRC/sla_porpvgrw.f @@ -1,4 +1,4 @@ -*> \brief \b SLA_PORPVGRW +*> \brief \b SLA_PORPVGRW computes the reciprocal pivot growth factor norm(A)/norm(U) for a symmetric or Hermitian positive-definite matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sla_syamv.f b/SRC/sla_syamv.f index 45c03bb3..8aa0a53c 100644 --- a/SRC/sla_syamv.f +++ b/SRC/sla_syamv.f @@ -1,4 +1,4 @@ -*> \brief \b SLA_SYAMV +*> \brief \b SLA_SYAMV computes a matrix-vector product using a symmetric indefinite matrix to calculate error bounds. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sla_syrcond.f b/SRC/sla_syrcond.f index 20fa2de9..33d10c72 100644 --- a/SRC/sla_syrcond.f +++ b/SRC/sla_syrcond.f @@ -1,4 +1,4 @@ -*> \brief \b SLA_SYRCOND +*> \brief \b SLA_SYRCOND estimates the Skeel condition number for a symmetric indefinite matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sla_syrfsx_extended.f b/SRC/sla_syrfsx_extended.f index f8ae0d94..1fe3592f 100644 --- a/SRC/sla_syrfsx_extended.f +++ b/SRC/sla_syrfsx_extended.f @@ -1,4 +1,4 @@ -*> \brief \b SLA_SYRFSX_EXTENDED +*> \brief \b SLA_SYRFSX_EXTENDED improves the computed solution to a system of linear equations for symmetric indefinite matrices by performing extra-precise iterative refinement and provides error bounds and backward error estimates for the solution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sla_syrpvgrw.f b/SRC/sla_syrpvgrw.f index f735464f..e69784be 100644 --- a/SRC/sla_syrpvgrw.f +++ b/SRC/sla_syrpvgrw.f @@ -1,4 +1,4 @@ -*> \brief \b SLA_SYRPVGRW +*> \brief \b SLA_SYRPVGRW computes the reciprocal pivot growth factor norm(A)/norm(U) for a symmetric indefinite matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sla_wwaddw.f b/SRC/sla_wwaddw.f index 407fe159..97568c4b 100644 --- a/SRC/sla_wwaddw.f +++ b/SRC/sla_wwaddw.f @@ -1,4 +1,4 @@ -*> \brief \b SLA_WWADDW +*> \brief \b SLA_WWADDW adds a vector into a doubled-single vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slabrd.f b/SRC/slabrd.f index 371c47da..1e76bb81 100644 --- a/SRC/slabrd.f +++ b/SRC/slabrd.f @@ -1,4 +1,4 @@ -*> \brief \b SLABRD +*> \brief \b SLABRD reduces the first nb rows and columns of a general matrix to a bidiagonal form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slacn2.f b/SRC/slacn2.f index bdda4cbf..bef86ff7 100644 --- a/SRC/slacn2.f +++ b/SRC/slacn2.f @@ -1,4 +1,4 @@ -*> \brief \b SLACN2 +*> \brief \b SLACN2 estimates the 1-norm of a square matrix, using reverse communication for evaluating matrix-vector products. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slacon.f b/SRC/slacon.f index 2366fe24..b3c3ead8 100644 --- a/SRC/slacon.f +++ b/SRC/slacon.f @@ -1,4 +1,4 @@ -*> \brief \b SLACON +*> \brief \b SLACON estimates the 1-norm of a square matrix, using reverse communication for evaluating matrix-vector products. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slacpy.f b/SRC/slacpy.f index 8d091a4e..cfafc62b 100644 --- a/SRC/slacpy.f +++ b/SRC/slacpy.f @@ -1,4 +1,4 @@ -*> \brief \b SLACPY +*> \brief \b SLACPY copies all or part of one two-dimensional array to another. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sladiv.f b/SRC/sladiv.f index da3afa36..c2d36605 100644 --- a/SRC/sladiv.f +++ b/SRC/sladiv.f @@ -1,4 +1,4 @@ -*> \brief \b SLADIV +*> \brief \b SLADIV performs complex division in real arithmetic, avoiding unnecessary overflow. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slae2.f b/SRC/slae2.f index 7e967fc1..1d2a9ffc 100644 --- a/SRC/slae2.f +++ b/SRC/slae2.f @@ -1,4 +1,4 @@ -*> \brief \b SLAE2 +*> \brief \b SLAE2 computes the eigenvalues of a 2-by-2 symmetric matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaebz.f b/SRC/slaebz.f index af8827a0..4df9c3a0 100644 --- a/SRC/slaebz.f +++ b/SRC/slaebz.f @@ -1,4 +1,4 @@ -*> \brief \b SLAEBZ +*> \brief \b SLAEBZ computes the number of eigenvalues of a real symmetric tridiagonal matrix which are less than or equal to a given value, and performs other tasks required by the routine sstebz. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaed0.f b/SRC/slaed0.f index a693a4bb..3179dfe4 100644 --- a/SRC/slaed0.f +++ b/SRC/slaed0.f @@ -1,4 +1,4 @@ -*> \brief \b SLAED0 +*> \brief \b SLAED0 used by sstedc. Computes all eigenvalues and corresponding eigenvectors of an unreduced symmetric tridiagonal matrix using the divide and conquer method. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaed1.f b/SRC/slaed1.f index 6ce29120..74c855d0 100644 --- a/SRC/slaed1.f +++ b/SRC/slaed1.f @@ -1,4 +1,4 @@ -*> \brief \b SLAED1 +*> \brief \b SLAED1 used by sstedc. Computes the updated eigensystem of a diagonal matrix after modification by a rank-one symmetric matrix. Used when the original matrix is tridiagonal. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaed2.f b/SRC/slaed2.f index 6aeefee0..1460a01d 100644 --- a/SRC/slaed2.f +++ b/SRC/slaed2.f @@ -1,4 +1,4 @@ -*> \brief \b SLAED2 +*> \brief \b SLAED2 used by sstedc. Merges eigenvalues and deflates secular equation. Used when the original matrix is tridiagonal. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaed3.f b/SRC/slaed3.f index 4716792f..11118162 100644 --- a/SRC/slaed3.f +++ b/SRC/slaed3.f @@ -1,4 +1,4 @@ -*> \brief \b SLAED3 +*> \brief \b SLAED3 used by sstedc. Finds the roots of the secular equation and updates the eigenvectors. Used when the original matrix is tridiagonal. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaed4.f b/SRC/slaed4.f index a9275716..8afb3b24 100644 --- a/SRC/slaed4.f +++ b/SRC/slaed4.f @@ -1,4 +1,4 @@ -*> \brief \b SLAED4 +*> \brief \b SLAED4 used by sstedc. Finds a single root of the secular equation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaed5.f b/SRC/slaed5.f index 289e1cc6..e6ccb987 100644 --- a/SRC/slaed5.f +++ b/SRC/slaed5.f @@ -1,4 +1,4 @@ -*> \brief \b SLAED5 +*> \brief \b SLAED5 used by sstedc. Solves the 2-by-2 secular equation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaed6.f b/SRC/slaed6.f index 0295bbf8..112b30cd 100644 --- a/SRC/slaed6.f +++ b/SRC/slaed6.f @@ -1,4 +1,4 @@ -*> \brief \b SLAED6 +*> \brief \b SLAED6 used by sstedc. Computes one Newton step in solution of the secular equation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaed7.f b/SRC/slaed7.f index 0c812d80..7d5e4f6e 100644 --- a/SRC/slaed7.f +++ b/SRC/slaed7.f @@ -1,4 +1,4 @@ -*> \brief \b SLAED7 +*> \brief \b SLAED7 used by sstedc. Computes the updated eigensystem of a diagonal matrix after modification by a rank-one symmetric matrix. Used when the original matrix is dense. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaed8.f b/SRC/slaed8.f index 8a06c6c2..d1f043a7 100644 --- a/SRC/slaed8.f +++ b/SRC/slaed8.f @@ -1,4 +1,4 @@ -*> \brief \b SLAED8 +*> \brief \b SLAED8 used by sstedc. Merges eigenvalues and deflates secular equation. Used when the original matrix is dense. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaed9.f b/SRC/slaed9.f index 581faca3..01f6675b 100644 --- a/SRC/slaed9.f +++ b/SRC/slaed9.f @@ -1,4 +1,4 @@ -*> \brief \b SLAED9 +*> \brief \b SLAED9 used by sstedc. Finds the roots of the secular equation and updates the eigenvectors. Used when the original matrix is dense. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaeda.f b/SRC/slaeda.f index eb95cc71..9b6c7811 100644 --- a/SRC/slaeda.f +++ b/SRC/slaeda.f @@ -1,4 +1,4 @@ -*> \brief \b SLAEDA +*> \brief \b SLAEDA used by sstedc. Computes the Z vector determining the rank-one modification of the diagonal matrix. Used when the original matrix is dense. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaein.f b/SRC/slaein.f index 6855fe51..7da45560 100644 --- a/SRC/slaein.f +++ b/SRC/slaein.f @@ -1,4 +1,4 @@ -*> \brief \b SLAEIN +*> \brief \b SLAEIN computes a specified right or left eigenvector of an upper Hessenberg matrix by inverse iteration. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaev2.f b/SRC/slaev2.f index f3409e9d..a097dde1 100644 --- a/SRC/slaev2.f +++ b/SRC/slaev2.f @@ -1,4 +1,4 @@ -*> \brief \b SLAEV2 +*> \brief \b SLAEV2 computes the eigenvalues and eigenvectors of a 2-by-2 symmetric/Hermitian matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaexc.f b/SRC/slaexc.f index 6c68c640..9f3a816f 100644 --- a/SRC/slaexc.f +++ b/SRC/slaexc.f @@ -1,4 +1,4 @@ -*> \brief \b SLAEXC +*> \brief \b SLAEXC swaps adjacent diagonal blocks of a real upper quasi-triangular matrix in Schur canonical form, by an orthogonal similarity transformation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slag2.f b/SRC/slag2.f index 2cbdab70..b7375747 100644 --- a/SRC/slag2.f +++ b/SRC/slag2.f @@ -1,4 +1,4 @@ -*> \brief \b SLAG2 +*> \brief \b SLAG2 computes the eigenvalues of a 2-by-2 generalized eigenvalue problem, with scaling as necessary to avoid over-/underflow. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slag2d.f b/SRC/slag2d.f index 7cefea05..dc5908d7 100644 --- a/SRC/slag2d.f +++ b/SRC/slag2d.f @@ -1,4 +1,4 @@ -*> \brief \b SLAG2D +*> \brief \b SLAG2D converts a single precision matrix to a double precision matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slags2.f b/SRC/slags2.f index 78e3a4aa..cfcc5f94 100644 --- a/SRC/slags2.f +++ b/SRC/slags2.f @@ -1,4 +1,4 @@ -*> \brief \b SLAGS2 +*> \brief \b SLAGS2 computes 2-by-2 orthogonal matrices U, V, and Q, and applies them to matrices A and B such that the rows of the transformed A and B are parallel. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slagtf.f b/SRC/slagtf.f index b6e1a2db..de6c9172 100644 --- a/SRC/slagtf.f +++ b/SRC/slagtf.f @@ -1,4 +1,4 @@ -*> \brief \b SLAGTF +*> \brief \b SLAGTF computes an LU factorization of a matrix T-λI, where T is a general tridiagonal matrix, and λ a scalar, using partial pivoting with row interchanges. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slagtm.f b/SRC/slagtm.f index 8395e96d..9b526cb7 100644 --- a/SRC/slagtm.f +++ b/SRC/slagtm.f @@ -1,4 +1,4 @@ -*> \brief \b SLAGTM +*> \brief \b SLAGTM performs a matrix-matrix product of the form C = αAB+βC, where A is a tridiagonal matrix, B and C are rectangular matrices, and α and β are scalars, which may be 0, 1, or -1. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slagts.f b/SRC/slagts.f index 8f85d015..e7c4428c 100644 --- a/SRC/slagts.f +++ b/SRC/slagts.f @@ -1,4 +1,4 @@ -*> \brief \b SLAGTS +*> \brief \b SLAGTS solves the system of equations (T-λI)x = y or (T-λI)Tx = y,where T is a general tridiagonal matrix and λ a scalar, using the LU factorization computed by slagtf. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slagv2.f b/SRC/slagv2.f index eb7dc8fa..2344d186 100644 --- a/SRC/slagv2.f +++ b/SRC/slagv2.f @@ -1,4 +1,4 @@ -*> \brief \b SLAGV2 +*> \brief \b SLAGV2 computes the Generalized Schur factorization of a real 2-by-2 matrix pencil (A,B) where B is upper triangular. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slahqr.f b/SRC/slahqr.f index c8a8b2e0..120ea9dd 100644 --- a/SRC/slahqr.f +++ b/SRC/slahqr.f @@ -1,4 +1,4 @@ -*> \brief \b SLAHQR +*> \brief \b SLAHQR computes the eigenvalues and Schur factorization of an upper Hessenberg matrix, using the double-shift/single-shift QR algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slahr2.f b/SRC/slahr2.f index 696d893b..a979705e 100644 --- a/SRC/slahr2.f +++ b/SRC/slahr2.f @@ -1,4 +1,4 @@ -*> \brief \b SLAHR2 +*> \brief \b SLAHR2 reduces the specified number of first columns of a general rectangular matrix A so that elements below the specified subdiagonal are zero, and returns auxiliary matrices which are needed to apply the transformation to the unreduced part of A. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slahrd.f b/SRC/slahrd.f index cb6d84ac..6e829263 100644 --- a/SRC/slahrd.f +++ b/SRC/slahrd.f @@ -1,4 +1,4 @@ -*> \brief \b SLAHRD +*> \brief \b SLAHRD reduces the first nb columns of a general rectangular matrix A so that elements below the k-th subdiagonal are zero, and returns auxiliary matrices which are needed to apply the transformation to the unreduced part of A. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaic1.f b/SRC/slaic1.f index 741e4add..f926ab55 100644 --- a/SRC/slaic1.f +++ b/SRC/slaic1.f @@ -1,4 +1,4 @@ -*> \brief \b SLAIC1 +*> \brief \b SLAIC1 applies one step of incremental condition estimation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaisnan.f b/SRC/slaisnan.f index 41ab97a3..744dc014 100644 --- a/SRC/slaisnan.f +++ b/SRC/slaisnan.f @@ -1,4 +1,4 @@ -*> \brief \b SLAISNAN +*> \brief \b SLAISNAN tests input for NaN by comparing two arguments for inequality. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaln2.f b/SRC/slaln2.f index 1ae61b5d..b68e622e 100644 --- a/SRC/slaln2.f +++ b/SRC/slaln2.f @@ -1,4 +1,4 @@ -*> \brief \b SLALN2 +*> \brief \b SLALN2 solves a 1-by-1 or 2-by-2 linear system of equations of the specified form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slals0.f b/SRC/slals0.f index 7cd0a9ad..9f337d5b 100644 --- a/SRC/slals0.f +++ b/SRC/slals0.f @@ -1,4 +1,4 @@ -*> \brief \b SLALS0 +*> \brief \b SLALS0 applies back multiplying factors in solving the least squares problem using divide and conquer SVD approach. Used by sgelsd. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slalsa.f b/SRC/slalsa.f index a905e596..24aff2c6 100644 --- a/SRC/slalsa.f +++ b/SRC/slalsa.f @@ -1,4 +1,4 @@ -*> \brief \b SLALSA +*> \brief \b SLALSA computes the SVD of the coefficient matrix in compact form. Used by sgelsd. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slalsd.f b/SRC/slalsd.f index de2e242d..211d52b2 100644 --- a/SRC/slalsd.f +++ b/SRC/slalsd.f @@ -1,4 +1,4 @@ -*> \brief \b SLALSD +*> \brief \b SLALSD uses the singular value decomposition of A to solve the least squares problem. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slamrg.f b/SRC/slamrg.f index a2b09be7..fe723f2e 100644 --- a/SRC/slamrg.f +++ b/SRC/slamrg.f @@ -1,4 +1,4 @@ -*> \brief \b SLAMRG +*> \brief \b SLAMRG creates a permutation list to merge the entries of two independently sorted sets into a single set sorted in ascending order. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaneg.f b/SRC/slaneg.f index 47094e73..341b403b 100644 --- a/SRC/slaneg.f +++ b/SRC/slaneg.f @@ -1,4 +1,4 @@ -*> \brief \b SLANEG +*> \brief \b SLANEG computes the Sturm count. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slangb.f b/SRC/slangb.f index 14a1e747..4449096d 100644 --- a/SRC/slangb.f +++ b/SRC/slangb.f @@ -1,4 +1,4 @@ -*> \brief \b SLANGB +*> \brief \b SLANGB returns the value of the 1-norm, Frobenius norm, infinity-norm, or the largest absolute value of any element of general band matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slange.f b/SRC/slange.f index 5f739342..c146f19b 100644 --- a/SRC/slange.f +++ b/SRC/slange.f @@ -1,4 +1,4 @@ -*> \brief \b SLANGE +*> \brief \b SLANGE returns the value of the 1-norm, Frobenius norm, infinity-norm, or the largest absolute value of any element of a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slangt.f b/SRC/slangt.f index 8bfb4f78..cfbb68e1 100644 --- a/SRC/slangt.f +++ b/SRC/slangt.f @@ -1,4 +1,4 @@ -*> \brief \b SLANGT +*> \brief \b SLANGT returns the value of the 1-norm, Frobenius norm, infinity-norm, or the largest absolute value of any element of a general tridiagonal matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slanhs.f b/SRC/slanhs.f index 949a30ce..b662d7c0 100644 --- a/SRC/slanhs.f +++ b/SRC/slanhs.f @@ -1,4 +1,4 @@ -*> \brief \b SLANHS +*> \brief \b SLANHS returns the value of the 1-norm, Frobenius norm, infinity-norm, or the largest absolute value of any element of an upper Hessenberg matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slansb.f b/SRC/slansb.f index ac1f8b0b..8274221f 100644 --- a/SRC/slansb.f +++ b/SRC/slansb.f @@ -1,4 +1,4 @@ -*> \brief \b SLANSB +*> \brief \b SLANSB returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a symmetric band matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slansf.f b/SRC/slansf.f index 8092f16e..f13c85af 100644 --- a/SRC/slansf.f +++ b/SRC/slansf.f @@ -1,4 +1,4 @@ -*> \brief \b SLANSF +*> \brief \b SLANSF returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a symmetric matrix in RFP format. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slansp.f b/SRC/slansp.f index 4c8e93db..359a0200 100644 --- a/SRC/slansp.f +++ b/SRC/slansp.f @@ -1,4 +1,4 @@ -*> \brief \b SLANSP +*> \brief \b SLANSP returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a symmetric matrix supplied in packed form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slanst.f b/SRC/slanst.f index 52bde624..d25e096d 100644 --- a/SRC/slanst.f +++ b/SRC/slanst.f @@ -1,4 +1,4 @@ -*> \brief \b SLANST +*> \brief \b SLANST returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a real symmetric tridiagonal matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slansy.f b/SRC/slansy.f index 0c95cd23..1caebf57 100644 --- a/SRC/slansy.f +++ b/SRC/slansy.f @@ -1,4 +1,4 @@ -*> \brief \b SLANSY +*> \brief \b SLANSY returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a real symmetric matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slantb.f b/SRC/slantb.f index 698d377f..777052f6 100644 --- a/SRC/slantb.f +++ b/SRC/slantb.f @@ -1,4 +1,4 @@ -*> \brief \b SLANTB +*> \brief \b SLANTB returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a triangular band matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slantp.f b/SRC/slantp.f index fd9ceed3..4af9381a 100644 --- a/SRC/slantp.f +++ b/SRC/slantp.f @@ -1,4 +1,4 @@ -*> \brief \b SLANTP +*> \brief \b SLANTP returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a triangular matrix supplied in packed form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slantr.f b/SRC/slantr.f index 8adf2789..a25c2855 100644 --- a/SRC/slantr.f +++ b/SRC/slantr.f @@ -1,4 +1,4 @@ -*> \brief \b SLANTR +*> \brief \b SLANTR returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a trapezoidal or triangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slanv2.f b/SRC/slanv2.f index 55c180a9..9a5133cf 100644 --- a/SRC/slanv2.f +++ b/SRC/slanv2.f @@ -1,4 +1,4 @@ -*> \brief \b SLANV2 +*> \brief \b SLANV2 computes the Schur factorization of a real 2-by-2 nonsymmetric matrix in standard form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slapll.f b/SRC/slapll.f index dc4df2cc..9ed85ede 100644 --- a/SRC/slapll.f +++ b/SRC/slapll.f @@ -1,4 +1,4 @@ -*> \brief \b SLAPLL +*> \brief \b SLAPLL measures the linear dependence of two vectors. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slapmr.f b/SRC/slapmr.f index d4c9cdd4..e3b28cfc 100644 --- a/SRC/slapmr.f +++ b/SRC/slapmr.f @@ -1,4 +1,4 @@ -*> \brief \b SLAPMR +*> \brief \b SLAPMR rearranges rows of a matrix as specified by a permutation vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slapmt.f b/SRC/slapmt.f index 25fbd5e3..dc7dfc38 100644 --- a/SRC/slapmt.f +++ b/SRC/slapmt.f @@ -1,4 +1,4 @@ -*> \brief \b SLAPMT +*> \brief \b SLAPMT performs a forward or backward permutation of the columns of a matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slapy2.f b/SRC/slapy2.f index 1f6b1ca4..589f7c52 100644 --- a/SRC/slapy2.f +++ b/SRC/slapy2.f @@ -1,4 +1,4 @@ -*> \brief \b SLAPY2 +*> \brief \b SLAPY2 returns sqrt(x2+y2). * * =========== DOCUMENTATION =========== * diff --git a/SRC/slapy3.f b/SRC/slapy3.f index aa2f5bfc..8aee93e1 100644 --- a/SRC/slapy3.f +++ b/SRC/slapy3.f @@ -1,4 +1,4 @@ -*> \brief \b SLAPY3 +*> \brief \b SLAPY3 returns sqrt(x2+y2+z2). * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaqgb.f b/SRC/slaqgb.f index 6dfab5b9..5a2d27bf 100644 --- a/SRC/slaqgb.f +++ b/SRC/slaqgb.f @@ -1,4 +1,4 @@ -*> \brief \b SLAQGB +*> \brief \b SLAQGB scales a general band matrix, using row and column scaling factors computed by sgbequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaqge.f b/SRC/slaqge.f index 01345a65..33c201da 100644 --- a/SRC/slaqge.f +++ b/SRC/slaqge.f @@ -1,4 +1,4 @@ -*> \brief \b SLAQGE +*> \brief \b SLAQGE scales a general rectangular matrix, using row and column scaling factors computed by sgeequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaqp2.f b/SRC/slaqp2.f index 828a08d9..182254d5 100644 --- a/SRC/slaqp2.f +++ b/SRC/slaqp2.f @@ -1,4 +1,4 @@ -*> \brief \b SLAQP2 +*> \brief \b SLAQP2 computes a QR factorization with column pivoting of the matrix block. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaqps.f b/SRC/slaqps.f index 9f1bdabe..30e93099 100644 --- a/SRC/slaqps.f +++ b/SRC/slaqps.f @@ -1,4 +1,4 @@ -*> \brief \b SLAQPS +*> \brief \b SLAQPS computes a step of QR factorization with column pivoting of a real m-by-n matrix A by using BLAS level 3. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaqr0.f b/SRC/slaqr0.f index 69253d61..57e02eb6 100644 --- a/SRC/slaqr0.f +++ b/SRC/slaqr0.f @@ -1,4 +1,4 @@ -*> \brief \b SLAQR0 +*> \brief \b SLAQR0 computes the eigenvalues of a Hessenberg matrix, and optionally the matrices from the Schur decomposition. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaqr1.f b/SRC/slaqr1.f index 0fbf2735..1cab7bbc 100644 --- a/SRC/slaqr1.f +++ b/SRC/slaqr1.f @@ -1,4 +1,4 @@ -*> \brief \b SLAQR1 +*> \brief \b SLAQR1 sets a scalar multiple of the first column of the product of 2-by-2 or 3-by-3 matrix H and specified shifts. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaqr2.f b/SRC/slaqr2.f index 2ca1e07e..45a0b7c1 100644 --- a/SRC/slaqr2.f +++ b/SRC/slaqr2.f @@ -1,4 +1,4 @@ -*> \brief \b SLAQR2 +*> \brief \b SLAQR2 performs the orthogonal similarity transformation of a Hessenberg matrix to detect and deflate fully converged eigenvalues from a trailing principal submatrix (aggressive early deflation). * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaqr3.f b/SRC/slaqr3.f index 5a74f4ec..3df4a956 100644 --- a/SRC/slaqr3.f +++ b/SRC/slaqr3.f @@ -1,4 +1,4 @@ -*> \brief \b SLAQR3 +*> \brief \b SLAQR3 performs the orthogonal similarity transformation of a Hessenberg matrix to detect and deflate fully converged eigenvalues from a trailing principal submatrix (aggressive early deflation). * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaqr4.f b/SRC/slaqr4.f index b2212dbf..0e356941 100644 --- a/SRC/slaqr4.f +++ b/SRC/slaqr4.f @@ -1,4 +1,4 @@ -*> \brief \b SLAQR4 +*> \brief \b SLAQR4 computes the eigenvalues of a Hessenberg matrix, and optionally the matrices from the Schur decomposition. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaqr5.f b/SRC/slaqr5.f index b956d2fa..a18781e9 100644 --- a/SRC/slaqr5.f +++ b/SRC/slaqr5.f @@ -1,4 +1,4 @@ -*> \brief \b SLAQR5 +*> \brief \b SLAQR5 performs a single small-bulge multi-shift QR sweep. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaqsb.f b/SRC/slaqsb.f index c0e65852..37e8cc44 100644 --- a/SRC/slaqsb.f +++ b/SRC/slaqsb.f @@ -1,4 +1,4 @@ -*> \brief \b SLAQSB +*> \brief \b SLAQSB scales a symmetric/Hermitian band matrix, using scaling factors computed by spbequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaqsp.f b/SRC/slaqsp.f index debe850a..05412493 100644 --- a/SRC/slaqsp.f +++ b/SRC/slaqsp.f @@ -1,4 +1,4 @@ -*> \brief \b SLAQSP +*> \brief \b SLAQSP scales a symmetric/Hermitian matrix in packed storage, using scaling factors computed by sppequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaqsy.f b/SRC/slaqsy.f index 5b0e2fa5..998eadbd 100644 --- a/SRC/slaqsy.f +++ b/SRC/slaqsy.f @@ -1,4 +1,4 @@ -*> \brief \b SLAQSY +*> \brief \b SLAQSY scales a symmetric/Hermitian matrix, using scaling factors computed by spoequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaqtr.f b/SRC/slaqtr.f index 3f0fdc95..9b0192eb 100644 --- a/SRC/slaqtr.f +++ b/SRC/slaqtr.f @@ -1,4 +1,4 @@ -*> \brief \b SLAQTR +*> \brief \b SLAQTR solves a real quasi-triangular system of equations, or a complex quasi-triangular system of special form, in real arithmetic. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slar1v.f b/SRC/slar1v.f index ef364d59..6447ca2f 100644 --- a/SRC/slar1v.f +++ b/SRC/slar1v.f @@ -1,4 +1,4 @@ -*> \brief \b SLAR1V +*> \brief \b SLAR1V computes the (scaled) r-th column of the inverse of the submatrix in rows b1 through bn of the tridiagonal matrix LDLT - λI. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slar2v.f b/SRC/slar2v.f index c66137e4..c279fa08 100644 --- a/SRC/slar2v.f +++ b/SRC/slar2v.f @@ -1,4 +1,4 @@ -*> \brief \b SLAR2V +*> \brief \b SLAR2V applies a vector of plane rotations with real cosines and real sines from both sides to a sequence of 2-by-2 symmetric/Hermitian matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarf.f b/SRC/slarf.f index 8a8ff308..1f603792 100644 --- a/SRC/slarf.f +++ b/SRC/slarf.f @@ -1,4 +1,4 @@ -*> \brief \b SLARF +*> \brief \b SLARF applies an elementary reflector to a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarfb.f b/SRC/slarfb.f index eb95990b..f086f090 100644 --- a/SRC/slarfb.f +++ b/SRC/slarfb.f @@ -1,4 +1,4 @@ -*> \brief \b SLARFB +*> \brief \b SLARFB applies a block reflector or its transpose to a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarfg.f b/SRC/slarfg.f index 4f10ffca..1186fcd1 100644 --- a/SRC/slarfg.f +++ b/SRC/slarfg.f @@ -1,4 +1,4 @@ -*> \brief \b SLARFG +*> \brief \b SLARFG generates an elementary reflector (Householder matrix). * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarfgp.f b/SRC/slarfgp.f index fc823dbe..8ce87870 100644 --- a/SRC/slarfgp.f +++ b/SRC/slarfgp.f @@ -1,4 +1,4 @@ -*> \brief \b SLARFGP +*> \brief \b SLARFGP generates an elementary reflector (Householder matrix) with non-negatibe beta. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarft.f b/SRC/slarft.f index 30b0668e..850966cb 100644 --- a/SRC/slarft.f +++ b/SRC/slarft.f @@ -1,4 +1,4 @@ -*> \brief \b SLARFT +*> \brief \b SLARFT forms the triangular factor T of a block reflector H = I - vtvH * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarfx.f b/SRC/slarfx.f index 99c7b988..be8d74fd 100644 --- a/SRC/slarfx.f +++ b/SRC/slarfx.f @@ -1,4 +1,4 @@ -*> \brief \b SLARFX +*> \brief \b SLARFX applies an elementary reflector to a general rectangular matrix, with loop unrolling when the reflector has order ≤ 10. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slargv.f b/SRC/slargv.f index fa2be8b7..0565232b 100644 --- a/SRC/slargv.f +++ b/SRC/slargv.f @@ -1,4 +1,4 @@ -*> \brief \b SLARGV +*> \brief \b SLARGV generates a vector of plane rotations with real cosines and real sines. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarnv.f b/SRC/slarnv.f index df0cbff2..edfbf0c6 100644 --- a/SRC/slarnv.f +++ b/SRC/slarnv.f @@ -1,4 +1,4 @@ -*> \brief \b SLARNV +*> \brief \b SLARNV returns a vector of random numbers from a uniform or normal distribution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarra.f b/SRC/slarra.f index 0c1385a2..b7491b1f 100644 --- a/SRC/slarra.f +++ b/SRC/slarra.f @@ -1,4 +1,4 @@ -*> \brief \b SLARRA +*> \brief \b SLARRA computes the splitting points with the specified threshold. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarrb.f b/SRC/slarrb.f index 0c2ec6c1..905f4c8a 100644 --- a/SRC/slarrb.f +++ b/SRC/slarrb.f @@ -1,4 +1,4 @@ -*> \brief \b SLARRB +*> \brief \b SLARRB provides limited bisection to locate eigenvalues for more accuracy. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarrc.f b/SRC/slarrc.f index 5fc1b215..3053dcae 100644 --- a/SRC/slarrc.f +++ b/SRC/slarrc.f @@ -1,4 +1,4 @@ -*> \brief \b SLARRC +*> \brief \b SLARRC computes the number of eigenvalues of the symmetric tridiagonal matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarrd.f b/SRC/slarrd.f index d7e8a53e..f57159ae 100644 --- a/SRC/slarrd.f +++ b/SRC/slarrd.f @@ -1,4 +1,4 @@ -*> \brief \b SLARRD +*> \brief \b SLARRD computes the eigenvalues of a symmetric tridiagonal matrix to suitable accuracy. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarre.f b/SRC/slarre.f index c24d935d..954068f2 100644 --- a/SRC/slarre.f +++ b/SRC/slarre.f @@ -1,4 +1,4 @@ -*> \brief \b SLARRE +*> \brief \b SLARRE given the tridiagonal matrix T, sets small off-diagonal elements to zero and for each unreduced block Ti, finds base representations and eigenvalues. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarrf.f b/SRC/slarrf.f index 797355e3..d0443e5b 100644 --- a/SRC/slarrf.f +++ b/SRC/slarrf.f @@ -1,4 +1,4 @@ -*> \brief \b SLARRF +*> \brief \b SLARRF finds a new relatively robust representation such that at least one of the eigenvalues is relatively isolated. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarrj.f b/SRC/slarrj.f index d2b06851..29ff6683 100644 --- a/SRC/slarrj.f +++ b/SRC/slarrj.f @@ -1,4 +1,4 @@ -*> \brief \b SLARRJ +*> \brief \b SLARRJ performs refinement of the initial estimates of the eigenvalues of the matrix T. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarrk.f b/SRC/slarrk.f index a05142b2..b7ae277b 100644 --- a/SRC/slarrk.f +++ b/SRC/slarrk.f @@ -1,4 +1,4 @@ -*> \brief \b SLARRK +*> \brief \b SLARRK computes one eigenvalue of a symmetric tridiagonal matrix T to suitable accuracy. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarrr.f b/SRC/slarrr.f index 2303c16e..27ba651e 100644 --- a/SRC/slarrr.f +++ b/SRC/slarrr.f @@ -1,4 +1,4 @@ -*> \brief \b SLARRR +*> \brief \b SLARRR performs tests to decide whether the symmetric tridiagonal matrix T warrants expensive computations which guarantee high relative accuracy in the eigenvalues. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarrv.f b/SRC/slarrv.f index 6942aeb1..57842b3c 100644 --- a/SRC/slarrv.f +++ b/SRC/slarrv.f @@ -1,4 +1,4 @@ -*> \brief \b SLARRV +*> \brief \b SLARRV computes the eigenvectors of the tridiagonal matrix T = L D LT given L, D and the eigenvalues of L D LT. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarscl2.f b/SRC/slarscl2.f index ad3c8ccc..429d2b22 100644 --- a/SRC/slarscl2.f +++ b/SRC/slarscl2.f @@ -1,4 +1,4 @@ -*> \brief \b SLARSCL2 +*> \brief \b SLARSCL2 performs reciprocal diagonal scaling on a vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slartg.f b/SRC/slartg.f index 71cff80c..2e76d620 100644 --- a/SRC/slartg.f +++ b/SRC/slartg.f @@ -1,4 +1,4 @@ -*> \brief \b SLARTG +*> \brief \b SLARTG generates a plane rotation with real cosine and real sine. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slartgp.f b/SRC/slartgp.f index 1681a386..ca721025 100644 --- a/SRC/slartgp.f +++ b/SRC/slartgp.f @@ -1,4 +1,4 @@ -*> \brief \b SLARTGP +*> \brief \b SLARTGP generates a plane rotation so that the diagonal is nonnegative. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slartgs.f b/SRC/slartgs.f index bcbb766c..32fbdecc 100644 --- a/SRC/slartgs.f +++ b/SRC/slartgs.f @@ -1,4 +1,4 @@ -*> \brief \b SLARTGS +*> \brief \b SLARTGS generates a plane rotation designed to introduce a bulge in implicit QR iteration for the bidiagonal SVD problem. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slartv.f b/SRC/slartv.f index 8d550467..34daaf76 100644 --- a/SRC/slartv.f +++ b/SRC/slartv.f @@ -1,4 +1,4 @@ -*> \brief \b SLARTV +*> \brief \b SLARTV applies a vector of plane rotations with real cosines and real sines to the elements of a pair of vectors. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaruv.f b/SRC/slaruv.f index 1c10d5a2..add4cf12 100644 --- a/SRC/slaruv.f +++ b/SRC/slaruv.f @@ -1,4 +1,4 @@ -*> \brief \b SLARUV +*> \brief \b SLARUV returns a vector of n random real numbers from a uniform distribution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarz.f b/SRC/slarz.f index 8abd97db..63263d94 100644 --- a/SRC/slarz.f +++ b/SRC/slarz.f @@ -1,4 +1,4 @@ -*> \brief \b SLARZ +*> \brief \b SLARZ applies an elementary reflector (as returned by stzrzf) to a general matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarzb.f b/SRC/slarzb.f index fc75ffa0..c5263f5c 100644 --- a/SRC/slarzb.f +++ b/SRC/slarzb.f @@ -1,4 +1,4 @@ -*> \brief \b SLARZB +*> \brief \b SLARZB applies a block reflector or its transpose to a general matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slarzt.f b/SRC/slarzt.f index 4619e8c4..0955ba99 100644 --- a/SRC/slarzt.f +++ b/SRC/slarzt.f @@ -1,4 +1,4 @@ -*> \brief \b SLARZT +*> \brief \b SLARZT forms the triangular factor T of a block reflector H = I - vtvH. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slas2.f b/SRC/slas2.f index d0525244..326491ba 100644 --- a/SRC/slas2.f +++ b/SRC/slas2.f @@ -1,4 +1,4 @@ -*> \brief \b SLAS2 +*> \brief \b SLAS2 computes singular values of a 2-by-2 triangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slascl.f b/SRC/slascl.f index ce16e951..055476fc 100644 --- a/SRC/slascl.f +++ b/SRC/slascl.f @@ -1,4 +1,4 @@ -*> \brief \b SLASCL +*> \brief \b SLASCL multiplies a general rectangular matrix by a real scalar defined as cto/cfrom. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slascl2.f b/SRC/slascl2.f index 903f212f..5ab46d96 100644 --- a/SRC/slascl2.f +++ b/SRC/slascl2.f @@ -1,4 +1,4 @@ -*> \brief \b SLASCL2 +*> \brief \b SLASCL2 performs diagonal scaling on a vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasd0.f b/SRC/slasd0.f index 8a774339..766059bc 100644 --- a/SRC/slasd0.f +++ b/SRC/slasd0.f @@ -1,4 +1,4 @@ -*> \brief \b SLASD0 +*> \brief \b SLASD0 computes the singular values of a real upper bidiagonal n-by-m matrix B with diagonal d and off-diagonal e. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasd1.f b/SRC/slasd1.f index efa1893e..a9e03b16 100644 --- a/SRC/slasd1.f +++ b/SRC/slasd1.f @@ -1,4 +1,4 @@ -*> \brief \b SLASD1 +*> \brief \b SLASD1 computes the SVD of an upper bidiagonal matrix B of the specified size. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasd2.f b/SRC/slasd2.f index 5eb38995..25288169 100644 --- a/SRC/slasd2.f +++ b/SRC/slasd2.f @@ -1,4 +1,4 @@ -*> \brief \b SLASD2 +*> \brief \b SLASD2 merges the two sets of singular values together into a single sorted set. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasd3.f b/SRC/slasd3.f index 4f4207a4..a930888a 100644 --- a/SRC/slasd3.f +++ b/SRC/slasd3.f @@ -1,4 +1,4 @@ -*> \brief \b SLASD3 +*> \brief \b SLASD3 finds all square roots of the roots of the secular equation, as defined by the values in D and Z, and then updates the singular vectors by matrix multiplication. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasd4.f b/SRC/slasd4.f index 67f91a79..86e6225a 100644 --- a/SRC/slasd4.f +++ b/SRC/slasd4.f @@ -1,4 +1,4 @@ -*> \brief \b SLASD4 +*> \brief \b SLASD4 computes the square root of the i-th updated eigenvalue of a positive symmetric rank-one modification to a positive diagonal matrix. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasd5.f b/SRC/slasd5.f index af1e2438..4b426d56 100644 --- a/SRC/slasd5.f +++ b/SRC/slasd5.f @@ -1,4 +1,4 @@ -*> \brief \b SLASD5 +*> \brief \b SLASD5 computes the square root of the i-th eigenvalue of a positive symmetric rank-one modification of a 2-by-2 diagonal matrix. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasd6.f b/SRC/slasd6.f index ff1d12b7..82d20772 100644 --- a/SRC/slasd6.f +++ b/SRC/slasd6.f @@ -1,4 +1,4 @@ -*> \brief \b SLASD6 +*> \brief \b SLASD6 computes the SVD of an updated upper bidiagonal matrix obtained by merging two smaller ones by appending a row. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasd7.f b/SRC/slasd7.f index fb80f0f5..20d3e6d0 100644 --- a/SRC/slasd7.f +++ b/SRC/slasd7.f @@ -1,4 +1,4 @@ -*> \brief \b SLASD7 +*> \brief \b SLASD7 merges the two sets of singular values together into a single sorted set. Then it tries to deflate the size of the problem. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasd8.f b/SRC/slasd8.f index 74250a3e..c5dbc1e6 100644 --- a/SRC/slasd8.f +++ b/SRC/slasd8.f @@ -1,4 +1,4 @@ -*> \brief \b SLASD8 +*> \brief \b SLASD8 finds the square roots of the roots of the secular equation, and stores, for each element in D, the distance to its two nearest poles. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasda.f b/SRC/slasda.f index 8e46abac..8d7803fc 100644 --- a/SRC/slasda.f +++ b/SRC/slasda.f @@ -1,4 +1,4 @@ -*> \brief \b SLASDA +*> \brief \b SLASDA computes the singular value decomposition (SVD) of a real upper bidiagonal matrix with diagonal d and off-diagonal e. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasdq.f b/SRC/slasdq.f index 49246b24..cf465824 100644 --- a/SRC/slasdq.f +++ b/SRC/slasdq.f @@ -1,4 +1,4 @@ -*> \brief \b SLASDQ +*> \brief \b SLASDQ computes the SVD of a real bidiagonal matrix with diagonal d and off-diagonal e. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasdt.f b/SRC/slasdt.f index 22881876..e084b2aa 100644 --- a/SRC/slasdt.f +++ b/SRC/slasdt.f @@ -1,4 +1,4 @@ -*> \brief \b SLASDT +*> \brief \b SLASDT creates a tree of subproblems for bidiagonal divide and conquer. Used by sbdsdc. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaset.f b/SRC/slaset.f index c15a155f..cc696dbd 100644 --- a/SRC/slaset.f +++ b/SRC/slaset.f @@ -1,4 +1,4 @@ -*> \brief \b SLASET +*> \brief \b SLASET initializes the off-diagonal elements and the diagonal elements of a matrix to given values. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasq1.f b/SRC/slasq1.f index 68e4cf2f..48fb8ddc 100644 --- a/SRC/slasq1.f +++ b/SRC/slasq1.f @@ -1,4 +1,4 @@ -*> \brief \b SLASQ1 +*> \brief \b SLASQ1 computes the singular values of a real square bidiagonal matrix. Used by sbdsqr. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasq2.f b/SRC/slasq2.f index 16735322..dac5c37e 100644 --- a/SRC/slasq2.f +++ b/SRC/slasq2.f @@ -1,4 +1,4 @@ -*> \brief \b SLASQ2 +*> \brief \b SLASQ2 computes all the eigenvalues of the symmetric positive definite tridiagonal matrix associated with the qd Array Z to high relative accuracy. Used by sbdsqr and sstegr. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasq3.f b/SRC/slasq3.f index 967e42fb..68781249 100644 --- a/SRC/slasq3.f +++ b/SRC/slasq3.f @@ -1,4 +1,4 @@ -*> \brief \b SLASQ3 +*> \brief \b SLASQ3 checks for deflation, computes a shift and calls dqds. Used by sbdsqr. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasq4.f b/SRC/slasq4.f index ed5f497e..7f026f04 100644 --- a/SRC/slasq4.f +++ b/SRC/slasq4.f @@ -1,4 +1,4 @@ -*> \brief \b SLASQ4 +*> \brief \b SLASQ4 computes an approximation to the smallest eigenvalue using values of d from the previous transform. Used by sbdsqr. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasq5.f b/SRC/slasq5.f index 70c7a18d..298f80d6 100644 --- a/SRC/slasq5.f +++ b/SRC/slasq5.f @@ -1,4 +1,4 @@ -*> \brief \b SLASQ5 +*> \brief \b SLASQ5 computes one dqds transform in ping-pong form. Used by sbdsqr and sstegr. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasq6.f b/SRC/slasq6.f index 7c9a94bb..73c57155 100644 --- a/SRC/slasq6.f +++ b/SRC/slasq6.f @@ -1,4 +1,4 @@ -*> \brief \b SLASQ6 +*> \brief \b SLASQ6 computes one dqd transform in ping-pong form. Used by sbdsqr and sstegr. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasr.f b/SRC/slasr.f index 2f8f7084..cb5bf907 100644 --- a/SRC/slasr.f +++ b/SRC/slasr.f @@ -1,4 +1,4 @@ -*> \brief \b SLASR +*> \brief \b SLASR applies a sequence of plane rotations to a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasrt.f b/SRC/slasrt.f index 94198f77..72597c4a 100644 --- a/SRC/slasrt.f +++ b/SRC/slasrt.f @@ -1,4 +1,4 @@ -*> \brief \b SLASRT +*> \brief \b SLASRT sorts numbers in increasing or decreasing order. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slassq.f b/SRC/slassq.f index 9c3eb50a..8e873808 100644 --- a/SRC/slassq.f +++ b/SRC/slassq.f @@ -1,4 +1,4 @@ -*> \brief \b SLASSQ +*> \brief \b SLASSQ updates a sum of squares represented in scaled form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasv2.f b/SRC/slasv2.f index 5c6b331f..b3e34486 100644 --- a/SRC/slasv2.f +++ b/SRC/slasv2.f @@ -1,4 +1,4 @@ -*> \brief \b SLASV2 +*> \brief \b SLASV2 computes the singular value decomposition of a 2-by-2 triangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slaswp.f b/SRC/slaswp.f index 6fba8d62..70d57ebb 100644 --- a/SRC/slaswp.f +++ b/SRC/slaswp.f @@ -1,4 +1,4 @@ -*> \brief \b SLASWP +*> \brief \b SLASWP performs a series of row interchanges on a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasy2.f b/SRC/slasy2.f index 53399ca7..49593e8b 100644 --- a/SRC/slasy2.f +++ b/SRC/slasy2.f @@ -1,4 +1,4 @@ -*> \brief \b SLASY2 +*> \brief \b SLASY2 solves the Sylvester matrix equation where the matrices are of order 1 or 2. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slasyf.f b/SRC/slasyf.f index 1c64b60a..17d0ea2d 100644 --- a/SRC/slasyf.f +++ b/SRC/slasyf.f @@ -1,4 +1,4 @@ -*> \brief \b SLASYF +*> \brief \b SLASYF computes a partial factorization of a real symmetric matrix, using the diagonal pivoting method. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slatbs.f b/SRC/slatbs.f index 3937c5df..8944851a 100644 --- a/SRC/slatbs.f +++ b/SRC/slatbs.f @@ -1,4 +1,4 @@ -*> \brief \b SLATBS +*> \brief \b SLATBS solves a triangular banded system of equations. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slatdf.f b/SRC/slatdf.f index ea2c4ed1..118c4294 100644 --- a/SRC/slatdf.f +++ b/SRC/slatdf.f @@ -1,4 +1,4 @@ -*> \brief \b SLATDF +*> \brief \b SLATDF uses the LU factorization of the n-by-n matrix computed by sgetc2 and computes a contribution to the reciprocal Dif-estimate. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slatps.f b/SRC/slatps.f index 78772313..80e42b48 100644 --- a/SRC/slatps.f +++ b/SRC/slatps.f @@ -1,4 +1,4 @@ -*> \brief \b SLATPS +*> \brief \b SLATPS solves a triangular system of equations with the matrix held in packed storage. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slatrd.f b/SRC/slatrd.f index 79782a03..f2d8d2b0 100644 --- a/SRC/slatrd.f +++ b/SRC/slatrd.f @@ -1,4 +1,4 @@ -*> \brief \b SLATRD +*> \brief \b SLATRD reduces the first nb rows and columns of a symmetric/Hermitian matrix A to real tridiagonal form by an orthogonal similarity transformation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slatrs.f b/SRC/slatrs.f index 2b432b6e..b3d91bd8 100644 --- a/SRC/slatrs.f +++ b/SRC/slatrs.f @@ -1,4 +1,4 @@ -*> \brief \b SLATRS +*> \brief \b SLATRS solves a triangular system of equations with the scale factor set to prevent overflow. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slatrz.f b/SRC/slatrz.f index 6977812c..0df37831 100644 --- a/SRC/slatrz.f +++ b/SRC/slatrz.f @@ -1,4 +1,4 @@ -*> \brief \b SLATRZ +*> \brief \b SLATRZ factors an upper trapezoidal matrix by means of orthogonal transformations. * * =========== DOCUMENTATION =========== * diff --git a/SRC/slauu2.f b/SRC/slauu2.f index c36434e1..f692a03b 100644 --- a/SRC/slauu2.f +++ b/SRC/slauu2.f @@ -1,4 +1,4 @@ -*> \brief \b SLAUU2 +*> \brief \b SLAUU2 computes the product UUH or LHL, where U and L are upper or lower triangular matrices (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/slauum.f b/SRC/slauum.f index 82c05871..55e552e6 100644 --- a/SRC/slauum.f +++ b/SRC/slauum.f @@ -1,4 +1,4 @@ -*> \brief \b SLAUUM +*> \brief \b SLAUUM computes the product UUH or LHL, where U and L are upper or lower triangular matrices (blocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/sorg2l.f b/SRC/sorg2l.f index 283d56ed..b8d3fc7f 100644 --- a/SRC/sorg2l.f +++ b/SRC/sorg2l.f @@ -1,4 +1,4 @@ -*> \brief \b SORG2L +*> \brief \b SORG2L generates all or part of the orthogonal matrix Q from a QL factorization determined by sgeqlf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/sorg2r.f b/SRC/sorg2r.f index d8ae457e..a80defa1 100644 --- a/SRC/sorg2r.f +++ b/SRC/sorg2r.f @@ -1,4 +1,4 @@ -*> \brief \b SORG2R +*> \brief \b SORG2R generates all or part of the orthogonal matrix Q from a QR factorization determined by sgeqrf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/sorgr2.f b/SRC/sorgr2.f index 3d751ed1..5012cb62 100644 --- a/SRC/sorgr2.f +++ b/SRC/sorgr2.f @@ -1,4 +1,4 @@ -*> \brief \b SORGR2 +*> \brief \b SORGR2 generates all or part of the orthogonal matrix Q from an RQ factorization determined by sgerqf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/sorm2l.f b/SRC/sorm2l.f index ab2975bc..dbb90588 100644 --- a/SRC/sorm2l.f +++ b/SRC/sorm2l.f @@ -1,4 +1,4 @@ -*> \brief \b SORM2L +*> \brief \b SORM2L multiplies a general matrix by the orthogonal matrix from a QL factorization determined by sgeqlf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/sorm2r.f b/SRC/sorm2r.f index 33322176..425ddbbe 100644 --- a/SRC/sorm2r.f +++ b/SRC/sorm2r.f @@ -1,4 +1,4 @@ -*> \brief \b SORM2R +*> \brief \b SORM2R multiplies a general matrix by the orthogonal matrix from a QR factorization determined by sgeqrf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/sorml2.f b/SRC/sorml2.f index 8627a4fa..cf0fecf1 100644 --- a/SRC/sorml2.f +++ b/SRC/sorml2.f @@ -1,4 +1,4 @@ -*> \brief \b SORML2 +*> \brief \b SORML2 multiplies a general matrix by the orthogonal matrix from a LQ factorization determined by sgelqf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/sormr2.f b/SRC/sormr2.f index df9ff798..e1b36c10 100644 --- a/SRC/sormr2.f +++ b/SRC/sormr2.f @@ -1,4 +1,4 @@ -*> \brief \b SORMR2 +*> \brief \b SORMR2 multiplies a general matrix by the orthogonal matrix from a RQ factorization determined by sgerqf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/sormr3.f b/SRC/sormr3.f index a5f37934..171db1e5 100644 --- a/SRC/sormr3.f +++ b/SRC/sormr3.f @@ -1,4 +1,4 @@ -*> \brief \b SORMR3 +*> \brief \b SORMR3 multiplies a general matrix by the orthogonal matrix from a RZ factorization determined by stzrzf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/spbtf2.f b/SRC/spbtf2.f index 24346222..fbd30ed4 100644 --- a/SRC/spbtf2.f +++ b/SRC/spbtf2.f @@ -1,4 +1,4 @@ -*> \brief \b SPBTF2 +*> \brief \b SPBTF2 computes the Cholesky factorization of a symmetric/Hermitian positive definite band matrix (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/spotf2.f b/SRC/spotf2.f index 5eaf29b7..ff48696e 100644 --- a/SRC/spotf2.f +++ b/SRC/spotf2.f @@ -1,4 +1,4 @@ -*> \brief \b SPOTF2 +*> \brief \b SPOTF2 computes the Cholesky factorization of a symmetric/Hermitian positive definite matrix (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/spstf2.f b/SRC/spstf2.f index 5f6a4cac..37871823 100644 --- a/SRC/spstf2.f +++ b/SRC/spstf2.f @@ -1,4 +1,4 @@ -*> \brief \b SPSTF2 +*> \brief \b SPSTF2 computes the Cholesky factorization with complete pivoting of a real symmetric or complex Hermitian positive semi-definite matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/sptts2.f b/SRC/sptts2.f index d39a9e67..8bc3910e 100644 --- a/SRC/sptts2.f +++ b/SRC/sptts2.f @@ -1,4 +1,4 @@ -*> \brief \b SPTTS2 +*> \brief \b SPTTS2 solves a tridiagonal system of the form AX=B using the L D LH factorization computed by spttrf. * * =========== DOCUMENTATION =========== * diff --git a/SRC/srscl.f b/SRC/srscl.f index 67b52909..415c9b48 100644 --- a/SRC/srscl.f +++ b/SRC/srscl.f @@ -1,4 +1,4 @@ -*> \brief \b SRSCL +*> \brief \b SRSCL multiplies a vector by the reciprocal of a real scalar. * * =========== DOCUMENTATION =========== * diff --git a/SRC/ssfrk.f b/SRC/ssfrk.f index 28c7af45..082ce3b7 100644 --- a/SRC/ssfrk.f +++ b/SRC/ssfrk.f @@ -1,4 +1,4 @@ -*> \brief \b SSFRK +*> \brief \b SSFRK performs a symmetric rank-k operation for matrix in RFP format. * * =========== DOCUMENTATION =========== * diff --git a/SRC/ssygs2.f b/SRC/ssygs2.f index 6d5bf289..c4a2d6d7 100644 --- a/SRC/ssygs2.f +++ b/SRC/ssygs2.f @@ -1,4 +1,4 @@ -*> \brief \b SSYGS2 +*> \brief \b SSYGS2 reduces a symmetric definite generalized eigenproblem to standard form, using the factorization results obtained from spotrf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ssyswapr.f b/SRC/ssyswapr.f index ddca7df5..44cfb03f 100644 --- a/SRC/ssyswapr.f +++ b/SRC/ssyswapr.f @@ -1,4 +1,4 @@ -*> \brief \b SSYSWAPR +*> \brief \b SSYSWAPR applies an elementary permutation on the rows and columns of a symmetric matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/ssytd2.f b/SRC/ssytd2.f index 3a9f4092..dd7fa072 100644 --- a/SRC/ssytd2.f +++ b/SRC/ssytd2.f @@ -1,4 +1,4 @@ -*> \brief \b SSYTD2 +*> \brief \b SSYTD2 reduces a symmetric matrix to real symmetric tridiagonal form by an orthogonal similarity transformation (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ssytf2.f b/SRC/ssytf2.f index d3fe4ce9..e7f7e3f1 100644 --- a/SRC/ssytf2.f +++ b/SRC/ssytf2.f @@ -1,4 +1,4 @@ -*> \brief \b SSYTF2 +*> \brief \b SSYTF2 computes the factorization of a real symmetric indefinite matrix, using the diagonal pivoting method (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/stfsm.f b/SRC/stfsm.f index 262fda71..23dabd92 100644 --- a/SRC/stfsm.f +++ b/SRC/stfsm.f @@ -1,4 +1,4 @@ -*> \brief \b STFSM +*> \brief \b STFSM solves a matrix equation (one operand is a triangular matrix in RFP format). * * =========== DOCUMENTATION =========== * diff --git a/SRC/stfttp.f b/SRC/stfttp.f index 39cd248d..d1b6476c 100644 --- a/SRC/stfttp.f +++ b/SRC/stfttp.f @@ -1,4 +1,4 @@ -*> \brief \b STFTTP +*> \brief \b STFTTP copies a triangular matrix from the rectangular full packed format (TF) to the standard packed format (TP). * * =========== DOCUMENTATION =========== * diff --git a/SRC/stfttr.f b/SRC/stfttr.f index 529a255e..3795fe07 100644 --- a/SRC/stfttr.f +++ b/SRC/stfttr.f @@ -1,4 +1,4 @@ -*> \brief \b STFTTR +*> \brief \b STFTTR copies a triangular matrix from the rectangular full packed format (TF) to the standard full format (TR). * * =========== DOCUMENTATION =========== * diff --git a/SRC/stgex2.f b/SRC/stgex2.f index dd884604..2a351afe 100644 --- a/SRC/stgex2.f +++ b/SRC/stgex2.f @@ -1,4 +1,4 @@ -*> \brief \b STGEX2 +*> \brief \b STGEX2 swaps adjacent diagonal blocks in an upper (quasi) triangular matrix pair by an orthogonal equivalence transformation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/stgsy2.f b/SRC/stgsy2.f index 2b585fea..9ad53f25 100644 --- a/SRC/stgsy2.f +++ b/SRC/stgsy2.f @@ -1,4 +1,4 @@ -*> \brief \b STGSY2 +*> \brief \b STGSY2 solves the generalized Sylvester equation (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/stpqrt2.f b/SRC/stpqrt2.f index d4b6d17f..19565eaf 100644 --- a/SRC/stpqrt2.f +++ b/SRC/stpqrt2.f @@ -1,4 +1,4 @@ -*> \brief \b STPQRT2 +*> \brief \b STPQRT2 computes a QR factorization of a real or complex "triangular-pentagonal" matrix, which is composed of a triangular block and a pentagonal block, using the compact WY representation for Q. * * =========== DOCUMENTATION =========== * diff --git a/SRC/stprfb.f b/SRC/stprfb.f index a666da2c..c86a4492 100644 --- a/SRC/stprfb.f +++ b/SRC/stprfb.f @@ -1,4 +1,4 @@ -*> \brief \b STPRFB +*> \brief \b STPRFB applies a real or complex "triangular-pentagonal" blocked reflector to a real or complex matrix, which is composed of two blocks. * * =========== DOCUMENTATION =========== * diff --git a/SRC/stpttf.f b/SRC/stpttf.f index fbcd3ca6..acec5b95 100644 --- a/SRC/stpttf.f +++ b/SRC/stpttf.f @@ -1,4 +1,4 @@ -*> \brief \b STPTTF +*> \brief \b STPTTF copies a triangular matrix from the standard packed format (TP) to the rectangular full packed format (TF). * * =========== DOCUMENTATION =========== * diff --git a/SRC/stpttr.f b/SRC/stpttr.f index 8fb02de0..b2e60170 100644 --- a/SRC/stpttr.f +++ b/SRC/stpttr.f @@ -1,4 +1,4 @@ -*> \brief \b STPTTR +*> \brief \b STPTTR copies a triangular matrix from the standard packed format (TP) to the standard full format (TR). * * =========== DOCUMENTATION =========== * diff --git a/SRC/strti2.f b/SRC/strti2.f index 60e66dbb..d9185ff1 100644 --- a/SRC/strti2.f +++ b/SRC/strti2.f @@ -1,4 +1,4 @@ -*> \brief \b STRTI2 +*> \brief \b STRTI2 computes the inverse of a triangular matrix (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/strttf.f b/SRC/strttf.f index 3f89b4cc..61f1bbdf 100644 --- a/SRC/strttf.f +++ b/SRC/strttf.f @@ -1,4 +1,4 @@ -*> \brief \b STRTTF +*> \brief \b STRTTF copies a triangular matrix from the standard full format (TR) to the rectangular full packed format (TF). * * =========== DOCUMENTATION =========== * diff --git a/SRC/strttp.f b/SRC/strttp.f index 13f8bcf1..a2e9ea38 100644 --- a/SRC/strttp.f +++ b/SRC/strttp.f @@ -1,4 +1,4 @@ -*> \brief \b STRTTP +*> \brief \b STRTTP copies a triangular matrix from the standard full format (TR) to the standard packed format (TP). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zdrscl.f b/SRC/zdrscl.f index 4069efbe..55f91a22 100644 --- a/SRC/zdrscl.f +++ b/SRC/zdrscl.f @@ -1,4 +1,4 @@ -*> \brief \b ZDRSCL +*> \brief \b ZDRSCL multiplies a vector by the reciprocal of a real scalar. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zgbtf2.f b/SRC/zgbtf2.f index 508314c6..9fbf2e66 100644 --- a/SRC/zgbtf2.f +++ b/SRC/zgbtf2.f @@ -1,4 +1,4 @@ -*> \brief \b ZGBTF2 +*> \brief \b ZGBTF2 computes the LU factorization of a general band matrix using the unblocked version of the algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zgebd2.f b/SRC/zgebd2.f index 97abbab3..dab36a94 100644 --- a/SRC/zgebd2.f +++ b/SRC/zgebd2.f @@ -1,4 +1,4 @@ -*> \brief \b ZGEBD2 +*> \brief \b ZGEBD2 reduces a general matrix to bidiagonal form using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zgehd2.f b/SRC/zgehd2.f index a3b99787..7c778ae5 100644 --- a/SRC/zgehd2.f +++ b/SRC/zgehd2.f @@ -1,4 +1,4 @@ -*> \brief \b ZGEHD2 +*> \brief \b ZGEHD2 reduces a general square matrix to upper Hessenberg form using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zgelq2.f b/SRC/zgelq2.f index 0f6e0bd6..7b410e86 100644 --- a/SRC/zgelq2.f +++ b/SRC/zgelq2.f @@ -1,4 +1,4 @@ -*> \brief \b ZGELQ2 +*> \brief \b ZGELQ2 computes the LQ factorization of a general rectangular matrix using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zgeql2.f b/SRC/zgeql2.f index 61bf7009..ffa58a29 100644 --- a/SRC/zgeql2.f +++ b/SRC/zgeql2.f @@ -1,4 +1,4 @@ -*> \brief \b ZGEQL2 +*> \brief \b ZGEQL2 computes the QL factorization of a general rectangular matrix using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zgeqp3.f b/SRC/zgeqp3.f index b0f33c8e..47f836d2 100644 --- a/SRC/zgeqp3.f +++ b/SRC/zgeqp3.f @@ -144,7 +144,7 @@ *> *> H(i) = I - tau * v * v**H *> -*> where tau is a real/complex scalar, and v is a real/complex vector +*> where tau is a complex scalar, and v is a real/complex vector *> with v(1:i-1) = 0 and v(i) = 1; v(i+1:m) is stored on exit in *> A(i+1:m,i), and tau in TAU(i). *> \endverbatim diff --git a/SRC/zgeqr2.f b/SRC/zgeqr2.f index 6aa510ac..d87fa13e 100644 --- a/SRC/zgeqr2.f +++ b/SRC/zgeqr2.f @@ -1,4 +1,4 @@ -*> \brief \b ZGEQR2 +*> \brief \b ZGEQR2 computes the QR factorization of a general rectangular matrix using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zgeqr2p.f b/SRC/zgeqr2p.f index d9d39501..caafe3db 100644 --- a/SRC/zgeqr2p.f +++ b/SRC/zgeqr2p.f @@ -1,4 +1,4 @@ -*> \brief \b ZGEQR2P +*> \brief \b ZGEQR2P computes the QR factorization of a general rectangular matrix with non-negative diagonal elements using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zgeqrt2.f b/SRC/zgeqrt2.f index 932f7fe2..95692e4e 100644 --- a/SRC/zgeqrt2.f +++ b/SRC/zgeqrt2.f @@ -1,4 +1,4 @@ -*> \brief \b ZGEQRT2 +*> \brief \b ZGEQRT2 computes a QR factorization of a general real or complex matrix using the compact WY representation of Q. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zgeqrt3.f b/SRC/zgeqrt3.f index d987089e..713976b3 100644 --- a/SRC/zgeqrt3.f +++ b/SRC/zgeqrt3.f @@ -1,4 +1,4 @@ -*> \brief \b ZGEQRT3 +*> \brief \b ZGEQRT3 recursively computes a QR factorization of a general real or complex matrix using the compact WY representation of Q. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zgerq2.f b/SRC/zgerq2.f index 0b6b9bb6..bf09041e 100644 --- a/SRC/zgerq2.f +++ b/SRC/zgerq2.f @@ -1,4 +1,4 @@ -*> \brief \b ZGERQ2 +*> \brief \b ZGERQ2 computes the RQ factorization of a general rectangular matrix using an unblocked algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zgesc2.f b/SRC/zgesc2.f index 570745e7..9e90006c 100644 --- a/SRC/zgesc2.f +++ b/SRC/zgesc2.f @@ -1,4 +1,4 @@ -*> \brief \b ZGESC2 +*> \brief \b ZGESC2 solves a system of linear equations using the LU factorization with complete pivoting computed by sgetc2. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zgetc2.f b/SRC/zgetc2.f index 33ec0472..1502e7a0 100644 --- a/SRC/zgetc2.f +++ b/SRC/zgetc2.f @@ -1,4 +1,4 @@ -*> \brief \b ZGETC2 +*> \brief \b ZGETC2 computes the LU factorization with complete pivoting of the general n-by-n matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zgetf2.f b/SRC/zgetf2.f index acb06717..61560e56 100644 --- a/SRC/zgetf2.f +++ b/SRC/zgetf2.f @@ -1,4 +1,4 @@ -*> \brief \b ZGETF2 +*> \brief \b ZGETF2 computes the LU factorization of a general m-by-n matrix using partial pivoting with row interchanges (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zgtts2.f b/SRC/zgtts2.f index a7c508ab..4fb03b44 100644 --- a/SRC/zgtts2.f +++ b/SRC/zgtts2.f @@ -1,4 +1,4 @@ -*> \brief \b ZGTTS2 +*> \brief \b ZGTTS2 solves a system of linear equations with a tridiagonal matrix using the LU factorization computed by sgttrf. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zhegs2.f b/SRC/zhegs2.f index 5a6f9a80..95b1e075 100644 --- a/SRC/zhegs2.f +++ b/SRC/zhegs2.f @@ -1,4 +1,4 @@ -*> \brief \b ZHEGS2 +*> \brief \b ZHEGS2 reduces a Hermitian definite generalized eigenproblem to standard form, using the factorization results obtained from cpotrf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zheswapr.f b/SRC/zheswapr.f index 8a567d6c..b9ff454f 100644 --- a/SRC/zheswapr.f +++ b/SRC/zheswapr.f @@ -1,4 +1,4 @@ -*> \brief \b ZHESWAPR +*> \brief \b ZHESWAPR applies an elementary permutation on the rows and columns of a Hermitian matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zhetd2.f b/SRC/zhetd2.f index f4ec232d..bb5b4a0d 100644 --- a/SRC/zhetd2.f +++ b/SRC/zhetd2.f @@ -1,4 +1,4 @@ -*> \brief \b ZHETD2 +*> \brief \b ZHETD2 reduces a Hermitian matrix to real symmetric tridiagonal form by an unitary similarity transformation (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zhetf2.f b/SRC/zhetf2.f index 88cc9507..351fce6c 100644 --- a/SRC/zhetf2.f +++ b/SRC/zhetf2.f @@ -1,4 +1,4 @@ -*> \brief \b ZHETF2 +*> \brief \b ZHETF2 computes the factorization of a complex Hermitian matrix, using the diagonal pivoting method (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zhfrk.f b/SRC/zhfrk.f index 33042fbb..1e2448ff 100644 --- a/SRC/zhfrk.f +++ b/SRC/zhfrk.f @@ -1,4 +1,4 @@ -*> \brief \b ZHFRK +*> \brief \b ZHFRK performs a Hermitian rank-k operation for matrix in RFP format. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_gbamv.f b/SRC/zla_gbamv.f index daeef4f4..76d99978 100644 --- a/SRC/zla_gbamv.f +++ b/SRC/zla_gbamv.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_GBAMV +*> \brief \b ZLA_GBAMV performs a matrix-vector operation to calculate error bounds. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_gbrcond_c.f b/SRC/zla_gbrcond_c.f index 35b34365..a7a3eef0 100644 --- a/SRC/zla_gbrcond_c.f +++ b/SRC/zla_gbrcond_c.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_GBRCOND_C +*> \brief \b ZLA_GBRCOND_C computes the infinity norm condition number of op(A)*inv(diag(c)) for general banded matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_gbrcond_x.f b/SRC/zla_gbrcond_x.f index 5abf4686..5c702ad3 100644 --- a/SRC/zla_gbrcond_x.f +++ b/SRC/zla_gbrcond_x.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_GBRCOND_X +*> \brief \b ZLA_GBRCOND_X computes the infinity norm condition number of op(A)*diag(x) for general banded matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_gbrfsx_extended.f b/SRC/zla_gbrfsx_extended.f index 7791eed9..75390e67 100644 --- a/SRC/zla_gbrfsx_extended.f +++ b/SRC/zla_gbrfsx_extended.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_GBRFSX_EXTENDED +*> \brief \b ZLA_GBRFSX_EXTENDED improves the computed solution to a system of linear equations for general banded matrices by performing extra-precise iterative refinement and provides error bounds and backward error estimates for the solution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_gbrpvgrw.f b/SRC/zla_gbrpvgrw.f index b7312e03..55d704de 100644 --- a/SRC/zla_gbrpvgrw.f +++ b/SRC/zla_gbrpvgrw.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_GBRPVGRW +*> \brief \b ZLA_GBRPVGRW computes the reciprocal pivot growth factor norm(A)/norm(U) for a general banded matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_geamv.f b/SRC/zla_geamv.f index 9c6439b0..b7d36fcb 100644 --- a/SRC/zla_geamv.f +++ b/SRC/zla_geamv.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_GEAMV +*> \brief \b ZLA_GEAMV computes a matrix-vector product using a general matrix to calculate error bounds. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_gercond_c.f b/SRC/zla_gercond_c.f index 10ce3dc4..97d6625b 100644 --- a/SRC/zla_gercond_c.f +++ b/SRC/zla_gercond_c.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_GERCOND_C +*> \brief \b ZLA_GERCOND_C computes the infinity norm condition number of op(A)*inv(diag(c)) for general matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_gercond_x.f b/SRC/zla_gercond_x.f index 1f55ada6..61322a0f 100644 --- a/SRC/zla_gercond_x.f +++ b/SRC/zla_gercond_x.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_GERCOND_X +*> \brief \b ZLA_GERCOND_X computes the infinity norm condition number of op(A)*diag(x) for general matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_gerpvgrw.f b/SRC/zla_gerpvgrw.f index 7577310d..278a6a29 100644 --- a/SRC/zla_gerpvgrw.f +++ b/SRC/zla_gerpvgrw.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_GERPVGRW +*> \brief \b ZLA_GERPVGRW multiplies a square real matrix by a complex matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_heamv.f b/SRC/zla_heamv.f index cb987ed0..c2e27095 100644 --- a/SRC/zla_heamv.f +++ b/SRC/zla_heamv.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_HEAMV +*> \brief \b ZLA_HEAMV computes a matrix-vector product using a Hermitian indefinite matrix to calculate error bounds. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_hercond_c.f b/SRC/zla_hercond_c.f index 586cf9b6..21caae85 100644 --- a/SRC/zla_hercond_c.f +++ b/SRC/zla_hercond_c.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_HERCOND_C +*> \brief \b ZLA_HERCOND_C computes the infinity norm condition number of op(A)*inv(diag(c)) for Hermitian indefinite matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_hercond_x.f b/SRC/zla_hercond_x.f index a3b19cf4..2fe47d7f 100644 --- a/SRC/zla_hercond_x.f +++ b/SRC/zla_hercond_x.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_HERCOND_X +*> \brief \b ZLA_HERCOND_X computes the infinity norm condition number of op(A)*diag(x) for Hermitian indefinite matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_herfsx_extended.f b/SRC/zla_herfsx_extended.f index 9f8c4e38..4611d61e 100644 --- a/SRC/zla_herfsx_extended.f +++ b/SRC/zla_herfsx_extended.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_HERFSX_EXTENDED +*> \brief \b ZLA_HERFSX_EXTENDED improves the computed solution to a system of linear equations for Hermitian indefinite matrices by performing extra-precise iterative refinement and provides error bounds and backward error estimates for the solution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_lin_berr.f b/SRC/zla_lin_berr.f index 0ed57f16..2c5795a8 100644 --- a/SRC/zla_lin_berr.f +++ b/SRC/zla_lin_berr.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_LIN_BERR +*> \brief \b ZLA_LIN_BERR computes a component-wise relative backward error. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_porcond_c.f b/SRC/zla_porcond_c.f index 806ef8c1..84229c8a 100644 --- a/SRC/zla_porcond_c.f +++ b/SRC/zla_porcond_c.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_PORCOND_C +*> \brief \b ZLA_PORCOND_C computes the infinity norm condition number of op(A)*inv(diag(c)) for Hermitian positive-definite matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_porcond_x.f b/SRC/zla_porcond_x.f index d293df95..b6fef8f0 100644 --- a/SRC/zla_porcond_x.f +++ b/SRC/zla_porcond_x.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_PORCOND_X +*> \brief \b ZLA_PORCOND_X computes the infinity norm condition number of op(A)*diag(x) for Hermitian positive-definite matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_porfsx_extended.f b/SRC/zla_porfsx_extended.f index 07a49bc4..9873bb73 100644 --- a/SRC/zla_porfsx_extended.f +++ b/SRC/zla_porfsx_extended.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_PORFSX_EXTENDED +*> \brief \b ZLA_PORFSX_EXTENDED improves the computed solution to a system of linear equations for symmetric or Hermitian positive-definite matrices by performing extra-precise iterative refinement and provides error bounds and backward error estimates for the solution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_porpvgrw.f b/SRC/zla_porpvgrw.f index df511bcb..7310f331 100644 --- a/SRC/zla_porpvgrw.f +++ b/SRC/zla_porpvgrw.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_PORPVGRW +*> \brief \b ZLA_PORPVGRW computes the reciprocal pivot growth factor norm(A)/norm(U) for a symmetric or Hermitian positive-definite matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_syamv.f b/SRC/zla_syamv.f index 45cb90e3..41690d9a 100644 --- a/SRC/zla_syamv.f +++ b/SRC/zla_syamv.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_SYAMV +*> \brief \b ZLA_SYAMV computes a matrix-vector product using a symmetric indefinite matrix to calculate error bounds. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_syrcond_c.f b/SRC/zla_syrcond_c.f index f0ed72d3..aa6f063d 100644 --- a/SRC/zla_syrcond_c.f +++ b/SRC/zla_syrcond_c.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_SYRCOND_C +*> \brief \b ZLA_SYRCOND_C computes the infinity norm condition number of op(A)*inv(diag(c)) for symmetric indefinite matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_syrcond_x.f b/SRC/zla_syrcond_x.f index aeed038b..9dd74b2a 100644 --- a/SRC/zla_syrcond_x.f +++ b/SRC/zla_syrcond_x.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_SYRCOND_X +*> \brief \b ZLA_SYRCOND_X computes the infinity norm condition number of op(A)*diag(x) for symmetric indefinite matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_syrfsx_extended.f b/SRC/zla_syrfsx_extended.f index 7dcc80e3..e19dfeae 100644 --- a/SRC/zla_syrfsx_extended.f +++ b/SRC/zla_syrfsx_extended.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_SYRFSX_EXTENDED +*> \brief \b ZLA_SYRFSX_EXTENDED improves the computed solution to a system of linear equations for symmetric indefinite matrices by performing extra-precise iterative refinement and provides error bounds and backward error estimates for the solution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_syrpvgrw.f b/SRC/zla_syrpvgrw.f index 360c1fba..814a40b8 100644 --- a/SRC/zla_syrpvgrw.f +++ b/SRC/zla_syrpvgrw.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_SYRPVGRW +*> \brief \b ZLA_SYRPVGRW computes the reciprocal pivot growth factor norm(A)/norm(U) for a symmetric indefinite matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zla_wwaddw.f b/SRC/zla_wwaddw.f index b8f102ae..d2ae898b 100644 --- a/SRC/zla_wwaddw.f +++ b/SRC/zla_wwaddw.f @@ -1,4 +1,4 @@ -*> \brief \b ZLA_WWADDW +*> \brief \b ZLA_WWADDW adds a vector into a doubled-single vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlabrd.f b/SRC/zlabrd.f index 1ea14b38..a3923ff8 100644 --- a/SRC/zlabrd.f +++ b/SRC/zlabrd.f @@ -1,4 +1,4 @@ -*> \brief \b ZLABRD +*> \brief \b ZLABRD reduces the first nb rows and columns of a general matrix to a bidiagonal form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlacgv.f b/SRC/zlacgv.f index 16c2e2ed..57135790 100644 --- a/SRC/zlacgv.f +++ b/SRC/zlacgv.f @@ -1,4 +1,4 @@ -*> \brief \b ZLACGV +*> \brief \b ZLACGV conjugates a complex vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlacn2.f b/SRC/zlacn2.f index 14875e1f..5f6cfbc6 100644 --- a/SRC/zlacn2.f +++ b/SRC/zlacn2.f @@ -1,4 +1,4 @@ -*> \brief \b ZLACN2 +*> \brief \b ZLACN2 estimates the 1-norm of a square matrix, using reverse communication for evaluating matrix-vector products. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlacon.f b/SRC/zlacon.f index e81c031d..5ff34930 100644 --- a/SRC/zlacon.f +++ b/SRC/zlacon.f @@ -1,4 +1,4 @@ -*> \brief \b ZLACON +*> \brief \b ZLACON estimates the 1-norm of a square matrix, using reverse communication for evaluating matrix-vector products. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlacp2.f b/SRC/zlacp2.f index 0ec68178..138c1938 100644 --- a/SRC/zlacp2.f +++ b/SRC/zlacp2.f @@ -1,4 +1,4 @@ -*> \brief \b ZLACP2 +*> \brief \b ZLACP2 copies all or part of a real two-dimensional array to a complex array. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlacpy.f b/SRC/zlacpy.f index a443659c..344b7640 100644 --- a/SRC/zlacpy.f +++ b/SRC/zlacpy.f @@ -1,4 +1,4 @@ -*> \brief \b ZLACPY +*> \brief \b ZLACPY copies all or part of one two-dimensional array to another. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlacrm.f b/SRC/zlacrm.f index 0e0eb0ad..1345ac22 100644 --- a/SRC/zlacrm.f +++ b/SRC/zlacrm.f @@ -1,4 +1,4 @@ -*> \brief \b ZLACRM +*> \brief \b ZLACRM multiplies a complex matrix by a square real matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlacrt.f b/SRC/zlacrt.f index f25a8300..162947ad 100644 --- a/SRC/zlacrt.f +++ b/SRC/zlacrt.f @@ -1,4 +1,4 @@ -*> \brief \b ZLACRT +*> \brief \b ZLACRT performs a linear transformation of a pair of complex vectors. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zladiv.f b/SRC/zladiv.f index aa71db14..129d8413 100644 --- a/SRC/zladiv.f +++ b/SRC/zladiv.f @@ -1,4 +1,4 @@ -*> \brief \b ZLADIV +*> \brief \b ZLADIV performs complex division in real arithmetic, avoiding unnecessary overflow. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaed0.f b/SRC/zlaed0.f index 81ca6ed0..16ee6dea 100644 --- a/SRC/zlaed0.f +++ b/SRC/zlaed0.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAED0 +*> \brief \b ZLAED0 used by sstedc. Computes all eigenvalues and corresponding eigenvectors of an unreduced symmetric tridiagonal matrix using the divide and conquer method. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaed7.f b/SRC/zlaed7.f index dea3a31d..48e00fbb 100644 --- a/SRC/zlaed7.f +++ b/SRC/zlaed7.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAED7 +*> \brief \b ZLAED7 used by sstedc. Computes the updated eigensystem of a diagonal matrix after modification by a rank-one symmetric matrix. Used when the original matrix is dense. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaed8.f b/SRC/zlaed8.f index 580e3b1b..d94cbbf7 100644 --- a/SRC/zlaed8.f +++ b/SRC/zlaed8.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAED8 +*> \brief \b ZLAED8 used by sstedc. Merges eigenvalues and deflates secular equation. Used when the original matrix is dense. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaein.f b/SRC/zlaein.f index f229640a..3708eb42 100644 --- a/SRC/zlaein.f +++ b/SRC/zlaein.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAEIN +*> \brief \b ZLAEIN computes a specified right or left eigenvector of an upper Hessenberg matrix by inverse iteration. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaesy.f b/SRC/zlaesy.f index 82bc00b6..008861e8 100644 --- a/SRC/zlaesy.f +++ b/SRC/zlaesy.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAESY +*> \brief \b ZLAESY computes the eigenvalues and eigenvectors of a 2-by-2 complex symmetric matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaev2.f b/SRC/zlaev2.f index bd298280..734331e6 100644 --- a/SRC/zlaev2.f +++ b/SRC/zlaev2.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAEV2 +*> \brief \b ZLAEV2 computes the eigenvalues and eigenvectors of a 2-by-2 symmetric/Hermitian matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlag2c.f b/SRC/zlag2c.f index 3dc23705..d9787976 100644 --- a/SRC/zlag2c.f +++ b/SRC/zlag2c.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAG2C +*> \brief \b ZLAG2C converts a complex double precision matrix to a complex single precision matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlagtm.f b/SRC/zlagtm.f index baba9c17..bfb9936b 100644 --- a/SRC/zlagtm.f +++ b/SRC/zlagtm.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAGTM +*> \brief \b ZLAGTM performs a matrix-matrix product of the form C = αAB+βC, where A is a tridiagonal matrix, B and C are rectangular matrices, and α and β are scalars, which may be 0, 1, or -1. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlahef.f b/SRC/zlahef.f index cf27b477..0f0376ee 100644 --- a/SRC/zlahef.f +++ b/SRC/zlahef.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAHEF +*> \brief \b ZLAHEF computes a partial factorization of a complex Hermitian indefinite matrix, using the diagonal pivoting method. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlahqr.f b/SRC/zlahqr.f index 5f330487..a49ae680 100644 --- a/SRC/zlahqr.f +++ b/SRC/zlahqr.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAHQR +*> \brief \b ZLAHQR computes the eigenvalues and Schur factorization of an upper Hessenberg matrix, using the double-shift/single-shift QR algorithm. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlahr2.f b/SRC/zlahr2.f index e5ea7f05..dc80767c 100644 --- a/SRC/zlahr2.f +++ b/SRC/zlahr2.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAHR2 +*> \brief \b ZLAHR2 reduces the specified number of first columns of a general rectangular matrix A so that elements below the specified subdiagonal are zero, and returns auxiliary matrices which are needed to apply the transformation to the unreduced part of A. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlahrd.f b/SRC/zlahrd.f index f4284108..16624280 100644 --- a/SRC/zlahrd.f +++ b/SRC/zlahrd.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAHRD +*> \brief \b ZLAHRD reduces the first nb columns of a general rectangular matrix A so that elements below the k-th subdiagonal are zero, and returns auxiliary matrices which are needed to apply the transformation to the unreduced part of A. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaic1.f b/SRC/zlaic1.f index 7425600e..37efdf4d 100644 --- a/SRC/zlaic1.f +++ b/SRC/zlaic1.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAIC1 +*> \brief \b ZLAIC1 applies one step of incremental condition estimation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlals0.f b/SRC/zlals0.f index adbb5bed..6076562a 100644 --- a/SRC/zlals0.f +++ b/SRC/zlals0.f @@ -1,4 +1,4 @@ -*> \brief \b ZLALS0 +*> \brief \b ZLALS0 applies back multiplying factors in solving the least squares problem using divide and conquer SVD approach. Used by sgelsd. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlalsa.f b/SRC/zlalsa.f index d391d6d4..9abd52ec 100644 --- a/SRC/zlalsa.f +++ b/SRC/zlalsa.f @@ -1,4 +1,4 @@ -*> \brief \b ZLALSA +*> \brief \b ZLALSA computes the SVD of the coefficient matrix in compact form. Used by sgelsd. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlalsd.f b/SRC/zlalsd.f index 8ce75861..82f1ffb9 100644 --- a/SRC/zlalsd.f +++ b/SRC/zlalsd.f @@ -1,4 +1,4 @@ -*> \brief \b ZLALSD +*> \brief \b ZLALSD uses the singular value decomposition of A to solve the least squares problem. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlangb.f b/SRC/zlangb.f index 160fd42c..2c06e0ba 100644 --- a/SRC/zlangb.f +++ b/SRC/zlangb.f @@ -1,4 +1,4 @@ -*> \brief \b ZLANGB +*> \brief \b ZLANGB returns the value of the 1-norm, Frobenius norm, infinity-norm, or the largest absolute value of any element of general band matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlange.f b/SRC/zlange.f index 72411ee8..4fcd0eed 100644 --- a/SRC/zlange.f +++ b/SRC/zlange.f @@ -1,4 +1,4 @@ -*> \brief \b ZLANGE +*> \brief \b ZLANGE returns the value of the 1-norm, Frobenius norm, infinity-norm, or the largest absolute value of any element of a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlangt.f b/SRC/zlangt.f index a27b20b7..db8fe571 100644 --- a/SRC/zlangt.f +++ b/SRC/zlangt.f @@ -1,4 +1,4 @@ -*> \brief \b ZLANGT +*> \brief \b ZLANGT returns the value of the 1-norm, Frobenius norm, infinity-norm, or the largest absolute value of any element of a general tridiagonal matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlanhb.f b/SRC/zlanhb.f index 1fde1f7b..2c546542 100644 --- a/SRC/zlanhb.f +++ b/SRC/zlanhb.f @@ -1,4 +1,4 @@ -*> \brief \b ZLANHB +*> \brief \b ZLANHB returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a Hermitian band matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlanhe.f b/SRC/zlanhe.f index e03a3027..5a5df2ea 100644 --- a/SRC/zlanhe.f +++ b/SRC/zlanhe.f @@ -1,4 +1,4 @@ -*> \brief \b ZLANHE +*> \brief \b ZLANHE returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a complex Hermitian matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlanhf.f b/SRC/zlanhf.f index c0d69a5c..7bef2cd3 100644 --- a/SRC/zlanhf.f +++ b/SRC/zlanhf.f @@ -1,4 +1,4 @@ -*> \brief \b ZLANHF +*> \brief \b ZLANHF returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a Hermitian matrix in RFP format. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlanhp.f b/SRC/zlanhp.f index 44832ce6..cf36cad0 100644 --- a/SRC/zlanhp.f +++ b/SRC/zlanhp.f @@ -1,4 +1,4 @@ -*> \brief \b ZLANHP +*> \brief \b ZLANHP returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a complex Hermitian matrix supplied in packed form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlanhs.f b/SRC/zlanhs.f index c168ba70..f14932d2 100644 --- a/SRC/zlanhs.f +++ b/SRC/zlanhs.f @@ -1,4 +1,4 @@ -*> \brief \b ZLANHS +*> \brief \b ZLANHS returns the value of the 1-norm, Frobenius norm, infinity-norm, or the largest absolute value of any element of an upper Hessenberg matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlanht.f b/SRC/zlanht.f index 9996cdfc..cc57b7bc 100644 --- a/SRC/zlanht.f +++ b/SRC/zlanht.f @@ -1,4 +1,4 @@ -*> \brief \b ZLANHT +*> \brief \b ZLANHT returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a complex Hermitian tridiagonal matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlansb.f b/SRC/zlansb.f index 32310e67..e6f05abd 100644 --- a/SRC/zlansb.f +++ b/SRC/zlansb.f @@ -1,4 +1,4 @@ -*> \brief \b ZLANSB +*> \brief \b ZLANSB returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a symmetric band matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlansp.f b/SRC/zlansp.f index 9c8b6dfb..7f49476a 100644 --- a/SRC/zlansp.f +++ b/SRC/zlansp.f @@ -1,4 +1,4 @@ -*> \brief \b ZLANSP +*> \brief \b ZLANSP returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a symmetric matrix supplied in packed form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlansy.f b/SRC/zlansy.f index 70af416b..28263cf7 100644 --- a/SRC/zlansy.f +++ b/SRC/zlansy.f @@ -1,4 +1,4 @@ -*> \brief \b ZLANSY +*> \brief \b ZLANSY returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a complex symmetric matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlantb.f b/SRC/zlantb.f index 4257a549..4e66c643 100644 --- a/SRC/zlantb.f +++ b/SRC/zlantb.f @@ -1,4 +1,4 @@ -*> \brief \b ZLANTB +*> \brief \b ZLANTB returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a triangular band matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlantp.f b/SRC/zlantp.f index 009554b0..7e38e9ce 100644 --- a/SRC/zlantp.f +++ b/SRC/zlantp.f @@ -1,4 +1,4 @@ -*> \brief \b ZLANTP +*> \brief \b ZLANTP returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a triangular matrix supplied in packed form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlantr.f b/SRC/zlantr.f index dc70dd01..9253b954 100644 --- a/SRC/zlantr.f +++ b/SRC/zlantr.f @@ -1,4 +1,4 @@ -*> \brief \b ZLANTR +*> \brief \b ZLANTR returns the value of the 1-norm, or the Frobenius norm, or the infinity norm, or the element of largest absolute value of a trapezoidal or triangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlapll.f b/SRC/zlapll.f index b59f2197..dbee1dd3 100644 --- a/SRC/zlapll.f +++ b/SRC/zlapll.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAPLL +*> \brief \b ZLAPLL measures the linear dependence of two vectors. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlapmr.f b/SRC/zlapmr.f index 6fe6cedf..8dd7f925 100644 --- a/SRC/zlapmr.f +++ b/SRC/zlapmr.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAPMR +*> \brief \b ZLAPMR rearranges rows of a matrix as specified by a permutation vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlapmt.f b/SRC/zlapmt.f index 6c61d578..7a1b5d9e 100644 --- a/SRC/zlapmt.f +++ b/SRC/zlapmt.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAPMT +*> \brief \b ZLAPMT performs a forward or backward permutation of the columns of a matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaqgb.f b/SRC/zlaqgb.f index 98392221..724a26e3 100644 --- a/SRC/zlaqgb.f +++ b/SRC/zlaqgb.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAQGB +*> \brief \b ZLAQGB scales a general band matrix, using row and column scaling factors computed by sgbequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaqge.f b/SRC/zlaqge.f index 7b2ff475..3f14d3df 100644 --- a/SRC/zlaqge.f +++ b/SRC/zlaqge.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAQGE +*> \brief \b ZLAQGE scales a general rectangular matrix, using row and column scaling factors computed by sgeequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaqhb.f b/SRC/zlaqhb.f index 5bc571a7..6c38d30d 100644 --- a/SRC/zlaqhb.f +++ b/SRC/zlaqhb.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAQHB +*> \brief \b ZLAQHB scales a Hermitian band matrix, using scaling factors computed by cpbequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaqhe.f b/SRC/zlaqhe.f index da8f2da7..1d4cf483 100644 --- a/SRC/zlaqhe.f +++ b/SRC/zlaqhe.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAQHE +*> \brief \b ZLAQHE scales a Hermitian matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaqhp.f b/SRC/zlaqhp.f index 23d22faa..ac2cd429 100644 --- a/SRC/zlaqhp.f +++ b/SRC/zlaqhp.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAQHP +*> \brief \b ZLAQHP scales a Hermitian matrix stored in packed form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaqp2.f b/SRC/zlaqp2.f index fb00375f..3f1d5adb 100644 --- a/SRC/zlaqp2.f +++ b/SRC/zlaqp2.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAQP2 +*> \brief \b ZLAQP2 computes a QR factorization with column pivoting of the matrix block. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaqps.f b/SRC/zlaqps.f index b83931ef..f37c8a38 100644 --- a/SRC/zlaqps.f +++ b/SRC/zlaqps.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAQPS +*> \brief \b ZLAQPS computes a step of QR factorization with column pivoting of a real m-by-n matrix A by using BLAS level 3. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaqr0.f b/SRC/zlaqr0.f index f021e527..b270571b 100644 --- a/SRC/zlaqr0.f +++ b/SRC/zlaqr0.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAQR0 +*> \brief \b ZLAQR0 computes the eigenvalues of a Hessenberg matrix, and optionally the matrices from the Schur decomposition. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaqr1.f b/SRC/zlaqr1.f index e2fd616d..8f3ee0b6 100644 --- a/SRC/zlaqr1.f +++ b/SRC/zlaqr1.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAQR1 +*> \brief \b ZLAQR1 sets a scalar multiple of the first column of the product of 2-by-2 or 3-by-3 matrix H and specified shifts. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaqr2.f b/SRC/zlaqr2.f index c21cc90d..df8f50e1 100644 --- a/SRC/zlaqr2.f +++ b/SRC/zlaqr2.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAQR2 +*> \brief \b ZLAQR2 performs the unitary similarity transformation of a Hessenberg matrix to detect and deflate fully converged eigenvalues from a trailing principal submatrix (aggressive early deflation). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaqr3.f b/SRC/zlaqr3.f index 9fd643d7..f738d11c 100644 --- a/SRC/zlaqr3.f +++ b/SRC/zlaqr3.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAQR3 +*> \brief \b ZLAQR3 performs the unitary similarity transformation of a Hessenberg matrix to detect and deflate fully converged eigenvalues from a trailing principal submatrix (aggressive early deflation). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaqr4.f b/SRC/zlaqr4.f index 5d4b15f5..2f45fe69 100644 --- a/SRC/zlaqr4.f +++ b/SRC/zlaqr4.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAQR4 +*> \brief \b ZLAQR4 computes the eigenvalues of a Hessenberg matrix, and optionally the matrices from the Schur decomposition. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaqr5.f b/SRC/zlaqr5.f index c9c5d80f..ba8e9821 100644 --- a/SRC/zlaqr5.f +++ b/SRC/zlaqr5.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAQR5 +*> \brief \b ZLAQR5 performs a single small-bulge multi-shift QR sweep. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaqsb.f b/SRC/zlaqsb.f index 446ace1a..c01b686e 100644 --- a/SRC/zlaqsb.f +++ b/SRC/zlaqsb.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAQSB +*> \brief \b ZLAQSB scales a symmetric/Hermitian band matrix, using scaling factors computed by spbequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaqsp.f b/SRC/zlaqsp.f index e0851cc5..a0a37ce6 100644 --- a/SRC/zlaqsp.f +++ b/SRC/zlaqsp.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAQSP +*> \brief \b ZLAQSP scales a symmetric/Hermitian matrix in packed storage, using scaling factors computed by sppequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaqsy.f b/SRC/zlaqsy.f index 2968116e..11c7e0ab 100644 --- a/SRC/zlaqsy.f +++ b/SRC/zlaqsy.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAQSY +*> \brief \b ZLAQSY scales a symmetric/Hermitian matrix, using scaling factors computed by spoequ. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlar1v.f b/SRC/zlar1v.f index f0774155..36636830 100644 --- a/SRC/zlar1v.f +++ b/SRC/zlar1v.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAR1V +*> \brief \b ZLAR1V computes the (scaled) r-th column of the inverse of the submatrix in rows b1 through bn of the tridiagonal matrix LDLT - λI. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlar2v.f b/SRC/zlar2v.f index 14badf7a..c15b8d84 100644 --- a/SRC/zlar2v.f +++ b/SRC/zlar2v.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAR2V +*> \brief \b ZLAR2V applies a vector of plane rotations with real cosines and complex sines from both sides to a sequence of 2-by-2 symmetric/Hermitian matrices. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlarcm.f b/SRC/zlarcm.f index 5b9e15ec..993a6cc8 100644 --- a/SRC/zlarcm.f +++ b/SRC/zlarcm.f @@ -1,4 +1,4 @@ -*> \brief \b ZLARCM +*> \brief \b ZLARCM copies all or part of a real two-dimensional array to a complex array. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlarf.f b/SRC/zlarf.f index 53f314d6..f26cb8b3 100644 --- a/SRC/zlarf.f +++ b/SRC/zlarf.f @@ -1,4 +1,4 @@ -*> \brief \b ZLARF +*> \brief \b ZLARF applies an elementary reflector to a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlarfb.f b/SRC/zlarfb.f index 30fc4b94..56c4c62d 100644 --- a/SRC/zlarfb.f +++ b/SRC/zlarfb.f @@ -1,4 +1,4 @@ -*> \brief \b ZLARFB +*> \brief \b ZLARFB applies a block reflector or its conjugate-transpose to a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlarfg.f b/SRC/zlarfg.f index a90ae9f7..11f2003a 100644 --- a/SRC/zlarfg.f +++ b/SRC/zlarfg.f @@ -1,4 +1,4 @@ -*> \brief \b ZLARFG +*> \brief \b ZLARFG generates an elementary reflector (Householder matrix). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlarfgp.f b/SRC/zlarfgp.f index 65ba4549..9490560a 100644 --- a/SRC/zlarfgp.f +++ b/SRC/zlarfgp.f @@ -1,4 +1,4 @@ -*> \brief \b ZLARFGP +*> \brief \b ZLARFGP generates an elementary reflector (Householder matrix) with non-negatibe beta. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlarft.f b/SRC/zlarft.f index 6a6151fd..a2aada57 100644 --- a/SRC/zlarft.f +++ b/SRC/zlarft.f @@ -1,4 +1,4 @@ -*> \brief \b ZLARFT +*> \brief \b ZLARFT forms the triangular factor T of a block reflector H = I - vtvH * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlarfx.f b/SRC/zlarfx.f index aedd6b4f..72420fb7 100644 --- a/SRC/zlarfx.f +++ b/SRC/zlarfx.f @@ -1,4 +1,4 @@ -*> \brief \b ZLARFX +*> \brief \b ZLARFX applies an elementary reflector to a general rectangular matrix, with loop unrolling when the reflector has order ≤ 10. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlargv.f b/SRC/zlargv.f index d6279855..5f9eaaaf 100644 --- a/SRC/zlargv.f +++ b/SRC/zlargv.f @@ -1,4 +1,4 @@ -*> \brief \b ZLARGV +*> \brief \b ZLARGV generates a vector of plane rotations with real cosines and complex sines. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlarnv.f b/SRC/zlarnv.f index 6b70c6fd..163085d3 100644 --- a/SRC/zlarnv.f +++ b/SRC/zlarnv.f @@ -1,4 +1,4 @@ -*> \brief \b ZLARNV +*> \brief \b ZLARNV returns a vector of random numbers from a uniform or normal distribution. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlarrv.f b/SRC/zlarrv.f index 5b39afda..a823a8aa 100644 --- a/SRC/zlarrv.f +++ b/SRC/zlarrv.f @@ -1,4 +1,4 @@ -*> \brief \b ZLARRV +*> \brief \b ZLARRV computes the eigenvectors of the tridiagonal matrix T = L D LT given L, D and the eigenvalues of L D LT. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlarscl2.f b/SRC/zlarscl2.f index 55db8e60..a5412361 100644 --- a/SRC/zlarscl2.f +++ b/SRC/zlarscl2.f @@ -1,4 +1,4 @@ -*> \brief \b ZLARSCL2 +*> \brief \b ZLARSCL2 performs reciprocal diagonal scaling on a vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlartg.f b/SRC/zlartg.f index 428ee265..f842be7c 100644 --- a/SRC/zlartg.f +++ b/SRC/zlartg.f @@ -1,4 +1,4 @@ -*> \brief \b ZLARTG +*> \brief \b ZLARTG generates a plane rotation with real cosine and complex sine. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlartv.f b/SRC/zlartv.f index 14d20a16..5c4db956 100644 --- a/SRC/zlartv.f +++ b/SRC/zlartv.f @@ -1,4 +1,4 @@ -*> \brief \b ZLARTV +*> \brief \b ZLARTV applies a vector of plane rotations with real cosines and complex sines to the elements of a pair of vectors. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlarz.f b/SRC/zlarz.f index 7fc83614..bfe886dd 100644 --- a/SRC/zlarz.f +++ b/SRC/zlarz.f @@ -1,4 +1,4 @@ -*> \brief \b ZLARZ +*> \brief \b ZLARZ applies an elementary reflector (as returned by stzrzf) to a general matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlarzb.f b/SRC/zlarzb.f index 5c918ef6..d6908f33 100644 --- a/SRC/zlarzb.f +++ b/SRC/zlarzb.f @@ -1,4 +1,4 @@ -*> \brief \b ZLARZB +*> \brief \b ZLARZB applies a block reflector or its conjugate-transpose to a general matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlarzt.f b/SRC/zlarzt.f index 980e70c4..66eef82d 100644 --- a/SRC/zlarzt.f +++ b/SRC/zlarzt.f @@ -1,4 +1,4 @@ -*> \brief \b ZLARZT +*> \brief \b ZLARZT forms the triangular factor T of a block reflector H = I - vtvH. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlascl.f b/SRC/zlascl.f index 77164c29..44d7bfc3 100644 --- a/SRC/zlascl.f +++ b/SRC/zlascl.f @@ -1,4 +1,4 @@ -*> \brief \b ZLASCL +*> \brief \b ZLASCL multiplies a general rectangular matrix by a real scalar defined as cto/cfrom. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlascl2.f b/SRC/zlascl2.f index bb5bc150..6c2a2923 100644 --- a/SRC/zlascl2.f +++ b/SRC/zlascl2.f @@ -1,4 +1,4 @@ -*> \brief \b ZLASCL2 +*> \brief \b ZLASCL2 performs diagonal scaling on a vector. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaset.f b/SRC/zlaset.f index 56cb66fe..66cfd656 100644 --- a/SRC/zlaset.f +++ b/SRC/zlaset.f @@ -1,4 +1,4 @@ -*> \brief \b ZLASET +*> \brief \b ZLASET initializes the off-diagonal elements and the diagonal elements of a matrix to given values. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlasr.f b/SRC/zlasr.f index e6ac6816..953ff9cf 100644 --- a/SRC/zlasr.f +++ b/SRC/zlasr.f @@ -1,4 +1,4 @@ -*> \brief \b ZLASR +*> \brief \b ZLASR applies a sequence of plane rotations to a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlassq.f b/SRC/zlassq.f index e3690c6b..d69b5ba3 100644 --- a/SRC/zlassq.f +++ b/SRC/zlassq.f @@ -1,4 +1,4 @@ -*> \brief \b ZLASSQ +*> \brief \b ZLASSQ updates a sum of squares represented in scaled form. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlaswp.f b/SRC/zlaswp.f index 65edab11..e27d9160 100644 --- a/SRC/zlaswp.f +++ b/SRC/zlaswp.f @@ -1,4 +1,4 @@ -*> \brief \b ZLASWP +*> \brief \b ZLASWP performs a series of row interchanges on a general rectangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlasyf.f b/SRC/zlasyf.f index 7ec0b399..ef0c2ff3 100644 --- a/SRC/zlasyf.f +++ b/SRC/zlasyf.f @@ -1,4 +1,4 @@ -*> \brief \b ZLASYF +*> \brief \b ZLASYF computes a partial factorization of a complex symmetric matrix, using the diagonal pivoting method. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlat2c.f b/SRC/zlat2c.f index 71fb203c..6e86ed81 100644 --- a/SRC/zlat2c.f +++ b/SRC/zlat2c.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAT2C +*> \brief \b ZLAT2C converts a double complex triangular matrix to a complex triangular matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlatbs.f b/SRC/zlatbs.f index d451edea..d02308e7 100644 --- a/SRC/zlatbs.f +++ b/SRC/zlatbs.f @@ -1,4 +1,4 @@ -*> \brief \b ZLATBS +*> \brief \b ZLATBS solves a triangular banded system of equations. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlatdf.f b/SRC/zlatdf.f index b67ed3d4..e2d01bfc 100644 --- a/SRC/zlatdf.f +++ b/SRC/zlatdf.f @@ -1,4 +1,4 @@ -*> \brief \b ZLATDF +*> \brief \b ZLATDF uses the LU factorization of the n-by-n matrix computed by sgetc2 and computes a contribution to the reciprocal Dif-estimate. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlatps.f b/SRC/zlatps.f index 0fb1bf31..902d03f5 100644 --- a/SRC/zlatps.f +++ b/SRC/zlatps.f @@ -1,4 +1,4 @@ -*> \brief \b ZLATPS +*> \brief \b ZLATPS solves a triangular system of equations with the matrix held in packed storage. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlatrd.f b/SRC/zlatrd.f index d71f097e..4fe693c8 100644 --- a/SRC/zlatrd.f +++ b/SRC/zlatrd.f @@ -1,4 +1,4 @@ -*> \brief \b ZLATRD +*> \brief \b ZLATRD reduces the first nb rows and columns of a symmetric/Hermitian matrix A to real tridiagonal form by an unitary similarity transformation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlatrs.f b/SRC/zlatrs.f index 96ada8f6..8455518e 100644 --- a/SRC/zlatrs.f +++ b/SRC/zlatrs.f @@ -1,4 +1,4 @@ -*> \brief \b ZLATRS +*> \brief \b ZLATRS solves a triangular system of equations with the scale factor set to prevent overflow. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlatrz.f b/SRC/zlatrz.f index 639b3562..c66dd6d5 100644 --- a/SRC/zlatrz.f +++ b/SRC/zlatrz.f @@ -1,4 +1,4 @@ -*> \brief \b ZLATRZ +*> \brief \b ZLATRZ factors an upper trapezoidal matrix by means of unitary transformations. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlauu2.f b/SRC/zlauu2.f index 6290a1bf..3c12a29f 100644 --- a/SRC/zlauu2.f +++ b/SRC/zlauu2.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAUU2 +*> \brief \b ZLAUU2 computes the product UUH or LHL, where U and L are upper or lower triangular matrices (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zlauum.f b/SRC/zlauum.f index 9229bf72..7c7a8250 100644 --- a/SRC/zlauum.f +++ b/SRC/zlauum.f @@ -1,4 +1,4 @@ -*> \brief \b ZLAUUM +*> \brief \b ZLAUUM computes the product UUH or LHL, where U and L are upper or lower triangular matrices (blocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zpbtf2.f b/SRC/zpbtf2.f index 765ac76a..1df5b637 100644 --- a/SRC/zpbtf2.f +++ b/SRC/zpbtf2.f @@ -1,4 +1,4 @@ -*> \brief \b ZPBTF2 +*> \brief \b ZPBTF2 computes the Cholesky factorization of a symmetric/Hermitian positive definite band matrix (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zpotf2.f b/SRC/zpotf2.f index 4f511c9b..abd60e67 100644 --- a/SRC/zpotf2.f +++ b/SRC/zpotf2.f @@ -1,4 +1,4 @@ -*> \brief \b ZPOTF2 +*> \brief \b ZPOTF2 computes the Cholesky factorization of a symmetric/Hermitian positive definite matrix (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zpstf2.f b/SRC/zpstf2.f index 9c811595..bddde762 100644 --- a/SRC/zpstf2.f +++ b/SRC/zpstf2.f @@ -1,4 +1,4 @@ -*> \brief \b ZPSTF2 +*> \brief \b ZPSTF2 computes the Cholesky factorization with complete pivoting of a real symmetric or complex Hermitian positive semi-definite matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zptts2.f b/SRC/zptts2.f index 3022a73f..4ab716ec 100644 --- a/SRC/zptts2.f +++ b/SRC/zptts2.f @@ -1,4 +1,4 @@ -*> \brief \b ZPTTS2 +*> \brief \b ZPTTS2 solves a tridiagonal system of the form AX=B using the L D LH factorization computed by spttrf. * * =========== DOCUMENTATION =========== * @@ -1,4 +1,4 @@ -*> \brief \b ZROT +*> \brief \b ZROT applies a plane rotation with real cosine and complex sine to a pair of complex vectors. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zspmv.f b/SRC/zspmv.f index 3a342694..8dfceb6f 100644 --- a/SRC/zspmv.f +++ b/SRC/zspmv.f @@ -1,4 +1,4 @@ -*> \brief \b ZSPMV +*> \brief \b ZSPMV computes a matrix-vector product for complex vectors using a complex symmetric packed matrix * * =========== DOCUMENTATION =========== * @@ -1,4 +1,4 @@ -*> \brief \b ZSPR +*> \brief \b ZSPR performs the symmetrical rank-1 update of a complex symmetric packed matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zsymv.f b/SRC/zsymv.f index c3fb645f..b49c34dd 100644 --- a/SRC/zsymv.f +++ b/SRC/zsymv.f @@ -1,4 +1,4 @@ -*> \brief \b ZSYMV +*> \brief \b ZSYMV computes a matrix-vector product for a complex symmetric matrix. * * =========== DOCUMENTATION =========== * @@ -1,4 +1,4 @@ -*> \brief \b ZSYR +*> \brief \b ZSYR performs the symmetric rank-1 update of a complex symmetric matrix. * * =========== DOCUMENTATION =========== * diff --git a/SRC/zsytf2.f b/SRC/zsytf2.f index aaa554d6..5cebed83 100644 --- a/SRC/zsytf2.f +++ b/SRC/zsytf2.f @@ -1,4 +1,4 @@ -*> \brief \b ZSYTF2 +*> \brief \b ZSYTF2 computes the factorization of a real symmetric indefinite matrix, using the diagonal pivoting method (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ztfsm.f b/SRC/ztfsm.f index cbd0327f..a2124b92 100644 --- a/SRC/ztfsm.f +++ b/SRC/ztfsm.f @@ -1,4 +1,4 @@ -*> \brief \b ZTFSM +*> \brief \b ZTFSM solves a matrix equation (one operand is a triangular matrix in RFP format). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ztfttp.f b/SRC/ztfttp.f index 00be23a6..502db83e 100644 --- a/SRC/ztfttp.f +++ b/SRC/ztfttp.f @@ -1,4 +1,4 @@ -*> \brief \b ZTFTTP +*> \brief \b ZTFTTP copies a triangular matrix from the rectangular full packed format (TF) to the standard packed format (TP). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ztfttr.f b/SRC/ztfttr.f index 766dffd7..3629c9a0 100644 --- a/SRC/ztfttr.f +++ b/SRC/ztfttr.f @@ -1,4 +1,4 @@ -*> \brief \b ZTFTTR +*> \brief \b ZTFTTR copies a triangular matrix from the rectangular full packed format (TF) to the standard full format (TR). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ztgex2.f b/SRC/ztgex2.f index 2b3f8785..8f8ad31c 100644 --- a/SRC/ztgex2.f +++ b/SRC/ztgex2.f @@ -1,4 +1,4 @@ -*> \brief \b ZTGEX2 +*> \brief \b ZTGEX2 swaps adjacent diagonal blocks in an upper (quasi) triangular matrix pair by an unitary equivalence transformation. * * =========== DOCUMENTATION =========== * diff --git a/SRC/ztgsy2.f b/SRC/ztgsy2.f index 69f3cdaa..c3ab1993 100644 --- a/SRC/ztgsy2.f +++ b/SRC/ztgsy2.f @@ -1,4 +1,4 @@ -*> \brief \b ZTGSY2 +*> \brief \b ZTGSY2 solves the generalized Sylvester equation (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ztpqrt2.f b/SRC/ztpqrt2.f index cad20e03..7304d3cc 100644 --- a/SRC/ztpqrt2.f +++ b/SRC/ztpqrt2.f @@ -1,4 +1,4 @@ -*> \brief \b ZTPQRT2 +*> \brief \b ZTPQRT2 computes a QR factorization of a real or complex "triangular-pentagonal" matrix, which is composed of a triangular block and a pentagonal block, using the compact WY representation for Q. * * =========== DOCUMENTATION =========== * diff --git a/SRC/ztprfb.f b/SRC/ztprfb.f index 981df853..f0f37ffd 100644 --- a/SRC/ztprfb.f +++ b/SRC/ztprfb.f @@ -1,4 +1,4 @@ -*> \brief \b ZTPRFB +*> \brief \b ZTPRFB applies a real or complex "triangular-pentagonal" blocked reflector to a real or complex matrix, which is composed of two blocks. * * =========== DOCUMENTATION =========== * diff --git a/SRC/ztpttf.f b/SRC/ztpttf.f index 8c2693d2..afeafede 100644 --- a/SRC/ztpttf.f +++ b/SRC/ztpttf.f @@ -1,4 +1,4 @@ -*> \brief \b ZTPTTF +*> \brief \b ZTPTTF copies a triangular matrix from the standard packed format (TP) to the rectangular full packed format (TF). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ztpttr.f b/SRC/ztpttr.f index 494a57b1..a064f751 100644 --- a/SRC/ztpttr.f +++ b/SRC/ztpttr.f @@ -1,4 +1,4 @@ -*> \brief \b ZTPTTR +*> \brief \b ZTPTTR copies a triangular matrix from the standard packed format (TP) to the standard full format (TR). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ztrti2.f b/SRC/ztrti2.f index e0f273ec..7024c30a 100644 --- a/SRC/ztrti2.f +++ b/SRC/ztrti2.f @@ -1,4 +1,4 @@ -*> \brief \b ZTRTI2 +*> \brief \b ZTRTI2 computes the inverse of a triangular matrix (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ztrttf.f b/SRC/ztrttf.f index 8417aa90..a64ce17c 100644 --- a/SRC/ztrttf.f +++ b/SRC/ztrttf.f @@ -1,4 +1,4 @@ -*> \brief \b ZTRTTF +*> \brief \b ZTRTTF copies a triangular matrix from the standard full format (TR) to the rectangular full packed format (TF). * * =========== DOCUMENTATION =========== * diff --git a/SRC/ztrttp.f b/SRC/ztrttp.f index de21aed9..e327a1b9 100644 --- a/SRC/ztrttp.f +++ b/SRC/ztrttp.f @@ -1,4 +1,4 @@ -*> \brief \b ZTRTTP +*> \brief \b ZTRTTP copies a triangular matrix from the standard full format (TR) to the standard packed format (TP). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zung2l.f b/SRC/zung2l.f index 5d22b5aa..7d7899bc 100644 --- a/SRC/zung2l.f +++ b/SRC/zung2l.f @@ -1,4 +1,4 @@ -*> \brief \b ZUNG2L +*> \brief \b ZUNG2L generates all or part of the unitary matrix Q from a QL factorization determined by cgeqlf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zungl2.f b/SRC/zungl2.f index 3510b78d..ddff6191 100644 --- a/SRC/zungl2.f +++ b/SRC/zungl2.f @@ -1,4 +1,4 @@ -*> \brief \b ZUNGL2 +*> \brief \b ZUNGL2 generates all or part of the unitary matrix Q from an LQ factorization determined by cgelqf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zungr2.f b/SRC/zungr2.f index fb0db6b6..57e6a2e3 100644 --- a/SRC/zungr2.f +++ b/SRC/zungr2.f @@ -1,4 +1,4 @@ -*> \brief \b ZUNGR2 +*> \brief \b ZUNGR2 generates all or part of the unitary matrix Q from an RQ factorization determined by cgerqf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zunm2l.f b/SRC/zunm2l.f index 07605234..d4e9775a 100644 --- a/SRC/zunm2l.f +++ b/SRC/zunm2l.f @@ -1,4 +1,4 @@ -*> \brief \b ZUNM2L +*> \brief \b ZUNM2L multiplies a general matrix by the unitary matrix from a QL factorization determined by cgeqlf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zunm2r.f b/SRC/zunm2r.f index 45da64f2..7671639f 100644 --- a/SRC/zunm2r.f +++ b/SRC/zunm2r.f @@ -1,4 +1,4 @@ -*> \brief \b ZUNM2R +*> \brief \b ZUNM2R multiplies a general matrix by the unitary matrix from a QR factorization determined by cgeqrf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zunml2.f b/SRC/zunml2.f index da100f9d..62486c94 100644 --- a/SRC/zunml2.f +++ b/SRC/zunml2.f @@ -1,4 +1,4 @@ -*> \brief \b ZUNML2 +*> \brief \b ZUNML2 multiplies a general matrix by the unitary matrix from a LQ factorization determined by cgelqf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zunmr2.f b/SRC/zunmr2.f index 3f55ed6a..b41e14ae 100644 --- a/SRC/zunmr2.f +++ b/SRC/zunmr2.f @@ -1,4 +1,4 @@ -*> \brief \b ZUNMR2 +*> \brief \b ZUNMR2 multiplies a general matrix by the unitary matrix from a RQ factorization determined by cgerqf (unblocked algorithm). * * =========== DOCUMENTATION =========== * diff --git a/SRC/zunmr3.f b/SRC/zunmr3.f index c072e70f..921252d5 100644 --- a/SRC/zunmr3.f +++ b/SRC/zunmr3.f @@ -1,4 +1,4 @@ -*> \brief \b ZUNMR3 +*> \brief \b ZUNMR3 multiplies a general matrix by the unitary matrix from a RZ factorization determined by ctzrzf (unblocked algorithm). * * =========== DOCUMENTATION =========== * |