--- rpl/lapack/lapack/zgbcon.f 2010/12/21 13:53:42 1.7 +++ rpl/lapack/lapack/zgbcon.f 2011/07/22 07:38:13 1.8 @@ -1,10 +1,10 @@ SUBROUTINE ZGBCON( NORM, N, KL, KU, AB, LDAB, IPIV, ANORM, RCOND, $ WORK, RWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.3.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* November 2006 +* -- April 2011 -- * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. * @@ -187,13 +187,13 @@ $ KL+KU, AB, LDAB, WORK, SCALE, RWORK, INFO ) ELSE * -* Multiply by inv(U'). +* Multiply by inv(U**H). * CALL ZLATBS( 'Upper', 'Conjugate transpose', 'Non-unit', $ NORMIN, N, KL+KU, AB, LDAB, WORK, SCALE, RWORK, $ INFO ) * -* Multiply by inv(L'). +* Multiply by inv(L**H). * IF( LNOTI ) THEN DO 30 J = N - 1, 1, -1