--- rpl/lapack/lapack/dtgsen.f 2010/08/06 15:32:36 1.4 +++ rpl/lapack/lapack/dtgsen.f 2010/08/07 13:18:08 1.5 @@ -2,7 +2,7 @@ $ ALPHAR, ALPHAI, BETA, Q, LDQ, Z, LDZ, M, PL, $ PR, DIF, WORK, LWORK, IWORK, LIWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.2) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2007 @@ -179,8 +179,7 @@ * message related to LWORK is issued by XERBLA. * * IWORK (workspace/output) INTEGER array, dimension (MAX(1,LIWORK)) -* IF IJOB = 0, IWORK is not referenced. Otherwise, -* on exit, if INFO = 0, IWORK(1) returns the optimal LIWORK. +* On exit, if INFO = 0, IWORK(1) returns the optimal LIWORK. * * LIWORK (input) INTEGER * The dimension of the array IWORK. LIWORK >= 1.