--- rpl/lapack/lapack/dporfs.f	2010/12/21 13:53:36	1.7
+++ rpl/lapack/lapack/dporfs.f	2011/07/22 07:38:09	1.8
@@ -296,7 +296,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 DPOTRS( UPLO, N, 1, AF, LDAF, WORK( N+1 ), N, INFO )
                DO 110 I = 1, N