--- rpl/lapack/lapack/zhprfs.f	2010/08/06 15:28:55	1.3
+++ rpl/lapack/lapack/zhprfs.f	2011/07/22 07:38:16	1.8
@@ -306,7 +306,7 @@
          IF( KASE.NE.0 ) THEN
             IF( KASE.EQ.1 ) THEN
 *
-*              Multiply by diag(W)*inv(A').
+*              Multiply by diag(W)*inv(A**H).
 *
                CALL ZHPTRS( UPLO, N, 1, AFP, IPIV, WORK, N, INFO )
                DO 110 I = 1, N