Fix Doxygen warnings

diff --git a/SRC/cgesv.f b/SRC/cgesv.f
index 7837e0fa4e41942a6fa14b1ae776975dd974056a..c98393ae74056fea3158997911d0da3a31a8d1b2 100644 (file)
--- a/SRC/cgesv.f
+++ b/SRC/cgesv.f
@@ -1,4 +1,4 @@
-*> \brief <b> CGESV computes the solution to system of linear equations A * X = B for GE matrices</b> (simple driver) </b>
+*> \brief <b> CGESV computes the solution to system of linear equations A * X = B for GE matrices (simple driver) </b>
 *
 *  =========== DOCUMENTATION ===========
 *

diff --git a/SRC/cgesvj.f b/SRC/cgesvj.f
index 8dc6280fab52921e36df776350697bd0e1bf66a2..0168c5c337fdf60edbc1c423fb954defeb3e1387 100644 (file)
--- a/SRC/cgesvj.f
+++ b/SRC/cgesvj.f
@@ -318,6 +318,8 @@
 *> \par References:
 *  ================
 *>
+*> \verbatim
+*>
 *> [1] P. P. M. De Rijk: A one-sided Jacobi algorithm for computing the
 *>    singular value decomposition on a vector computer.
 *>    SIAM J. Sci. Stat. Comp., Vol. 10 (1998), pp. 359-371.

diff --git a/SRC/chegv_2stage.f b/SRC/chegv_2stage.f
index 11956def5f55a17893c28eeb17d8457b4e26fb01..7cb8d8aabd3c316b119b6aab191679cc5e560d5d 100644 (file)
--- a/SRC/chegv_2stage.f
+++ b/SRC/chegv_2stage.f
@@ -47,7 +47,7 @@
 *> positive definite.
 *> This routine use the 2stage technique for the reduction to tridiagonal
 *> which showed higher performance on recent architecture and for large
-*  sizes N>2000.
+*> sizes N>2000.
 *> \endverbatim
 *
 *  Arguments:

diff --git a/SRC/chetrd_he2hb.f b/SRC/chetrd_he2hb.f
index 677f18287670c71a163ec101a8352a66d5b8e221..f4f17a888e95885b93b6599549a631f8b1277315 100644 (file)
--- a/SRC/chetrd_he2hb.f
+++ b/SRC/chetrd_he2hb.f
@@ -132,7 +132,7 @@
 *> \verbatim
 *>          LWORK is INTEGER
 *>          The dimension of the array WORK which should be calculated
-*           by a workspace query. LWORK = MAX(1, LWORK_QUERY)
+*>          by a workspace query. LWORK = MAX(1, LWORK_QUERY)
 *>          If LWORK = -1, then a workspace query is assumed; the routine
 *>          only calculates the optimal size of the WORK array, returns
 *>          this value as the first entry of the WORK array, and no error
@@ -222,7 +222,7 @@
 *>
 *>  where tau is a complex scalar, and v is a complex vector with
 *>  v(kd+1:i) = 0 and v(i+kd+1) = 1; v(i+kd+2:n) is stored on exit in
-*   A(i+kd+2:n,i), and tau in TAU(i).
+*>  A(i+kd+2:n,i), and tau in TAU(i).
 *>
 *>  The contents of A on exit are illustrated by the following examples
 *>  with n = 5:

