--- rpl/lapack/lapack/ztbcon.f	2010/12/21 13:53:56	1.7
+++ rpl/lapack/lapack/ztbcon.f	2011/07/22 07:38:20	1.8
@@ -148,7 +148,7 @@
       RCOND = ZERO
       SMLNUM = DLAMCH( 'Safe minimum' )*DBLE( MAX( N, 1 ) )
 *
-*     Compute the 1-norm of the triangular matrix A or A'.
+*     Compute the 1-norm of the triangular matrix A or A**H.
 *
       ANORM = ZLANTB( NORM, UPLO, DIAG, N, KD, AB, LDAB, RWORK )
 *
@@ -177,7 +177,7 @@
      $                      AB, LDAB, WORK, SCALE, RWORK, INFO )
             ELSE
 *
-*              Multiply by inv(A').
+*              Multiply by inv(A**H).
 *
                CALL ZLATBS( UPLO, 'Conjugate transpose', DIAG, NORMIN,
      $                      N, KD, AB, LDAB, WORK, SCALE, RWORK, INFO )