summaryrefslogtreecommitdiff
path: root/BLAS/SRC/sgbmv.f
diff options
context:
space:
mode:
Diffstat (limited to 'BLAS/SRC/sgbmv.f')
-rw-r--r--BLAS/SRC/sgbmv.f8
1 files changed, 4 insertions, 4 deletions
diff --git a/BLAS/SRC/sgbmv.f b/BLAS/SRC/sgbmv.f
index 1136f702..9c81731a 100644
--- a/BLAS/SRC/sgbmv.f
+++ b/BLAS/SRC/sgbmv.f
@@ -13,7 +13,7 @@
*
* SGBMV performs one of the matrix-vector operations
*
-* y := alpha*A*x + beta*y, or y := alpha*A'*x + beta*y,
+* y := alpha*A*x + beta*y, or y := alpha*A**T*x + beta*y,
*
* where alpha and beta are scalars, x and y are vectors and A is an
* m by n band matrix, with kl sub-diagonals and ku super-diagonals.
@@ -27,9 +27,9 @@
*
* TRANS = 'N' or 'n' y := alpha*A*x + beta*y.
*
-* TRANS = 'T' or 't' y := alpha*A'*x + beta*y.
+* TRANS = 'T' or 't' y := alpha*A**T*x + beta*y.
*
-* TRANS = 'C' or 'c' y := alpha*A'*x + beta*y.
+* TRANS = 'C' or 'c' y := alpha*A**T*x + beta*y.
*
* Unchanged on exit.
*
@@ -266,7 +266,7 @@
END IF
ELSE
*
-* Form y := alpha*A'*x + y.
+* Form y := alpha*A**T*x + y.
*
JY = KY
IF (INCX.EQ.1) THEN