--- rpl/lapack/lapack/zlasr.f	2010/12/21 13:53:52	1.7
+++ rpl/lapack/lapack/zlasr.f	2011/07/22 07:38:18	1.8
@@ -274,7 +274,7 @@
          END IF
       ELSE IF( LSAME( SIDE, 'R' ) ) THEN
 *
-*        Form A * P'
+*        Form A * P**T
 *
          IF( LSAME( PIVOT, 'V' ) ) THEN
             IF( LSAME( DIRECT, 'F' ) ) THEN