summaryrefslogtreecommitdiff
path: root/SRC/stprfs.f
diff options
context:
space:
mode:
Diffstat (limited to 'SRC/stprfs.f')
-rw-r--r--SRC/stprfs.f2
1 files changed, 1 insertions, 1 deletions
diff --git a/SRC/stprfs.f b/SRC/stprfs.f
index d73f59ce..c8bd6cda 100644
--- a/SRC/stprfs.f
+++ b/SRC/stprfs.f
@@ -344,7 +344,7 @@
IF( KASE.NE.0 ) THEN
IF( KASE.EQ.1 ) THEN
*
-* Multiply by diag(W)*inv(op(A)').
+* Multiply by diag(W)*inv(op(A)**T).
*
CALL STPSV( UPLO, TRANST, DIAG, N, AP, WORK( N+1 ), 1 )
DO 220 I = 1, N