--- rpl/lapack/lapack/ztrcon.f	2010/12/21 13:53:57	1.7
+++ rpl/lapack/lapack/ztrcon.f	2011/07/22 07:38:21	1.8
@@ -172,7 +172,7 @@
      $                      LDA, WORK, SCALE, RWORK, INFO )
             ELSE
 *
-*              Multiply by inv(A').
+*              Multiply by inv(A**H).
 *
                CALL ZLATRS( UPLO, 'Conjugate transpose', DIAG, NORMIN,
      $                      N, A, LDA, WORK, SCALE, RWORK, INFO )