diff --git a/SRC/cunbdb1.f b/SRC/cunbdb1.f
index fdcc686d2c4db1b3af00e88c78b7b2b8224a72b1..e817b6f07b5c6f37e305afc9f32e40ac1eb5b0fc 100644 (file)
--- a/SRC/cunbdb1.f
+++ b/SRC/cunbdb1.f
@@ -32,7 +32,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/cunbdb2.f b/SRC/cunbdb2.f
index d95276e59ef4372601f29612256243e5453390d9..5f051347163a87344abf5f8d5ed9d97d566b9f06 100644 (file)
--- a/SRC/cunbdb2.f
+++ b/SRC/cunbdb2.f
@@ -32,7 +32,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/cunbdb3.f b/SRC/cunbdb3.f
index a9d05c20e04c0ba41452b1322b6b8f6e7be67051..4841eadc962a2bbe02823e1c17c4c170902ed23f 100644 (file)
--- a/SRC/cunbdb3.f
+++ b/SRC/cunbdb3.f
@@ -32,7 +32,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/cunbdb4.f b/SRC/cunbdb4.f
index 8388e4e8cd51c81879d2346704e8405a85e9d42f..a5c17fa421552083c34c7d8a8adedf3d43b0486c 100644 (file)
--- a/SRC/cunbdb4.f
+++ b/SRC/cunbdb4.f
@@ -33,7 +33,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/cunbdb5.f b/SRC/cunbdb5.f
index 006522d25da0be42ef85631a7ad5c955f3af6d3c..c568461a9b41cb59fbc69d73ec3a9719f6ec7ed5 100644 (file)
--- a/SRC/cunbdb5.f
+++ b/SRC/cunbdb5.f
@@ -31,7 +31,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/cunbdb6.f b/SRC/cunbdb6.f
index ab7fe8a48eb5ab6270ff70684442c08194895328..7d398304170b6a1cee3d4a3c05a273f58c950b6f 100644 (file)
--- a/SRC/cunbdb6.f
+++ b/SRC/cunbdb6.f
@@ -31,7 +31,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/cuncsd2by1.f b/SRC/cuncsd2by1.f
index 64070ca9a48e1dc07ea127bd678b1a53eb57f2cd..4f5eb5a2b7ba229c8ee4469570d87c71c3c7da52 100644 (file)
--- a/SRC/cuncsd2by1.f
+++ b/SRC/cuncsd2by1.f
@@ -39,7 +39,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/dorbdb1.f b/SRC/dorbdb1.f
index db3b14db228cb97ccd6e0662a56605df7be4d7b3..1e4e1aa32cef0a447d44b59c53f5e59098d3376c 100644 (file)
--- a/SRC/dorbdb1.f
+++ b/SRC/dorbdb1.f
@@ -32,7 +32,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/dorbdb2.f b/SRC/dorbdb2.f
index cec60da75adee4aee694d547c364f303200e2cfd..29c7ba9bc4b3e521f66f34838f7373911f7bd781 100644 (file)
--- a/SRC/dorbdb2.f
+++ b/SRC/dorbdb2.f
@@ -32,7 +32,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/dorbdb3.f b/SRC/dorbdb3.f
index 7149796ca3c6da9f1eae3ac47ab2fdbf3212dd94..a476b9d4801eac43f86d4ffc615d08f0b272f456 100644 (file)
--- a/SRC/dorbdb3.f
+++ b/SRC/dorbdb3.f
@@ -32,7 +32,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/dorbdb4.f b/SRC/dorbdb4.f
index 606d7083bc9be5fb08bd9649c8b38905eb562619..5561b8c1c68212df1f356d974914e72cb3efe3fd 100644 (file)
--- a/SRC/dorbdb4.f
+++ b/SRC/dorbdb4.f
@@ -33,7 +33,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/dorbdb5.f b/SRC/dorbdb5.f
index de01f5a445a3ccde4e7be402cbcb00338cf02c3f..ce5901169d1fa770af834bce7ec6b0975c900ace 100644 (file)
--- a/SRC/dorbdb5.f
+++ b/SRC/dorbdb5.f
@@ -31,7 +31,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/dorbdb6.f b/SRC/dorbdb6.f
index 6056d0301a157d875c0dd2c6d5b52e5630282aa9..ab2d99768497fe0b2c7182343e5d1c16a8cd8130 100644 (file)
--- a/SRC/dorbdb6.f
+++ b/SRC/dorbdb6.f
@@ -31,7 +31,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/dorcsd2by1.f b/SRC/dorcsd2by1.f
index 8542a2ed3565a8a1dd67c2b9958512fc690f4445..4f988001709db4fceb7ea70fbb80308ac1682167 100644 (file)
--- a/SRC/dorcsd2by1.f
+++ b/SRC/dorcsd2by1.f
@@ -36,7 +36,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/dsygv_2stage.f b/SRC/dsygv_2stage.f
index b7da00f5173df9f29f179ea28279be273e2497ab..31d613f0163059c991d63db6b75b41f24c23fd70 100644 (file)
--- a/SRC/dsygv_2stage.f
+++ b/SRC/dsygv_2stage.f
@@ -46,7 +46,7 @@
 *> positive definite.
 *> This routine use the 2stage technique for the reduction to tridiagonal
 *> which showed higher performance on recent architecture and for large
