--- rpl/lapack/lapack/dsprfs.f	2010/08/06 15:28:47	1.3
+++ rpl/lapack/lapack/dsprfs.f	2011/07/22 07:38:11	1.8
@@ -298,7 +298,7 @@
          IF( KASE.NE.0 ) THEN
             IF( KASE.EQ.1 ) THEN
 *
-*              Multiply by diag(W)*inv(A').
+*              Multiply by diag(W)*inv(A**T).
 *
                CALL DSPTRS( UPLO, N, 1, AFP, IPIV, WORK( N+1 ), N,
      $                      INFO )