--- rpl/lapack/lapack/zporfs.f 2010/08/06 15:32:48 1.4 +++ rpl/lapack/lapack/zporfs.f 2011/07/22 07:38:19 1.8 @@ -302,7 +302,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 ZPOTRS( UPLO, N, 1, AF, LDAF, WORK, N, INFO ) DO 110 I = 1, N