-*  sizes N>2000.
+*> sizes N>2000.
 *> \endverbatim
 *
 *  Arguments:

diff --git a/SRC/dsytrd_sy2sb.f b/SRC/dsytrd_sy2sb.f
index a0e028a3025574ba3c8ab534d055588aa4e28ec6..5842a6f51f0b36cf82eb18c147a793148230446b 100644 (file)
--- a/SRC/dsytrd_sy2sb.f
+++ b/SRC/dsytrd_sy2sb.f
@@ -132,7 +132,7 @@
 *> \verbatim
 *>          LWORK is INTEGER
 *>          The dimension of the array WORK which should be calculated
-*           by a workspace query. LWORK = MAX(1, LWORK_QUERY)
+*>          by a workspace query. LWORK = MAX(1, LWORK_QUERY)
 *>          If LWORK = -1, then a workspace query is assumed; the routine
 *>          only calculates the optimal size of the WORK array, returns
 *>          this value as the first entry of the WORK array, and no error
@@ -222,7 +222,7 @@
 *>
 *>  where tau is a real scalar, and v is a real vector with
 *>  v(kd+1:i) = 0 and v(i+kd+1) = 1; v(i+kd+2:n) is stored on exit in
-*   A(i+kd+2:n,i), and tau in TAU(i).
+*>  A(i+kd+2:n,i), and tau in TAU(i).
 *>
 *>  The contents of A on exit are illustrated by the following examples
 *>  with n = 5:

diff --git a/SRC/sgetrf2.f b/SRC/sgetrf2.f
index a7e778b9f1ce39cf0818e5c4c9dad8c24927927b..7d0988060564151fa9a02c100bb19b67899a127f 100644 (file)
--- a/SRC/sgetrf2.f
+++ b/SRC/sgetrf2.f
@@ -38,7 +38,7 @@
 *>
 *>        [  A11 | A12  ]  where A11 is n1 by n1 and A22 is n2 by n2
 *>    A = [ -----|----- ]  with n1 = min(m,n)/2
-*         [  A21 | A22  ]       n2 = n-n1
+*>        [  A21 | A22  ]       n2 = n-n1
 *>
 *>                                       [ A11 ]
 *> The subroutine calls itself to factor [ --- ],

diff --git a/SRC/sorbdb1.f b/SRC/sorbdb1.f
index 0e99826949c9a0f38d3b66cef96e92ea93aaaf07..055993b6f7c7aca60a083009dca9f87b760c7bcb 100644 (file)
--- a/SRC/sorbdb1.f
+++ b/SRC/sorbdb1.f
@@ -32,7 +32,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/sorbdb2.f b/SRC/sorbdb2.f
index dec4dbe120e435ba25ece79d6c1b5a37cc2be83d..3eed61482d96d598541e0f442524bb29bfec08a6 100644 (file)
--- a/SRC/sorbdb2.f
+++ b/SRC/sorbdb2.f
@@ -32,7 +32,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/sorbdb3.f b/SRC/sorbdb3.f
index 5b6e946d81e400107dce11935b5b14c15f8d1118..b679da3b588f47981bc148c9fc360a649fd9a904 100644 (file)
--- a/SRC/sorbdb3.f
+++ b/SRC/sorbdb3.f
@@ -32,7 +32,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/sorbdb4.f b/SRC/sorbdb4.f
index 0b209b2d24fe9e1ace40cfc12c2764dae63659b2..e24609d0517694032d01fb1675448006afe5e533 100644 (file)
--- a/SRC/sorbdb4.f
+++ b/SRC/sorbdb4.f
@@ -33,7 +33,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/sorbdb5.f b/SRC/sorbdb5.f
index f037ba1d382c4da7261a687805c2b0ed10a47400..b565e5aac797a24892f026f6992df36d2124f091 100644 (file)
--- a/SRC/sorbdb5.f
+++ b/SRC/sorbdb5.f
@@ -31,7 +31,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/sorbdb6.f b/SRC/sorbdb6.f
index 83d96612ae61015ab02f5299061d7e76de5cd47d..1fc9f3d9543d825df5274c5e3f02a6adc79eae5a 100644 (file)
--- a/SRC/sorbdb6.f
+++ b/SRC/sorbdb6.f
@@ -31,7 +31,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/sorcsd2by1.f b/SRC/sorcsd2by1.f
index 1ff4732c952815df2ab1dd4cbe23acedd9bd1f0a..a700c1b23c90f21ee43d9dec9b3f388a80efc2b8 100644 (file)
--- a/SRC/sorcsd2by1.f
+++ b/SRC/sorcsd2by1.f
@@ -36,7 +36,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/ssygv_2stage.f b/SRC/ssygv_2stage.f
index 2a376ea3dcbc8e30e8a8dbd591153744df8ba0c3..0ba5799f249ef77c42b3677cb484b68e982db713 100644 (file)
--- a/SRC/ssygv_2stage.f
+++ b/SRC/ssygv_2stage.f
@@ -46,7 +46,7 @@
 *> positive definite.
 *> This routine use the 2stage technique for the reduction to tridiagonal
 *> which showed higher performance on recent architecture and for large
