--- rpl/lapack/lapack/zhbgvd.f 2012/08/22 09:48:32 1.11 +++ rpl/lapack/lapack/zhbgvd.f 2016/08/27 15:27:13 1.15 @@ -1,4 +1,4 @@ -*> \brief \b ZHBGST +*> \brief \b ZHBGVD * * =========== DOCUMENTATION =========== * @@ -238,7 +238,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date November 2011 +*> \date June 2016 * *> \ingroup complex16OTHEReigen * @@ -252,10 +252,10 @@ $ Z, LDZ, WORK, LWORK, RWORK, LRWORK, IWORK, $ LIWORK, INFO ) * -* -- LAPACK driver routine (version 3.4.0) -- +* -- LAPACK driver routine (version 3.6.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* November 2011 +* June 2016 * * .. Scalar Arguments .. CHARACTER JOBZ, UPLO @@ -372,7 +372,7 @@ LLWK2 = LWORK - INDWK2 + 2 LLRWK = LRWORK - INDWRK + 2 CALL ZHBGST( JOBZ, UPLO, N, KA, KB, AB, LDAB, BB, LDBB, Z, LDZ, - $ WORK, RWORK( INDWRK ), IINFO ) + $ WORK, RWORK, IINFO ) * * Reduce Hermitian band matrix to tridiagonal form. *