See post on the forum 2501 of Yana Gurieva from Intel. This fixes some typos

in the comments about the **T and **H.  Proof that it was a good idea to make
clear what this $#@! "A'" meant. (In this case it was used to mean either A**T
in the case of cgtsv or A**H in the case of claqsb.)

diff --git a/SRC/cgtsv.f b/SRC/cgtsv.f
index 4cbc72b..30a12c2 100644 (file)
--- a/SRC/cgtsv.f
+++ b/SRC/cgtsv.f
@@ -22,7 +22,7 @@
 *  where A is an N-by-N tridiagonal matrix, by Gaussian elimination with
 *  partial pivoting.
 *
-*  Note that the equation  A**H *X = B  may be solved by interchanging the
+*  Note that the equation  A**T *X = B  may be solved by interchanging the
 *  order of the arguments DU and DL.
 *
 *  Arguments

diff --git a/SRC/claqsb.f b/SRC/claqsb.f
index 2fb0bfa..bb05e50 100644 (file)
--- a/SRC/claqsb.f
+++ b/SRC/claqsb.f
@@ -46,7 +46,7 @@
 *          if UPLO = 'L', AB(1+i-j,j)    = A(i,j) for j<=i<=min(n,j+kd).
 *
 *          On exit, if INFO = 0, the triangular factor U or L from the
-*          Cholesky factorization A = U**T *U or A = L*L**T of the band
+*          Cholesky factorization A = U**H *U or A = L*L**H of the band
 *          matrix A, in the same storage format as A.
 *
 *  LDAB    (input) INTEGER

diff --git a/SRC/zgtsv.f b/SRC/zgtsv.f
index f3a4004..a22338d 100644 (file)
--- a/SRC/zgtsv.f
+++ b/SRC/zgtsv.f
@@ -22,7 +22,7 @@
 *  where A is an N-by-N tridiagonal matrix, by Gaussian elimination with
 *  partial pivoting.
 *
-*  Note that the equation  A**H *X = B  may be solved by interchanging the
+*  Note that the equation  A**T *X = B  may be solved by interchanging the
 *  order of the arguments DU and DL.
 *
 *  Arguments

diff --git a/SRC/zlaqsb.f b/SRC/zlaqsb.f
index eaba98e..7aa1afa 100644 (file)
--- a/SRC/zlaqsb.f
+++ b/SRC/zlaqsb.f
@@ -46,7 +46,7 @@
 *          if UPLO = 'L', AB(1+i-j,j)    = A(i,j) for j<=i<=min(n,j+kd).
 *
 *          On exit, if INFO = 0, the triangular factor U or L from the
-*          Cholesky factorization A = U**T *U or A = L*L**T of the band
+*          Cholesky factorization A = U**H *U or A = L*L**H of the band
 *          matrix A, in the same storage format as A.
 *
 *  LDAB    (input) INTEGER