-*  sizes N>2000.
+*> sizes N>2000.
 *> \endverbatim
 *
 *  Arguments:

diff --git a/SRC/ssytrd_sy2sb.f b/SRC/ssytrd_sy2sb.f
index a37672eff9d2b3fe3704631ca5b8669d4ba450d6..60e9faf8bacf008bd2feb7e578770b49e42d97f0 100644 (file)
--- a/SRC/ssytrd_sy2sb.f
+++ b/SRC/ssytrd_sy2sb.f
@@ -132,7 +132,7 @@
 *> \verbatim
 *>          LWORK is INTEGER
 *>          The dimension of the array WORK which should be calculated
-*           by a workspace query. LWORK = MAX(1, LWORK_QUERY)
+*>          by a workspace query. LWORK = MAX(1, LWORK_QUERY)
 *>          If LWORK = -1, then a workspace query is assumed; the routine
 *>          only calculates the optimal size of the WORK array, returns
 *>          this value as the first entry of the WORK array, and no error
@@ -222,7 +222,7 @@
 *>
 *>  where tau is a real scalar, and v is a real vector with
 *>  v(kd+1:i) = 0 and v(i+kd+1) = 1; v(i+kd+2:n) is stored on exit in
-*   A(i+kd+2:n,i), and tau in TAU(i).
+*>  A(i+kd+2:n,i), and tau in TAU(i).
 *>
 *>  The contents of A on exit are illustrated by the following examples
 *>  with n = 5:

diff --git a/SRC/zgesv.f b/SRC/zgesv.f
index 316965ac71407e133b8eb54a8b2be7d3017ec540..e3ff3c4559907c4b895dc4c5de24bc2ea0bc18c2 100644 (file)
--- a/SRC/zgesv.f
+++ b/SRC/zgesv.f
@@ -1,4 +1,4 @@
-*> \brief <b> ZGESV computes the solution to system of linear equations A * X = B for GE matrices</b> (simple driver) </b>
+*> \brief <b> ZGESV computes the solution to system of linear equations A * X = B for GE matrices (simple driver) </b>
 *
 *  =========== DOCUMENTATION ===========
 *

diff --git a/SRC/zgesvj.f b/SRC/zgesvj.f
index d08cfa5552db3138f95f967a4f22fa46f10cd25f..3670ec66c6a90b0d1e833e0fdedc33030c879209 100644 (file)
--- a/SRC/zgesvj.f
+++ b/SRC/zgesvj.f
@@ -318,6 +318,8 @@
 *> \par References:
 *  ================
 *>
+*> \verbatim
+*>
 *> [1] P. P. M. De Rijk: A one-sided Jacobi algorithm for computing the
 *>    singular value decomposition on a vector computer.
 *>    SIAM J. Sci. Stat. Comp., Vol. 10 (1998), pp. 359-371.

diff --git a/SRC/zhegv_2stage.f b/SRC/zhegv_2stage.f
index 1afd2e1873271878d713bba8d12b8c92c73ec3cb..2976c9fb1854761e1ba53aa2d4c4c1ca5e18fae6 100644 (file)
--- a/SRC/zhegv_2stage.f
+++ b/SRC/zhegv_2stage.f
@@ -47,7 +47,7 @@
 *> positive definite.
 *> This routine use the 2stage technique for the reduction to tridiagonal
 *> which showed higher performance on recent architecture and for large
-*  sizes N>2000.
+*> sizes N>2000.
 *> \endverbatim
 *
 *  Arguments:

diff --git a/SRC/zhetrd_he2hb.f b/SRC/zhetrd_he2hb.f
index 89fb1b8a53eaa9d7c50d3b9ea9f1aa6280aa51ac..a2776499584c731e87428f11235e9c9b6bad36e6 100644 (file)
--- a/SRC/zhetrd_he2hb.f
+++ b/SRC/zhetrd_he2hb.f
@@ -132,7 +132,7 @@
 *> \verbatim
 *>          LWORK is INTEGER
 *>          The dimension of the array WORK which should be calculated
-*           by a workspace query. LWORK = MAX(1, LWORK_QUERY)
+*>          by a workspace query. LWORK = MAX(1, LWORK_QUERY)
 *>          If LWORK = -1, then a workspace query is assumed; the routine
 *>          only calculates the optimal size of the WORK array, returns
 *>          this value as the first entry of the WORK array, and no error
@@ -222,7 +222,7 @@
 *>
 *>  where tau is a complex scalar, and v is a complex vector with
 *>  v(kd+1:i) = 0 and v(i+kd+1) = 1; v(i+kd+2:n) is stored on exit in
-*   A(i+kd+2:n,i), and tau in TAU(i).
+*>  A(i+kd+2:n,i), and tau in TAU(i).
 *>
 *>  The contents of A on exit are illustrated by the following examples
 *>  with n = 5:

diff --git a/SRC/zunbdb1.f b/SRC/zunbdb1.f
index 9ec0977284e8705ddaf05e583ba73cb2e0f26684..cab871b012ca0c06fd6951ccbe63a2f810720716 100644 (file)
--- a/SRC/zunbdb1.f
+++ b/SRC/zunbdb1.f
@@ -32,7 +32,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/zunbdb2.f b/SRC/zunbdb2.f
index 8fa7308298e7b3f0f393cb23619841944d8fd205..c10c4f65c99bbc5111696979089a895f1590d6b3 100644 (file)
--- a/SRC/zunbdb2.f
+++ b/SRC/zunbdb2.f
@@ -32,7 +32,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/zunbdb3.f b/SRC/zunbdb3.f
index 737c9a76e11be876f026aaef5ba9fd252d082939..4243fd3707ef01a8a0ae0ea43770573046342745 100644 (file)
--- a/SRC/zunbdb3.f
+++ b/SRC/zunbdb3.f
@@ -32,7 +32,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/zunbdb4.f b/SRC/zunbdb4.f
index 9bb0c9bd92a2e47b60286a2b6986aa226c9cbee9..8c759d078be406d4cb2e6a486cb75c6c77e55900 100644 (file)
--- a/SRC/zunbdb4.f
+++ b/SRC/zunbdb4.f
@@ -33,7 +33,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/zunbdb5.f b/SRC/zunbdb5.f
index 0e2678bfc5269cb0573c43d3b3f917cd64111551..d9c08012d779e0d27d32be4f14240a97d3094b1b 100644 (file)
--- a/SRC/zunbdb5.f
+++ b/SRC/zunbdb5.f
@@ -31,7 +31,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/zunbdb6.f b/SRC/zunbdb6.f
index 42a3cf8010af18e2d23d08d4e44912b65232d224..32b8e3e96fa4abc8e0ba5a8a652684c65ee4ac26 100644 (file)
--- a/SRC/zunbdb6.f
+++ b/SRC/zunbdb6.f
@@ -31,7 +31,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>

diff --git a/SRC/zuncsd2by1.f b/SRC/zuncsd2by1.f
index 630a59380e4f71a4112301abdde15f5fa3fb8740..5e8990790ef6b41ab31189e83a3ec0d7b212948a 100644 (file)
--- a/SRC/zuncsd2by1.f
+++ b/SRC/zuncsd2by1.f
@@ -39,7 +39,7 @@
 *
 *
 *> \par Purpose:
-*> =============
+*  =============
 *>
 *>\verbatim
 *>