diff options
| author | Julie <julie@cs.utk.edu> | 2017-06-10 16:15:09 -0700 |
|---|---|---|
| committer | Julie <julie@cs.utk.edu> | 2017-06-10 16:15:09 -0700 |
| commit | 5c392680ef6362c234c2f2ab3dadd9a9148ffb8f (patch) | |
| tree | 6cad7920912898d9571e3cbe1d7a3d1fba1a966c /SRC | |
| parent | e3780628f3d5543cb70cff2e4f5143a95ace0d4e (diff) | |
| download | lapack-5c392680ef6362c234c2f2ab3dadd9a9148ffb8f.tar.gz lapack-5c392680ef6362c234c2f2ab3dadd9a9148ffb8f.tar.bz2 lapack-5c392680ef6362c234c2f2ab3dadd9a9148ffb8f.zip | |
Preparing for 3.7.1 release
Update version number
from discussion with Vendors, they still would like to have the version
number inside the source file.
Diffstat (limited to 'SRC')
329 files changed, 822 insertions, 822 deletions
diff --git a/SRC/cbbcsd.f b/SRC/cbbcsd.f index baf9957e..b5a18d5b 100644 --- a/SRC/cbbcsd.f +++ b/SRC/cbbcsd.f @@ -332,7 +332,7 @@ $ V2T, LDV2T, B11D, B11E, B12D, B12E, B21D, B21E, $ B22D, B22E, RWORK, LRWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/cgebd2.f b/SRC/cgebd2.f index 7ce92a91..a234f36a 100644 --- a/SRC/cgebd2.f +++ b/SRC/cgebd2.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexGEcomputational * @precisions normal c -> s d z @@ -190,10 +190,10 @@ * ===================================================================== SUBROUTINE CGEBD2( M, N, A, LDA, D, E, TAUQ, TAUP, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, M, N diff --git a/SRC/cgebrd.f b/SRC/cgebrd.f index a15a2aa0..27da3c1d 100644 --- a/SRC/cgebrd.f +++ b/SRC/cgebrd.f @@ -148,7 +148,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexGEcomputational * @@ -206,10 +206,10 @@ SUBROUTINE CGEBRD( M, N, A, LDA, D, E, TAUQ, TAUP, WORK, LWORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LWORK, M, N diff --git a/SRC/cgeevx.f b/SRC/cgeevx.f index 709c653c..b1ff3cc6 100644 --- a/SRC/cgeevx.f +++ b/SRC/cgeevx.f @@ -288,7 +288,7 @@ $ RCONDV, WORK, LWORK, RWORK, INFO ) implicit none * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/cgejsv.f b/SRC/cgejsv.f index 06c9f40b..8eb43cf5 100644 --- a/SRC/cgejsv.f +++ b/SRC/cgejsv.f @@ -568,10 +568,10 @@ $ M, N, A, LDA, SVA, U, LDU, V, LDV, $ CWORK, LWORK, RWORK, LRWORK, IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. IMPLICIT NONE diff --git a/SRC/cgelqt.f b/SRC/cgelqt.f index 8037ac59..e151f10f 100644 --- a/SRC/cgelqt.f +++ b/SRC/cgelqt.f @@ -92,7 +92,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -123,10 +123,10 @@ * ===================================================================== SUBROUTINE CGELQT( M, N, MB, A, LDA, T, LDT, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDT, M, N, MB diff --git a/SRC/cgelqt3.f b/SRC/cgelqt3.f index 48a0e74d..2abd940f 100644 --- a/SRC/cgelqt3.f +++ b/SRC/cgelqt3.f @@ -83,7 +83,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -114,10 +114,10 @@ * ===================================================================== RECURSIVE SUBROUTINE CGELQT3( M, N, A, LDA, T, LDT, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, M, N, LDT diff --git a/SRC/cgemlqt.f b/SRC/cgemlqt.f index 24319057..006e7ede 100644 --- a/SRC/cgemlqt.f +++ b/SRC/cgemlqt.f @@ -143,7 +143,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -151,10 +151,10 @@ SUBROUTINE CGEMLQT( SIDE, TRANS, M, N, K, MB, V, LDV, T, LDT, $ C, LDC, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER SIDE, TRANS diff --git a/SRC/cgeqrt.f b/SRC/cgeqrt.f index b6a31967..ef9c1c3c 100644 --- a/SRC/cgeqrt.f +++ b/SRC/cgeqrt.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexGEcomputational * @@ -141,10 +141,10 @@ * ===================================================================== SUBROUTINE CGEQRT( M, N, NB, A, LDA, T, LDT, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDT, M, N, NB diff --git a/SRC/cgesv.f b/SRC/cgesv.f index c98393ae..2b0fb215 100644 --- a/SRC/cgesv.f +++ b/SRC/cgesv.f @@ -115,17 +115,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexGEsolve * * ===================================================================== SUBROUTINE CGESV( N, NRHS, A, LDA, IPIV, B, LDB, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDB, N, NRHS diff --git a/SRC/cgesvj.f b/SRC/cgesvj.f index 8cce26b4..069ef5b1 100644 --- a/SRC/cgesvj.f +++ b/SRC/cgesvj.f @@ -351,7 +351,7 @@ SUBROUTINE CGESVJ( JOBA, JOBU, JOBV, M, N, A, LDA, SVA, MV, V, $ LDV, CWORK, LWORK, RWORK, LRWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/cgetsls.f b/SRC/cgetsls.f index d0e4ddd8..e7c5d812 100644 --- a/SRC/cgetsls.f +++ b/SRC/cgetsls.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexGEsolve * @@ -160,10 +160,10 @@ SUBROUTINE CGETSLS( TRANS, M, N, NRHS, A, LDA, B, LDB, $ WORK, LWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER TRANS diff --git a/SRC/cggesx.f b/SRC/cggesx.f index e43049db..74169ff8 100644 --- a/SRC/cggesx.f +++ b/SRC/cggesx.f @@ -320,7 +320,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexGEeigen * @@ -330,10 +330,10 @@ $ LDVSR, RCONDE, RCONDV, WORK, LWORK, RWORK, $ IWORK, LIWORK, BWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBVSL, JOBVSR, SENSE, SORT diff --git a/SRC/cgsvj0.f b/SRC/cgsvj0.f index dd80c0b0..79ff2bcf 100644 --- a/SRC/cgsvj0.f +++ b/SRC/cgsvj0.f @@ -218,7 +218,7 @@ SUBROUTINE CGSVJ0( JOBV, M, N, A, LDA, D, SVA, MV, V, LDV, EPS, $ SFMIN, TOL, NSWEEP, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/cgsvj1.f b/SRC/cgsvj1.f index 937ab1de..2f14dc49 100644 --- a/SRC/cgsvj1.f +++ b/SRC/cgsvj1.f @@ -236,7 +236,7 @@ SUBROUTINE CGSVJ1( JOBV, M, N, N1, A, LDA, D, SVA, MV, V, LDV, $ EPS, SFMIN, TOL, NSWEEP, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/chb2st_kernels.f b/SRC/chb2st_kernels.f index fef90ad3..25c9ab71 100644 --- a/SRC/chb2st_kernels.f +++ b/SRC/chb2st_kernels.f @@ -170,10 +170,10 @@ * IMPLICIT NONE * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/chbev_2stage.f b/SRC/chbev_2stage.f index 5ced8c97..7a859b28 100644 --- a/SRC/chbev_2stage.f +++ b/SRC/chbev_2stage.f @@ -171,7 +171,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexOTHEReigen * @@ -213,10 +213,10 @@ * IMPLICIT NONE * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBZ, UPLO diff --git a/SRC/checon_3.f b/SRC/checon_3.f index 8b18dacd..6427dd59 100644 --- a/SRC/checon_3.f +++ b/SRC/checon_3.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexHEcomputational * @@ -157,7 +157,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -171,10 +171,10 @@ SUBROUTINE CHECON_3( UPLO, N, A, LDA, E, IPIV, ANORM, RCOND, $ WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/chegv_2stage.f b/SRC/chegv_2stage.f index 7cb8d8aa..bbab76ab 100644 --- a/SRC/chegv_2stage.f +++ b/SRC/chegv_2stage.f @@ -192,7 +192,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexHEeigen * @@ -234,10 +234,10 @@ * IMPLICIT NONE * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBZ, UPLO diff --git a/SRC/chetrd_2stage.f b/SRC/chetrd_2stage.f index 502df293..75c5bce3 100644 --- a/SRC/chetrd_2stage.f +++ b/SRC/chetrd_2stage.f @@ -183,7 +183,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexHEcomputational * @@ -227,10 +227,10 @@ * IMPLICIT NONE * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER VECT, UPLO diff --git a/SRC/chetrd_he2hb.f b/SRC/chetrd_he2hb.f index 84454add..49c8caf2 100644 --- a/SRC/chetrd_he2hb.f +++ b/SRC/chetrd_he2hb.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexHEcomputational * @@ -245,10 +245,10 @@ * IMPLICIT NONE * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/chetri_3.f b/SRC/chetri_3.f index 8f1527db..8ff76c41 100644 --- a/SRC/chetri_3.f +++ b/SRC/chetri_3.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexHEcomputational * @@ -160,7 +160,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -170,10 +170,10 @@ SUBROUTINE CHETRI_3( UPLO, N, A, LDA, E, IPIV, WORK, LWORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/chetri_3x.f b/SRC/chetri_3x.f index c8fc3d9c..d4cddc1c 100644 --- a/SRC/chetri_3x.f +++ b/SRC/chetri_3x.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexHEcomputational * @@ -150,7 +150,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -159,10 +159,10 @@ * ===================================================================== SUBROUTINE CHETRI_3X( UPLO, N, A, LDA, E, IPIV, WORK, NB, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/chetrs_3.f b/SRC/chetrs_3.f index ade0a156..c7c77b97 100644 --- a/SRC/chetrs_3.f +++ b/SRC/chetrs_3.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexHEcomputational * @@ -151,7 +151,7 @@ *> *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -165,10 +165,10 @@ SUBROUTINE CHETRS_3( UPLO, N, NRHS, A, LDA, E, IPIV, B, LDB, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/chetrs_aa.f b/SRC/chetrs_aa.f index 94bd94ef..28a28ff1 100644 --- a/SRC/chetrs_aa.f +++ b/SRC/chetrs_aa.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexHEcomputational * @@ -129,10 +129,10 @@ SUBROUTINE CHETRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, $ WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * IMPLICIT NONE * diff --git a/SRC/cla_gbrfsx_extended.f b/SRC/cla_gbrfsx_extended.f index bb4523c1..888ecd4f 100644 --- a/SRC/cla_gbrfsx_extended.f +++ b/SRC/cla_gbrfsx_extended.f @@ -397,7 +397,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexGBcomputational * @@ -410,10 +410,10 @@ $ Y_TAIL, RCOND, ITHRESH, RTHRESH, $ DZ_UB, IGNORE_CWISE, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDAB, LDAFB, LDB, LDY, N, KL, KU, NRHS, diff --git a/SRC/cla_heamv.f b/SRC/cla_heamv.f index 2b630631..38a94929 100644 --- a/SRC/cla_heamv.f +++ b/SRC/cla_heamv.f @@ -154,7 +154,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexHEcomputational * @@ -178,10 +178,10 @@ SUBROUTINE CLA_HEAMV( UPLO, N, ALPHA, A, LDA, X, INCX, BETA, Y, $ INCY ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. REAL ALPHA, BETA diff --git a/SRC/cla_herfsx_extended.f b/SRC/cla_herfsx_extended.f index 712854ce..c69589df 100644 --- a/SRC/cla_herfsx_extended.f +++ b/SRC/cla_herfsx_extended.f @@ -382,7 +382,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexHEcomputational * @@ -395,10 +395,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE, diff --git a/SRC/cla_porfsx_extended.f b/SRC/cla_porfsx_extended.f index f898ff31..3a3409c9 100644 --- a/SRC/cla_porfsx_extended.f +++ b/SRC/cla_porfsx_extended.f @@ -374,7 +374,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexPOcomputational * @@ -387,10 +387,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE, diff --git a/SRC/cla_syamv.f b/SRC/cla_syamv.f index dc8bd5dc..e1d3df96 100644 --- a/SRC/cla_syamv.f +++ b/SRC/cla_syamv.f @@ -155,7 +155,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexSYcomputational * @@ -179,10 +179,10 @@ SUBROUTINE CLA_SYAMV( UPLO, N, ALPHA, A, LDA, X, INCX, BETA, Y, $ INCY ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. REAL ALPHA, BETA diff --git a/SRC/cla_syrfsx_extended.f b/SRC/cla_syrfsx_extended.f index 72dc8465..5d2fa0cb 100644 --- a/SRC/cla_syrfsx_extended.f +++ b/SRC/cla_syrfsx_extended.f @@ -382,7 +382,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexSYcomputational * @@ -395,10 +395,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE, diff --git a/SRC/clabrd.f b/SRC/clabrd.f index 0972010e..7830222b 100644 --- a/SRC/clabrd.f +++ b/SRC/clabrd.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexOTHERauxiliary * @@ -212,10 +212,10 @@ SUBROUTINE CLABRD( M, N, NB, A, LDA, D, E, TAUQ, TAUP, X, LDX, Y, $ LDY ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER LDA, LDX, LDY, M, N, NB diff --git a/SRC/clahef_aa.f b/SRC/clahef_aa.f index 1fbe9a41..53646a2c 100644 --- a/SRC/clahef_aa.f +++ b/SRC/clahef_aa.f @@ -146,7 +146,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexSYcomputational * @@ -154,10 +154,10 @@ SUBROUTINE CLAHEF_AA( UPLO, J1, M, NB, A, LDA, IPIV, $ H, LDH, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * IMPLICIT NONE * diff --git a/SRC/clalsa.f b/SRC/clalsa.f index a1b74c01..004d68fb 100644 --- a/SRC/clalsa.f +++ b/SRC/clalsa.f @@ -250,7 +250,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexOTHERcomputational * @@ -267,10 +267,10 @@ $ GIVCOL, LDGCOL, PERM, GIVNUM, C, S, RWORK, $ IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER ICOMPQ, INFO, LDB, LDBX, LDGCOL, LDU, N, NRHS, diff --git a/SRC/clamswlq.f b/SRC/clamswlq.f index 569397a7..f2f9ab7f 100644 --- a/SRC/clamswlq.f +++ b/SRC/clamswlq.f @@ -202,10 +202,10 @@ SUBROUTINE CLAMSWLQ( SIDE, TRANS, M, N, K, MB, NB, A, LDA, T, $ LDT, C, LDC, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER SIDE, TRANS diff --git a/SRC/clamtsqr.f b/SRC/clamtsqr.f index 69acac54..77d09a57 100644 --- a/SRC/clamtsqr.f +++ b/SRC/clamtsqr.f @@ -195,10 +195,10 @@ SUBROUTINE CLAMTSQR( SIDE, TRANS, M, N, K, MB, NB, A, LDA, T, $ LDT, C, LDC, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER SIDE, TRANS diff --git a/SRC/claqr1.f b/SRC/claqr1.f index b448ddb2..b76bedf6 100644 --- a/SRC/claqr1.f +++ b/SRC/claqr1.f @@ -94,7 +94,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexOTHERauxiliary * @@ -107,10 +107,10 @@ * ===================================================================== SUBROUTINE CLAQR1( N, H, LDH, S1, S2, V ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. COMPLEX S1, S2 diff --git a/SRC/claqr2.f b/SRC/claqr2.f index 725a4384..03e9760c 100644 --- a/SRC/claqr2.f +++ b/SRC/claqr2.f @@ -254,7 +254,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexOTHERauxiliary * @@ -269,10 +269,10 @@ $ IHIZ, Z, LDZ, NS, ND, SH, V, LDV, NH, T, LDT, $ NV, WV, LDWV, WORK, LWORK ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV, diff --git a/SRC/claqr3.f b/SRC/claqr3.f index 1afa0831..660a5837 100644 --- a/SRC/claqr3.f +++ b/SRC/claqr3.f @@ -266,7 +266,7 @@ $ IHIZ, Z, LDZ, NS, ND, SH, V, LDV, NH, T, LDT, $ NV, WV, LDWV, WORK, LWORK ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/claqr4.f b/SRC/claqr4.f index 7adca2ef..647fa677 100644 --- a/SRC/claqr4.f +++ b/SRC/claqr4.f @@ -222,7 +222,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexOTHERauxiliary * @@ -248,10 +248,10 @@ SUBROUTINE CLAQR4( WANTT, WANTZ, N, ILO, IHI, H, LDH, W, ILOZ, $ IHIZ, Z, LDZ, WORK, LWORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER IHI, IHIZ, ILO, ILOZ, INFO, LDH, LDZ, LWORK, N diff --git a/SRC/claqr5.f b/SRC/claqr5.f index 5b88d7c4..4c897895 100644 --- a/SRC/claqr5.f +++ b/SRC/claqr5.f @@ -249,7 +249,7 @@ $ H, LDH, ILOZ, IHIZ, Z, LDZ, V, LDV, U, LDU, NV, $ WV, LDWV, NH, WH, LDWH ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/clarrv.f b/SRC/clarrv.f index 72ef0459..72fe1f94 100644 --- a/SRC/clarrv.f +++ b/SRC/clarrv.f @@ -286,7 +286,7 @@ $ IBLOCK, INDEXW, GERS, Z, LDZ, ISUPPZ, $ WORK, IWORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/claswlq.f b/SRC/claswlq.f index 4c23d3ba..5fa2276e 100644 --- a/SRC/claswlq.f +++ b/SRC/claswlq.f @@ -150,10 +150,10 @@ SUBROUTINE CLASWLQ( M, N, MB, NB, A, LDA, T, LDT, WORK, LWORK, $ INFO) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd. -- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, M, N, MB, NB, LWORK, LDT diff --git a/SRC/claswp.f b/SRC/claswp.f index 94fa7732..9f8a2dc6 100644 --- a/SRC/claswp.f +++ b/SRC/claswp.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexOTHERauxiliary * @@ -115,10 +115,10 @@ * ===================================================================== SUBROUTINE CLASWP( N, A, LDA, K1, K2, IPIV, INCX ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INCX, K1, K2, LDA, N diff --git a/SRC/clasyf_aa.f b/SRC/clasyf_aa.f index c58cd852..f204fe78 100644 --- a/SRC/clasyf_aa.f +++ b/SRC/clasyf_aa.f @@ -146,7 +146,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexSYcomputational * @@ -154,10 +154,10 @@ SUBROUTINE CLASYF_AA( UPLO, J1, M, NB, A, LDA, IPIV, $ H, LDH, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * IMPLICIT NONE * diff --git a/SRC/cstegr.f b/SRC/cstegr.f index 77a2c210..98b82c1b 100644 --- a/SRC/cstegr.f +++ b/SRC/cstegr.f @@ -265,7 +265,7 @@ $ ABSTOL, M, W, Z, LDZ, ISUPPZ, WORK, LWORK, IWORK, $ LIWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/cstemr.f b/SRC/cstemr.f index 1e9df5c3..22ac842c 100644 --- a/SRC/cstemr.f +++ b/SRC/cstemr.f @@ -338,7 +338,7 @@ $ M, W, Z, LDZ, NZC, ISUPPZ, TRYRAC, WORK, LWORK, $ IWORK, LIWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/csycon_3.f b/SRC/csycon_3.f index a1ff812b..47d52dd1 100644 --- a/SRC/csycon_3.f +++ b/SRC/csycon_3.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexSYcomputational * @@ -157,7 +157,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -171,10 +171,10 @@ SUBROUTINE CSYCON_3( UPLO, N, A, LDA, E, IPIV, ANORM, RCOND, $ WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/csyconvf.f b/SRC/csyconvf.f index 0e843c3f..707e7138 100644 --- a/SRC/csyconvf.f +++ b/SRC/csyconvf.f @@ -192,7 +192,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexSYcomputational * @@ -201,7 +201,7 @@ *> *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -209,10 +209,10 @@ * ===================================================================== SUBROUTINE CSYCONVF( UPLO, WAY, N, A, LDA, E, IPIV, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO, WAY diff --git a/SRC/csyconvf_rook.f b/SRC/csyconvf_rook.f index 7a8ba601..aa21fed7 100644 --- a/SRC/csyconvf_rook.f +++ b/SRC/csyconvf_rook.f @@ -183,7 +183,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexSYcomputational * @@ -192,7 +192,7 @@ *> *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -200,10 +200,10 @@ * ===================================================================== SUBROUTINE CSYCONVF_ROOK( UPLO, WAY, N, A, LDA, E, IPIV, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO, WAY diff --git a/SRC/csytri2x.f b/SRC/csytri2x.f index 4201a4f7..151f0633 100644 --- a/SRC/csytri2x.f +++ b/SRC/csytri2x.f @@ -113,17 +113,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexSYcomputational * * ===================================================================== SUBROUTINE CSYTRI2X( UPLO, N, A, LDA, IPIV, WORK, NB, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/csytri_3.f b/SRC/csytri_3.f index 43abc6a7..56a6e376 100644 --- a/SRC/csytri_3.f +++ b/SRC/csytri_3.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexSYcomputational * @@ -160,7 +160,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -170,10 +170,10 @@ SUBROUTINE CSYTRI_3( UPLO, N, A, LDA, E, IPIV, WORK, LWORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/csytri_3x.f b/SRC/csytri_3x.f index 2865839f..5a81ee3a 100644 --- a/SRC/csytri_3x.f +++ b/SRC/csytri_3x.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexSYcomputational * @@ -150,7 +150,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -159,10 +159,10 @@ * ===================================================================== SUBROUTINE CSYTRI_3X( UPLO, N, A, LDA, E, IPIV, WORK, NB, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/csytrs_3.f b/SRC/csytrs_3.f index b0e868e1..8008c5de 100644 --- a/SRC/csytrs_3.f +++ b/SRC/csytrs_3.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexSYcomputational * @@ -151,7 +151,7 @@ *> *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -165,10 +165,10 @@ SUBROUTINE CSYTRS_3( UPLO, N, NRHS, A, LDA, E, IPIV, B, LDB, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/csytrs_aa.f b/SRC/csytrs_aa.f index 2e2713d6..ef7067db 100644 --- a/SRC/csytrs_aa.f +++ b/SRC/csytrs_aa.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexSYcomputational * @@ -129,10 +129,10 @@ SUBROUTINE CSYTRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, $ WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * IMPLICIT NONE * diff --git a/SRC/ctgex2.f b/SRC/ctgex2.f index 328b14a0..7ac1784b 100644 --- a/SRC/ctgex2.f +++ b/SRC/ctgex2.f @@ -153,7 +153,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexGEauxiliary * @@ -190,10 +190,10 @@ SUBROUTINE CTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, $ LDZ, J1, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. LOGICAL WANTQ, WANTZ diff --git a/SRC/ctgexc.f b/SRC/ctgexc.f index 8f6fe5c8..ba1c2814 100644 --- a/SRC/ctgexc.f +++ b/SRC/ctgexc.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexGEcomputational * @@ -200,10 +200,10 @@ SUBROUTINE CTGEXC( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, $ LDZ, IFST, ILST, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. LOGICAL WANTQ, WANTZ diff --git a/SRC/ctgsen.f b/SRC/ctgsen.f index cb9b6b16..8198d455 100644 --- a/SRC/ctgsen.f +++ b/SRC/ctgsen.f @@ -433,7 +433,7 @@ $ ALPHA, BETA, Q, LDQ, Z, LDZ, M, PL, PR, DIF, $ WORK, LWORK, IWORK, LIWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/ctplqt.f b/SRC/ctplqt.f index 4aa96499..cb4d419b 100644 --- a/SRC/ctplqt.f +++ b/SRC/ctplqt.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERcomputational * @@ -172,10 +172,10 @@ SUBROUTINE CTPLQT( M, N, L, MB, A, LDA, B, LDB, T, LDT, WORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDB, LDT, N, M, L, MB diff --git a/SRC/ctplqt2.f b/SRC/ctplqt2.f index d1e28849..b16d6149 100644 --- a/SRC/ctplqt2.f +++ b/SRC/ctplqt2.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERcomputational * @@ -160,10 +160,10 @@ * ===================================================================== SUBROUTINE CTPLQT2( M, N, L, A, LDA, B, LDB, T, LDT, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDB, LDT, N, M, L diff --git a/SRC/ctpmlqt.f b/SRC/ctpmlqt.f index 76414fc0..cb5f033c 100644 --- a/SRC/ctpmlqt.f +++ b/SRC/ctpmlqt.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERcomputational * @@ -199,10 +199,10 @@ SUBROUTINE CTPMLQT( SIDE, TRANS, M, N, K, L, MB, V, LDV, T, LDT, $ A, LDA, B, LDB, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER SIDE, TRANS diff --git a/SRC/cunbdb1.f b/SRC/cunbdb1.f index e817b6f0..bfd2147d 100644 --- a/SRC/cunbdb1.f +++ b/SRC/cunbdb1.f @@ -202,7 +202,7 @@ SUBROUTINE CUNBDB1( M, P, Q, X11, LDX11, X21, LDX21, THETA, PHI, $ TAUP1, TAUP2, TAUQ1, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/cunbdb2.f b/SRC/cunbdb2.f index 5f051347..b3df64a1 100644 --- a/SRC/cunbdb2.f +++ b/SRC/cunbdb2.f @@ -202,7 +202,7 @@ SUBROUTINE CUNBDB2( M, P, Q, X11, LDX11, X21, LDX21, THETA, PHI, $ TAUP1, TAUP2, TAUQ1, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/cunbdb3.f b/SRC/cunbdb3.f index 4841eadc..8daa7d2a 100644 --- a/SRC/cunbdb3.f +++ b/SRC/cunbdb3.f @@ -202,7 +202,7 @@ SUBROUTINE CUNBDB3( M, P, Q, X11, LDX11, X21, LDX21, THETA, PHI, $ TAUP1, TAUP2, TAUQ1, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/cunbdb4.f b/SRC/cunbdb4.f index a5c17fa4..981b5779 100644 --- a/SRC/cunbdb4.f +++ b/SRC/cunbdb4.f @@ -213,7 +213,7 @@ $ TAUP1, TAUP2, TAUQ1, PHANTOM, WORK, LWORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/cunbdb5.f b/SRC/cunbdb5.f index c568461a..95997450 100644 --- a/SRC/cunbdb5.f +++ b/SRC/cunbdb5.f @@ -156,7 +156,7 @@ SUBROUTINE CUNBDB5( M1, M2, N, X1, INCX1, X2, INCX2, Q1, LDQ1, Q2, $ LDQ2, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/cunbdb6.f b/SRC/cunbdb6.f index 7d398304..05a13896 100644 --- a/SRC/cunbdb6.f +++ b/SRC/cunbdb6.f @@ -154,7 +154,7 @@ SUBROUTINE CUNBDB6( M1, M2, N, X1, INCX1, X2, INCX2, Q1, LDQ1, Q2, $ LDQ2, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/cuncsd.f b/SRC/cuncsd.f index b01036dd..f3052913 100644 --- a/SRC/cuncsd.f +++ b/SRC/cuncsd.f @@ -320,7 +320,7 @@ $ LDV2T, WORK, LWORK, RWORK, LRWORK, $ IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/cuncsd2by1.f b/SRC/cuncsd2by1.f index 4f5eb5a2..1d49885f 100644 --- a/SRC/cuncsd2by1.f +++ b/SRC/cuncsd2by1.f @@ -255,7 +255,7 @@ $ LDV1T, WORK, LWORK, RWORK, LRWORK, IWORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/cunm22.f b/SRC/cunm22.f index f62939bc..3c6b4c12 100644 --- a/SRC/cunm22.f +++ b/SRC/cunm22.f @@ -162,7 +162,7 @@ SUBROUTINE CUNM22( SIDE, TRANS, M, N, N1, N2, Q, LDQ, C, LDC, $ WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.6.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2015 diff --git a/SRC/dbbcsd.f b/SRC/dbbcsd.f index fa4c564a..f1df567c 100644 --- a/SRC/dbbcsd.f +++ b/SRC/dbbcsd.f @@ -332,7 +332,7 @@ $ V2T, LDV2T, B11D, B11E, B12D, B12E, B21D, B21E, $ B22D, B22E, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/dbdsdc.f b/SRC/dbdsdc.f index edc8724a..4c8b95f8 100644 --- a/SRC/dbdsdc.f +++ b/SRC/dbdsdc.f @@ -205,7 +205,7 @@ SUBROUTINE DBDSDC( UPLO, COMPQ, N, D, E, U, LDU, VT, LDVT, Q, IQ, $ WORK, IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/dbdsqr.f b/SRC/dbdsqr.f index d3630f34..93db95e7 100644 --- a/SRC/dbdsqr.f +++ b/SRC/dbdsqr.f @@ -233,7 +233,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup auxOTHERcomputational * @@ -241,10 +241,10 @@ SUBROUTINE DBDSQR( UPLO, N, NCVT, NRU, NCC, D, E, VT, LDVT, U, $ LDU, C, LDC, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/dgebal.f b/SRC/dgebal.f index 0527220a..95876ace 100644 --- a/SRC/dgebal.f +++ b/SRC/dgebal.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -160,10 +160,10 @@ * ===================================================================== SUBROUTINE DGEBAL( JOB, N, A, LDA, ILO, IHI, SCALE, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOB diff --git a/SRC/dgebd2.f b/SRC/dgebd2.f index c7a7d787..2bec4e29 100644 --- a/SRC/dgebd2.f +++ b/SRC/dgebd2.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -189,10 +189,10 @@ * ===================================================================== SUBROUTINE DGEBD2( M, N, A, LDA, D, E, TAUQ, TAUP, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, M, N diff --git a/SRC/dgebrd.f b/SRC/dgebrd.f index c8780be3..957cf2e5 100644 --- a/SRC/dgebrd.f +++ b/SRC/dgebrd.f @@ -147,7 +147,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -205,10 +205,10 @@ SUBROUTINE DGEBRD( M, N, A, LDA, D, E, TAUQ, TAUP, WORK, LWORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LWORK, M, N diff --git a/SRC/dgejsv.f b/SRC/dgejsv.f index c230dfb1..25ed248d 100644 --- a/SRC/dgejsv.f +++ b/SRC/dgejsv.f @@ -476,7 +476,7 @@ $ M, N, A, LDA, SVA, U, LDU, V, LDV, $ WORK, LWORK, IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/dgelqt.f b/SRC/dgelqt.f index 8f8d40c4..2d406c3f 100644 --- a/SRC/dgelqt.f +++ b/SRC/dgelqt.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -139,10 +139,10 @@ * ===================================================================== SUBROUTINE DGELQT( M, N, MB, A, LDA, T, LDT, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDT, M, N, MB diff --git a/SRC/dgelqt3.f b/SRC/dgelqt3.f index 9970b09e..28f7f921 100644 --- a/SRC/dgelqt3.f +++ b/SRC/dgelqt3.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -131,10 +131,10 @@ * ===================================================================== RECURSIVE SUBROUTINE DGELQT3( M, N, A, LDA, T, LDT, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, M, N, LDT diff --git a/SRC/dgelsd.f b/SRC/dgelsd.f index c42cf1e5..f2cfd633 100644 --- a/SRC/dgelsd.f +++ b/SRC/dgelsd.f @@ -194,7 +194,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEsolve * @@ -209,10 +209,10 @@ SUBROUTINE DGELSD( M, N, NRHS, A, LDA, B, LDB, S, RCOND, RANK, $ WORK, LWORK, IWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS, RANK diff --git a/SRC/dgemlqt.f b/SRC/dgemlqt.f index fad4c453..7320f6b7 100644 --- a/SRC/dgemlqt.f +++ b/SRC/dgemlqt.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -168,10 +168,10 @@ SUBROUTINE DGEMLQT( SIDE, TRANS, M, N, K, MB, V, LDV, T, LDT, $ C, LDC, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER SIDE, TRANS diff --git a/SRC/dgeqrt.f b/SRC/dgeqrt.f index 33d079e1..c7d93206 100644 --- a/SRC/dgeqrt.f +++ b/SRC/dgeqrt.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -141,10 +141,10 @@ * ===================================================================== SUBROUTINE DGEQRT( M, N, NB, A, LDA, T, LDT, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDT, M, N, NB diff --git a/SRC/dgesvj.f b/SRC/dgesvj.f index 1e8933b6..2cbc5ce0 100644 --- a/SRC/dgesvj.f +++ b/SRC/dgesvj.f @@ -260,7 +260,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -337,10 +337,10 @@ SUBROUTINE DGESVJ( JOBA, JOBU, JOBV, M, N, A, LDA, SVA, MV, V, $ LDV, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDV, LWORK, M, MV, N diff --git a/SRC/dgetsls.f b/SRC/dgetsls.f index f4d8d593..3b44a40a 100644 --- a/SRC/dgetsls.f +++ b/SRC/dgetsls.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEsolve * @@ -160,10 +160,10 @@ SUBROUTINE DGETSLS( TRANS, M, N, NRHS, A, LDA, B, LDB, $ WORK, LWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER TRANS diff --git a/SRC/dggesx.f b/SRC/dggesx.f index b7605355..47022fbd 100644 --- a/SRC/dggesx.f +++ b/SRC/dggesx.f @@ -337,7 +337,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEeigen * @@ -365,10 +365,10 @@ $ VSR, LDVSR, RCONDE, RCONDV, WORK, LWORK, IWORK, $ LIWORK, BWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBVSL, JOBVSR, SENSE, SORT diff --git a/SRC/disnan.f b/SRC/disnan.f index 15110993..a565ed36 100644 --- a/SRC/disnan.f +++ b/SRC/disnan.f @@ -52,17 +52,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * * ===================================================================== LOGICAL FUNCTION DISNAN( DIN ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. DOUBLE PRECISION, INTENT(IN) :: DIN diff --git a/SRC/dla_gbamv.f b/SRC/dla_gbamv.f index 707177e9..350284cf 100644 --- a/SRC/dla_gbamv.f +++ b/SRC/dla_gbamv.f @@ -177,7 +177,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGBcomputational * @@ -185,10 +185,10 @@ SUBROUTINE DLA_GBAMV( TRANS, M, N, KL, KU, ALPHA, AB, LDAB, X, $ INCX, BETA, Y, INCY ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. DOUBLE PRECISION ALPHA, BETA diff --git a/SRC/dla_gbrfsx_extended.f b/SRC/dla_gbrfsx_extended.f index 6b8d6ce6..12b2a32a 100644 --- a/SRC/dla_gbrfsx_extended.f +++ b/SRC/dla_gbrfsx_extended.f @@ -398,7 +398,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGBcomputational * @@ -411,10 +411,10 @@ $ Y_TAIL, RCOND, ITHRESH, RTHRESH, $ DZ_UB, IGNORE_CWISE, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDAB, LDAFB, LDB, LDY, N, KL, KU, NRHS, diff --git a/SRC/dla_geamv.f b/SRC/dla_geamv.f index ca889f3b..0a83e4b6 100644 --- a/SRC/dla_geamv.f +++ b/SRC/dla_geamv.f @@ -166,7 +166,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -174,10 +174,10 @@ SUBROUTINE DLA_GEAMV ( TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, $ Y, INCY ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. DOUBLE PRECISION ALPHA, BETA diff --git a/SRC/dla_gerfsx_extended.f b/SRC/dla_gerfsx_extended.f index e2836207..082f810f 100644 --- a/SRC/dla_gerfsx_extended.f +++ b/SRC/dla_gerfsx_extended.f @@ -384,7 +384,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -396,10 +396,10 @@ $ Y_TAIL, RCOND, ITHRESH, RTHRESH, $ DZ_UB, IGNORE_CWISE, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE, diff --git a/SRC/dla_porfsx_extended.f b/SRC/dla_porfsx_extended.f index 5d0728d4..8c0d6beb 100644 --- a/SRC/dla_porfsx_extended.f +++ b/SRC/dla_porfsx_extended.f @@ -374,7 +374,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doublePOcomputational * @@ -387,10 +387,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE, diff --git a/SRC/dla_syamv.f b/SRC/dla_syamv.f index 127371ba..29566a6e 100644 --- a/SRC/dla_syamv.f +++ b/SRC/dla_syamv.f @@ -153,7 +153,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleSYcomputational * @@ -177,10 +177,10 @@ SUBROUTINE DLA_SYAMV( UPLO, N, ALPHA, A, LDA, X, INCX, BETA, Y, $ INCY ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. DOUBLE PRECISION ALPHA, BETA diff --git a/SRC/dla_syrfsx_extended.f b/SRC/dla_syrfsx_extended.f index cce37aae..f54d1519 100644 --- a/SRC/dla_syrfsx_extended.f +++ b/SRC/dla_syrfsx_extended.f @@ -383,7 +383,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleSYcomputational * @@ -396,10 +396,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE, diff --git a/SRC/dlabrd.f b/SRC/dlabrd.f index 0cad5089..b5e734dc 100644 --- a/SRC/dlabrd.f +++ b/SRC/dlabrd.f @@ -156,7 +156,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERauxiliary * @@ -210,10 +210,10 @@ SUBROUTINE DLABRD( M, N, NB, A, LDA, D, E, TAUQ, TAUP, X, LDX, Y, $ LDY ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER LDA, LDX, LDY, M, N, NB diff --git a/SRC/dlaed3.f b/SRC/dlaed3.f index ae331b9d..d200fc0a 100644 --- a/SRC/dlaed3.f +++ b/SRC/dlaed3.f @@ -170,7 +170,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup auxOTHERcomputational * @@ -185,10 +185,10 @@ SUBROUTINE DLAED3( K, N, N1, D, Q, LDQ, RHO, DLAMDA, Q2, INDX, $ CTOT, W, S, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, K, LDQ, N, N1 diff --git a/SRC/dlaisnan.f b/SRC/dlaisnan.f index 3cb1da8b..c2e87d88 100644 --- a/SRC/dlaisnan.f +++ b/SRC/dlaisnan.f @@ -67,17 +67,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * * ===================================================================== LOGICAL FUNCTION DLAISNAN( DIN1, DIN2 ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. DOUBLE PRECISION, INTENT(IN) :: DIN1, DIN2 diff --git a/SRC/dlalsa.f b/SRC/dlalsa.f index 72880496..b643f11c 100644 --- a/SRC/dlalsa.f +++ b/SRC/dlalsa.f @@ -250,7 +250,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERcomputational * @@ -267,10 +267,10 @@ $ GIVCOL, LDGCOL, PERM, GIVNUM, C, S, WORK, $ IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER ICOMPQ, INFO, LDB, LDBX, LDGCOL, LDU, N, NRHS, diff --git a/SRC/dlamswlq.f b/SRC/dlamswlq.f index 8430ca19..19e32f88 100644 --- a/SRC/dlamswlq.f +++ b/SRC/dlamswlq.f @@ -202,10 +202,10 @@ SUBROUTINE DLAMSWLQ( SIDE, TRANS, M, N, K, MB, NB, A, LDA, T, $ LDT, C, LDC, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER SIDE, TRANS diff --git a/SRC/dlamtsqr.f b/SRC/dlamtsqr.f index d4801645..6af89d28 100644 --- a/SRC/dlamtsqr.f +++ b/SRC/dlamtsqr.f @@ -195,10 +195,10 @@ SUBROUTINE DLAMTSQR( SIDE, TRANS, M, N, K, MB, NB, A, LDA, T, $ LDT, C, LDC, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER SIDE, TRANS diff --git a/SRC/dlapy2.f b/SRC/dlapy2.f index b40c46af..bc01829a 100644 --- a/SRC/dlapy2.f +++ b/SRC/dlapy2.f @@ -56,17 +56,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * * ===================================================================== DOUBLE PRECISION FUNCTION DLAPY2( X, Y ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. DOUBLE PRECISION X, Y diff --git a/SRC/dlaqr1.f b/SRC/dlaqr1.f index c3e6e8ab..81a462fb 100644 --- a/SRC/dlaqr1.f +++ b/SRC/dlaqr1.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERauxiliary * @@ -121,10 +121,10 @@ * ===================================================================== SUBROUTINE DLAQR1( N, H, LDH, SR1, SI1, SR2, SI2, V ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. DOUBLE PRECISION SI1, SI2, SR1, SR2 diff --git a/SRC/dlaqr2.f b/SRC/dlaqr2.f index 462b7ca3..431b3f12 100644 --- a/SRC/dlaqr2.f +++ b/SRC/dlaqr2.f @@ -263,7 +263,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERauxiliary * @@ -278,10 +278,10 @@ $ IHIZ, Z, LDZ, NS, ND, SR, SI, V, LDV, NH, T, $ LDT, NV, WV, LDWV, WORK, LWORK ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV, diff --git a/SRC/dlaqr3.f b/SRC/dlaqr3.f index d4bc8baa..aa23617c 100644 --- a/SRC/dlaqr3.f +++ b/SRC/dlaqr3.f @@ -275,7 +275,7 @@ $ IHIZ, Z, LDZ, NS, ND, SR, SI, V, LDV, NH, T, $ LDT, NV, WV, LDWV, WORK, LWORK ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/dlaqr5.f b/SRC/dlaqr5.f index a5a49610..5cc4eda1 100644 --- a/SRC/dlaqr5.f +++ b/SRC/dlaqr5.f @@ -257,7 +257,7 @@ $ SR, SI, H, LDH, ILOZ, IHIZ, Z, LDZ, V, LDV, U, $ LDU, NV, WV, LDWV, NH, WH, LDWH ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/dlarra.f b/SRC/dlarra.f index 933386e5..7406a8f9 100644 --- a/SRC/dlarra.f +++ b/SRC/dlarra.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -136,10 +136,10 @@ SUBROUTINE DLARRA( N, D, E, E2, SPLTOL, TNRM, $ NSPLIT, ISPLIT, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, N, NSPLIT diff --git a/SRC/dlarrb.f b/SRC/dlarrb.f index eff244ad..2b6389e2 100644 --- a/SRC/dlarrb.f +++ b/SRC/dlarrb.f @@ -178,7 +178,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -196,10 +196,10 @@ $ RTOL2, OFFSET, W, WGAP, WERR, WORK, IWORK, $ PIVMIN, SPDIAM, TWIST, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER IFIRST, ILAST, INFO, N, OFFSET, TWIST diff --git a/SRC/dlarrc.f b/SRC/dlarrc.f index c99cf89d..093bfa02 100644 --- a/SRC/dlarrc.f +++ b/SRC/dlarrc.f @@ -137,7 +137,7 @@ SUBROUTINE DLARRC( JOBT, N, VL, VU, D, E, PIVMIN, $ EIGCNT, LCNT, RCNT, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/dlarrd.f b/SRC/dlarrd.f index bbc9e29a..5cc10526 100644 --- a/SRC/dlarrd.f +++ b/SRC/dlarrd.f @@ -329,7 +329,7 @@ $ M, W, WERR, WL, WU, IBLOCK, INDEXW, $ WORK, IWORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/dlarre.f b/SRC/dlarre.f index ed876923..736fec2e 100644 --- a/SRC/dlarre.f +++ b/SRC/dlarre.f @@ -305,7 +305,7 @@ $ W, WERR, WGAP, IBLOCK, INDEXW, GERS, PIVMIN, $ WORK, IWORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/dlarrf.f b/SRC/dlarrf.f index 335d0c95..f814ee1b 100644 --- a/SRC/dlarrf.f +++ b/SRC/dlarrf.f @@ -193,7 +193,7 @@ $ SPDIAM, CLGAPL, CLGAPR, PIVMIN, SIGMA, $ DPLUS, LPLUS, WORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/dlarrj.f b/SRC/dlarrj.f index c6efe010..097ba9f7 100644 --- a/SRC/dlarrj.f +++ b/SRC/dlarrj.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -168,10 +168,10 @@ $ RTOL, OFFSET, W, WERR, WORK, IWORK, $ PIVMIN, SPDIAM, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER IFIRST, ILAST, INFO, N, OFFSET diff --git a/SRC/dlarrk.f b/SRC/dlarrk.f index 246cb34f..e92fe727 100644 --- a/SRC/dlarrk.f +++ b/SRC/dlarrk.f @@ -137,7 +137,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -145,10 +145,10 @@ SUBROUTINE DLARRK( N, IW, GL, GU, $ D, E2, PIVMIN, RELTOL, W, WERR, INFO) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, IW, N diff --git a/SRC/dlarrr.f b/SRC/dlarrr.f index 89bbe81c..7aa22476 100644 --- a/SRC/dlarrr.f +++ b/SRC/dlarrr.f @@ -78,7 +78,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -94,10 +94,10 @@ * ===================================================================== SUBROUTINE DLARRR( N, D, E, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER N, INFO diff --git a/SRC/dlarrv.f b/SRC/dlarrv.f index 4e8d204b..ec23b779 100644 --- a/SRC/dlarrv.f +++ b/SRC/dlarrv.f @@ -292,7 +292,7 @@ $ IBLOCK, INDEXW, GERS, Z, LDZ, ISUPPZ, $ WORK, IWORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/dlasd0.f b/SRC/dlasd0.f index f639f81c..522ca9ad 100644 --- a/SRC/dlasd0.f +++ b/SRC/dlasd0.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -150,10 +150,10 @@ SUBROUTINE DLASD0( N, SQRE, D, E, U, LDU, VT, LDVT, SMLSIZ, IWORK, $ WORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDU, LDVT, N, SMLSIZ, SQRE diff --git a/SRC/dlasd2.f b/SRC/dlasd2.f index cbc10c42..87a15434 100644 --- a/SRC/dlasd2.f +++ b/SRC/dlasd2.f @@ -254,7 +254,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -269,10 +269,10 @@ $ LDVT, DSIGMA, U2, LDU2, VT2, LDVT2, IDXP, IDX, $ IDXC, IDXQ, COLTYP, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, K, LDU, LDU2, LDVT, LDVT2, NL, NR, SQRE diff --git a/SRC/dlasd3.f b/SRC/dlasd3.f index d9123dea..7662be3e 100644 --- a/SRC/dlasd3.f +++ b/SRC/dlasd3.f @@ -209,7 +209,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -224,10 +224,10 @@ $ LDU2, VT, LDVT, VT2, LDVT2, IDXC, CTOT, Z, $ INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, K, LDQ, LDU, LDU2, LDVT, LDVT2, NL, NR, diff --git a/SRC/dlasd8.f b/SRC/dlasd8.f index 5aaab5ad..fc5c48c5 100644 --- a/SRC/dlasd8.f +++ b/SRC/dlasd8.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -166,10 +166,10 @@ SUBROUTINE DLASD8( ICOMPQ, K, D, Z, VF, VL, DIFL, DIFR, LDDIFR, $ DSIGMA, WORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER ICOMPQ, INFO, K, LDDIFR diff --git a/SRC/dlasda.f b/SRC/dlasda.f index c9c2aa17..f41a108b 100644 --- a/SRC/dlasda.f +++ b/SRC/dlasda.f @@ -258,7 +258,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -273,10 +273,10 @@ $ DIFL, DIFR, Z, POLES, GIVPTR, GIVCOL, LDGCOL, $ PERM, GIVNUM, C, S, WORK, IWORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER ICOMPQ, INFO, LDGCOL, LDU, N, SMLSIZ, SQRE diff --git a/SRC/dlasq4.f b/SRC/dlasq4.f index 56e95ed6..d4ddbbc7 100644 --- a/SRC/dlasq4.f +++ b/SRC/dlasq4.f @@ -151,7 +151,7 @@ SUBROUTINE DLASQ4( I0, N0, Z, PP, N0IN, DMIN, DMIN1, DMIN2, DN, $ DN1, DN2, TAU, TTYPE, G ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/dlasq5.f b/SRC/dlasq5.f index 0eb1fd30..3812c879 100644 --- a/SRC/dlasq5.f +++ b/SRC/dlasq5.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup auxOTHERcomputational * @@ -144,10 +144,10 @@ SUBROUTINE DLASQ5( I0, N0, Z, PP, TAU, SIGMA, DMIN, DMIN1, DMIN2, $ DN, DNM1, DNM2, IEEE, EPS ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. LOGICAL IEEE diff --git a/SRC/dlaswlq.f b/SRC/dlaswlq.f index 41f99992..6e4ca20f 100644 --- a/SRC/dlaswlq.f +++ b/SRC/dlaswlq.f @@ -150,10 +150,10 @@ SUBROUTINE DLASWLQ( M, N, MB, NB, A, LDA, T, LDT, WORK, LWORK, $ INFO) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd. -- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, M, N, MB, NB, LWORK, LDT diff --git a/SRC/dlaswp.f b/SRC/dlaswp.f index 575b5c48..202fd8df 100644 --- a/SRC/dlaswp.f +++ b/SRC/dlaswp.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERauxiliary * @@ -115,10 +115,10 @@ * ===================================================================== SUBROUTINE DLASWP( N, A, LDA, K1, K2, IPIV, INCX ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INCX, K1, K2, LDA, N diff --git a/SRC/dlasyf_aa.f b/SRC/dlasyf_aa.f index 08d7520d..9e832018 100644 --- a/SRC/dlasyf_aa.f +++ b/SRC/dlasyf_aa.f @@ -146,7 +146,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleSYcomputational * @@ -154,10 +154,10 @@ SUBROUTINE DLASYF_AA( UPLO, J1, M, NB, A, LDA, IPIV, $ H, LDH, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * IMPLICIT NONE * diff --git a/SRC/dorbdb1.f b/SRC/dorbdb1.f index 1e4e1aa3..675028ac 100644 --- a/SRC/dorbdb1.f +++ b/SRC/dorbdb1.f @@ -203,7 +203,7 @@ SUBROUTINE DORBDB1( M, P, Q, X11, LDX11, X21, LDX21, THETA, PHI, $ TAUP1, TAUP2, TAUQ1, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/dorbdb2.f b/SRC/dorbdb2.f index 29c7ba9b..ea43d4fc 100644 --- a/SRC/dorbdb2.f +++ b/SRC/dorbdb2.f @@ -202,7 +202,7 @@ SUBROUTINE DORBDB2( M, P, Q, X11, LDX11, X21, LDX21, THETA, PHI, $ TAUP1, TAUP2, TAUQ1, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/dorbdb3.f b/SRC/dorbdb3.f index a476b9d4..f5667b43 100644 --- a/SRC/dorbdb3.f +++ b/SRC/dorbdb3.f @@ -201,7 +201,7 @@ SUBROUTINE DORBDB3( M, P, Q, X11, LDX11, X21, LDX21, THETA, PHI, $ TAUP1, TAUP2, TAUQ1, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/dorbdb4.f b/SRC/dorbdb4.f index 5561b8c1..ff141b99 100644 --- a/SRC/dorbdb4.f +++ b/SRC/dorbdb4.f @@ -213,7 +213,7 @@ $ TAUP1, TAUP2, TAUQ1, PHANTOM, WORK, LWORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/dorbdb5.f b/SRC/dorbdb5.f index ce590116..313c6d5e 100644 --- a/SRC/dorbdb5.f +++ b/SRC/dorbdb5.f @@ -156,7 +156,7 @@ SUBROUTINE DORBDB5( M1, M2, N, X1, INCX1, X2, INCX2, Q1, LDQ1, Q2, $ LDQ2, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/dorbdb6.f b/SRC/dorbdb6.f index ab2d9976..c92c9fed 100644 --- a/SRC/dorbdb6.f +++ b/SRC/dorbdb6.f @@ -154,7 +154,7 @@ SUBROUTINE DORBDB6( M1, M2, N, X1, INCX1, X2, INCX2, Q1, LDQ1, Q2, $ LDQ2, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/dorcsd.f b/SRC/dorcsd.f index 61b70ffd..f0284ce6 100644 --- a/SRC/dorcsd.f +++ b/SRC/dorcsd.f @@ -289,7 +289,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERcomputational * @@ -300,10 +300,10 @@ $ U1, LDU1, U2, LDU2, V1T, LDV1T, V2T, $ LDV2T, WORK, LWORK, IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBU1, JOBU2, JOBV1T, JOBV2T, SIGNS, TRANS diff --git a/SRC/dorm22.f b/SRC/dorm22.f index 3e17d493..aac47109 100644 --- a/SRC/dorm22.f +++ b/SRC/dorm22.f @@ -163,7 +163,7 @@ SUBROUTINE DORM22( SIDE, TRANS, M, N, N1, N2, Q, LDQ, C, LDC, $ WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.6.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2015 diff --git a/SRC/dppsvx.f b/SRC/dppsvx.f index 85124a29..4fc84ead 100644 --- a/SRC/dppsvx.f +++ b/SRC/dppsvx.f @@ -311,7 +311,7 @@ SUBROUTINE DPPSVX( FACT, UPLO, N, NRHS, AP, AFP, EQUED, S, B, LDB, $ X, LDX, RCOND, FERR, BERR, WORK, IWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * April 2012 diff --git a/SRC/dsb2st_kernels.f b/SRC/dsb2st_kernels.f index 988ffc8d..3bf126d5 100644 --- a/SRC/dsb2st_kernels.f +++ b/SRC/dsb2st_kernels.f @@ -170,10 +170,10 @@ * IMPLICIT NONE * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/dsbev_2stage.f b/SRC/dsbev_2stage.f index c66b4049..c9de7279 100644 --- a/SRC/dsbev_2stage.f +++ b/SRC/dsbev_2stage.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHEReigen * @@ -206,10 +206,10 @@ * IMPLICIT NONE * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBZ, UPLO diff --git a/SRC/dspevd.f b/SRC/dspevd.f index 96ddbc80..5b99d755 100644 --- a/SRC/dspevd.f +++ b/SRC/dspevd.f @@ -170,7 +170,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHEReigen * @@ -178,10 +178,10 @@ SUBROUTINE DSPEVD( JOBZ, UPLO, N, AP, W, Z, LDZ, WORK, LWORK, $ IWORK, LIWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBZ, UPLO diff --git a/SRC/dspgv.f b/SRC/dspgv.f index 469d9696..f7313ffe 100644 --- a/SRC/dspgv.f +++ b/SRC/dspgv.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHEReigen * @@ -160,10 +160,10 @@ SUBROUTINE DSPGV( ITYPE, JOBZ, UPLO, N, AP, BP, W, Z, LDZ, WORK, $ INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBZ, UPLO diff --git a/SRC/dspsvx.f b/SRC/dspsvx.f index 2f898de0..62df170c 100644 --- a/SRC/dspsvx.f +++ b/SRC/dspsvx.f @@ -276,7 +276,7 @@ SUBROUTINE DSPSVX( FACT, UPLO, N, NRHS, AP, AFP, IPIV, B, LDB, X, $ LDX, RCOND, FERR, BERR, WORK, IWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * April 2012 diff --git a/SRC/dstedc.f b/SRC/dstedc.f index 386c22b8..61b44bc0 100644 --- a/SRC/dstedc.f +++ b/SRC/dstedc.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup auxOTHERcomputational * @@ -188,10 +188,10 @@ SUBROUTINE DSTEDC( COMPZ, N, D, E, Z, LDZ, WORK, LWORK, IWORK, $ LIWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER COMPZ diff --git a/SRC/dstegr.f b/SRC/dstegr.f index 84c08be1..6a8c43fa 100644 --- a/SRC/dstegr.f +++ b/SRC/dstegr.f @@ -265,7 +265,7 @@ $ ABSTOL, M, W, Z, LDZ, ISUPPZ, WORK, LWORK, IWORK, $ LIWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/dstemr.f b/SRC/dstemr.f index c50183b9..a1a8e343 100644 --- a/SRC/dstemr.f +++ b/SRC/dstemr.f @@ -321,7 +321,7 @@ $ M, W, Z, LDZ, NZC, ISUPPZ, TRYRAC, WORK, LWORK, $ IWORK, LIWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/dsycon_3.f b/SRC/dsycon_3.f index 5802aa83..7245ebad 100644 --- a/SRC/dsycon_3.f +++ b/SRC/dsycon_3.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleSYcomputational * @@ -157,7 +157,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -171,10 +171,10 @@ SUBROUTINE DSYCON_3( UPLO, N, A, LDA, E, IPIV, ANORM, RCOND, $ WORK, IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/dsyconvf.f b/SRC/dsyconvf.f index 673360fd..4a4a63d2 100644 --- a/SRC/dsyconvf.f +++ b/SRC/dsyconvf.f @@ -189,7 +189,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleSYcomputational * @@ -198,7 +198,7 @@ *> *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -206,10 +206,10 @@ * ===================================================================== SUBROUTINE DSYCONVF( UPLO, WAY, N, A, LDA, E, IPIV, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO, WAY diff --git a/SRC/dsyconvf_rook.f b/SRC/dsyconvf_rook.f index 2d163703..c2174e15 100644 --- a/SRC/dsyconvf_rook.f +++ b/SRC/dsyconvf_rook.f @@ -180,7 +180,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleSYcomputational * @@ -189,7 +189,7 @@ *> *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -197,10 +197,10 @@ * ===================================================================== SUBROUTINE DSYCONVF_ROOK( UPLO, WAY, N, A, LDA, E, IPIV, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO, WAY diff --git a/SRC/dsyevr.f b/SRC/dsyevr.f index 975c17f7..d140426a 100644 --- a/SRC/dsyevr.f +++ b/SRC/dsyevr.f @@ -334,7 +334,7 @@ $ ABSTOL, M, W, Z, LDZ, ISUPPZ, WORK, LWORK, $ IWORK, LIWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/dsygv_2stage.f b/SRC/dsygv_2stage.f index 31d613f0..e091662f 100644 --- a/SRC/dsygv_2stage.f +++ b/SRC/dsygv_2stage.f @@ -186,7 +186,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleSYeigen * @@ -228,10 +228,10 @@ * IMPLICIT NONE * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBZ, UPLO diff --git a/SRC/dsytrd_2stage.f b/SRC/dsytrd_2stage.f index 1a2bf544..f7ea09b3 100644 --- a/SRC/dsytrd_2stage.f +++ b/SRC/dsytrd_2stage.f @@ -183,7 +183,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleSYcomputational * @@ -227,10 +227,10 @@ * IMPLICIT NONE * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER VECT, UPLO diff --git a/SRC/dsytrd_sy2sb.f b/SRC/dsytrd_sy2sb.f index 9f824620..3e9be295 100644 --- a/SRC/dsytrd_sy2sb.f +++ b/SRC/dsytrd_sy2sb.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleSYcomputational * @@ -245,10 +245,10 @@ * IMPLICIT NONE * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/dsytri2x.f b/SRC/dsytri2x.f index 77fda2de..ae29f120 100644 --- a/SRC/dsytri2x.f +++ b/SRC/dsytri2x.f @@ -113,17 +113,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleSYcomputational * * ===================================================================== SUBROUTINE DSYTRI2X( UPLO, N, A, LDA, IPIV, WORK, NB, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/dsytri_3.f b/SRC/dsytri_3.f index 3437e141..8dfc440f 100644 --- a/SRC/dsytri_3.f +++ b/SRC/dsytri_3.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleSYcomputational * @@ -160,7 +160,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -170,10 +170,10 @@ SUBROUTINE DSYTRI_3( UPLO, N, A, LDA, E, IPIV, WORK, LWORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/dsytri_3x.f b/SRC/dsytri_3x.f index fecde38f..d95e6274 100644 --- a/SRC/dsytri_3x.f +++ b/SRC/dsytri_3x.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleSYcomputational * @@ -150,7 +150,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -159,10 +159,10 @@ * ===================================================================== SUBROUTINE DSYTRI_3X( UPLO, N, A, LDA, E, IPIV, WORK, NB, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/dsytrs_3.f b/SRC/dsytrs_3.f index 85c09e01..2d61f6b7 100644 --- a/SRC/dsytrs_3.f +++ b/SRC/dsytrs_3.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleSYcomputational * @@ -151,7 +151,7 @@ *> *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -165,10 +165,10 @@ SUBROUTINE DSYTRS_3( UPLO, N, NRHS, A, LDA, E, IPIV, B, LDB, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/dsytrs_aa.f b/SRC/dsytrs_aa.f index 0dafa895..efede932 100644 --- a/SRC/dsytrs_aa.f +++ b/SRC/dsytrs_aa.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleSYcomputational * @@ -129,10 +129,10 @@ SUBROUTINE DSYTRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, $ WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * IMPLICIT NONE * diff --git a/SRC/dtgsen.f b/SRC/dtgsen.f index 777fb691..22323cf8 100644 --- a/SRC/dtgsen.f +++ b/SRC/dtgsen.f @@ -451,7 +451,7 @@ $ ALPHAR, ALPHAI, BETA, Q, LDQ, Z, LDZ, M, PL, $ PR, DIF, WORK, LWORK, IWORK, LIWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/dtplqt.f b/SRC/dtplqt.f index a5a92744..4712950f 100644 --- a/SRC/dtplqt.f +++ b/SRC/dtplqt.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERcomputational * @@ -189,10 +189,10 @@ SUBROUTINE DTPLQT( M, N, L, MB, A, LDA, B, LDB, T, LDT, WORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDB, LDT, N, M, L, MB diff --git a/SRC/dtplqt2.f b/SRC/dtplqt2.f index beb5ad6b..e2fefb68 100644 --- a/SRC/dtplqt2.f +++ b/SRC/dtplqt2.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERcomputational * @@ -177,10 +177,10 @@ * ===================================================================== SUBROUTINE DTPLQT2( M, N, L, A, LDA, B, LDB, T, LDT, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDB, LDT, N, M, L diff --git a/SRC/dtrttp.f b/SRC/dtrttp.f index 01995d96..5ee3dd5f 100644 --- a/SRC/dtrttp.f +++ b/SRC/dtrttp.f @@ -97,17 +97,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERcomputational * * ===================================================================== SUBROUTINE DTRTTP( UPLO, N, A, LDA, AP, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/ilaclr.f b/SRC/ilaclr.f index dcb4fe2d..3aad730b 100644 --- a/SRC/ilaclr.f +++ b/SRC/ilaclr.f @@ -71,17 +71,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complexOTHERauxiliary * * ===================================================================== INTEGER FUNCTION ILACLR( M, N, A, LDA ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER M, N, LDA diff --git a/SRC/ilaslc.f b/SRC/ilaslc.f index c3200a93..e59c5751 100644 --- a/SRC/ilaslc.f +++ b/SRC/ilaslc.f @@ -71,17 +71,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realOTHERauxiliary * * ===================================================================== INTEGER FUNCTION ILASLC( M, N, A, LDA ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER M, N, LDA diff --git a/SRC/iparmq.f b/SRC/iparmq.f index 72a16a1e..e576e0db 100644 --- a/SRC/iparmq.f +++ b/SRC/iparmq.f @@ -147,7 +147,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -222,10 +222,10 @@ * ===================================================================== INTEGER FUNCTION IPARMQ( ISPEC, NAME, OPTS, N, ILO, IHI, LWORK ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER IHI, ILO, ISPEC, LWORK, N diff --git a/SRC/sbbcsd.f b/SRC/sbbcsd.f index 25cbdfc6..e1f83976 100644 --- a/SRC/sbbcsd.f +++ b/SRC/sbbcsd.f @@ -332,7 +332,7 @@ $ V2T, LDV2T, B11D, B11E, B12D, B12E, B21D, B21E, $ B22D, B22E, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/sbdsdc.f b/SRC/sbdsdc.f index c5317ec1..1c559cec 100644 --- a/SRC/sbdsdc.f +++ b/SRC/sbdsdc.f @@ -205,7 +205,7 @@ SUBROUTINE SBDSDC( UPLO, COMPQ, N, D, E, U, LDU, VT, LDVT, Q, IQ, $ WORK, IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/sbdsqr.f b/SRC/sbdsqr.f index 38fd1a05..b0067f67 100644 --- a/SRC/sbdsqr.f +++ b/SRC/sbdsqr.f @@ -232,7 +232,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup auxOTHERcomputational * @@ -240,10 +240,10 @@ SUBROUTINE SBDSQR( UPLO, N, NCVT, NRU, NCC, D, E, VT, LDVT, U, $ LDU, C, LDC, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/sgebd2.f b/SRC/sgebd2.f index d00d189d..2123ce25 100644 --- a/SRC/sgebd2.f +++ b/SRC/sgebd2.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realGEcomputational * @@ -189,10 +189,10 @@ * ===================================================================== SUBROUTINE SGEBD2( M, N, A, LDA, D, E, TAUQ, TAUP, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, M, N diff --git a/SRC/sgebrd.f b/SRC/sgebrd.f index 2666c233..d7832ea2 100644 --- a/SRC/sgebrd.f +++ b/SRC/sgebrd.f @@ -147,7 +147,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realGEcomputational * @@ -205,10 +205,10 @@ SUBROUTINE SGEBRD( M, N, A, LDA, D, E, TAUQ, TAUP, WORK, LWORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LWORK, M, N diff --git a/SRC/sgees.f b/SRC/sgees.f index ad65a0c2..06c45132 100644 --- a/SRC/sgees.f +++ b/SRC/sgees.f @@ -208,7 +208,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realGEeigen * @@ -216,10 +216,10 @@ SUBROUTINE SGEES( JOBVS, SORT, SELECT, N, A, LDA, SDIM, WR, WI, $ VS, LDVS, WORK, LWORK, BWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBVS, SORT diff --git a/SRC/sgeevx.f b/SRC/sgeevx.f index 125fc4ac..b11f5004 100644 --- a/SRC/sgeevx.f +++ b/SRC/sgeevx.f @@ -306,7 +306,7 @@ $ RCONDE, RCONDV, WORK, LWORK, IWORK, INFO ) implicit none * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/sgejsv.f b/SRC/sgejsv.f index 98b1dcd0..e4cbe8d0 100644 --- a/SRC/sgejsv.f +++ b/SRC/sgejsv.f @@ -476,7 +476,7 @@ $ M, N, A, LDA, SVA, U, LDU, V, LDV, $ WORK, LWORK, IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/sgelqt.f b/SRC/sgelqt.f index f9b21098..b8bf4d3c 100644 --- a/SRC/sgelqt.f +++ b/SRC/sgelqt.f @@ -91,7 +91,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -122,10 +122,10 @@ * ===================================================================== SUBROUTINE SGELQT( M, N, MB, A, LDA, T, LDT, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDT, M, N, MB diff --git a/SRC/sgelqt3.f b/SRC/sgelqt3.f index bf34126f..3742f52a 100644 --- a/SRC/sgelqt3.f +++ b/SRC/sgelqt3.f @@ -83,7 +83,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -114,10 +114,10 @@ * ===================================================================== RECURSIVE SUBROUTINE SGELQT3( M, N, A, LDA, T, LDT, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, M, N, LDT diff --git a/SRC/sgelsd.f b/SRC/sgelsd.f index c32180ba..9a18961d 100644 --- a/SRC/sgelsd.f +++ b/SRC/sgelsd.f @@ -195,7 +195,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realGEsolve * @@ -210,10 +210,10 @@ SUBROUTINE SGELSD( M, N, NRHS, A, LDA, B, LDB, S, RCOND, $ RANK, WORK, LWORK, IWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS, RANK diff --git a/SRC/sgemlqt.f b/SRC/sgemlqt.f index dc842244..4bb4364f 100644 --- a/SRC/sgemlqt.f +++ b/SRC/sgemlqt.f @@ -143,7 +143,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -151,10 +151,10 @@ SUBROUTINE SGEMLQT( SIDE, TRANS, M, N, K, MB, V, LDV, T, LDT, $ C, LDC, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER SIDE, TRANS diff --git a/SRC/sgeqrt.f b/SRC/sgeqrt.f index ed8bac49..f7c58172 100644 --- a/SRC/sgeqrt.f +++ b/SRC/sgeqrt.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realGEcomputational * @@ -141,10 +141,10 @@ * ===================================================================== SUBROUTINE SGEQRT( M, N, NB, A, LDA, T, LDT, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDT, M, N, NB diff --git a/SRC/sgesvj.f b/SRC/sgesvj.f index 8763ab4b..7a790113 100644 --- a/SRC/sgesvj.f +++ b/SRC/sgesvj.f @@ -260,7 +260,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realGEcomputational * @@ -323,10 +323,10 @@ SUBROUTINE SGESVJ( JOBA, JOBU, JOBV, M, N, A, LDA, SVA, MV, V, $ LDV, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDV, LWORK, M, MV, N diff --git a/SRC/sgetrf2.f b/SRC/sgetrf2.f index 7d098806..aa826f6e 100644 --- a/SRC/sgetrf2.f +++ b/SRC/sgetrf2.f @@ -113,7 +113,7 @@ * ===================================================================== RECURSIVE SUBROUTINE SGETRF2( M, N, A, LDA, IPIV, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/sgetsls.f b/SRC/sgetsls.f index 3bf6381c..35af66c1 100644 --- a/SRC/sgetsls.f +++ b/SRC/sgetsls.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEsolve * @@ -160,10 +160,10 @@ SUBROUTINE SGETSLS( TRANS, M, N, NRHS, A, LDA, B, LDB, $ WORK, LWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER TRANS diff --git a/SRC/sggesx.f b/SRC/sggesx.f index e733a697..3c6273dc 100644 --- a/SRC/sggesx.f +++ b/SRC/sggesx.f @@ -337,7 +337,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realGEeigen * @@ -365,10 +365,10 @@ $ VSR, LDVSR, RCONDE, RCONDV, WORK, LWORK, IWORK, $ LIWORK, BWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBVSL, JOBVSR, SENSE, SORT diff --git a/SRC/sgsvj0.f b/SRC/sgsvj0.f index 381557cf..e216c3e0 100644 --- a/SRC/sgsvj0.f +++ b/SRC/sgsvj0.f @@ -193,7 +193,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realOTHERcomputational * @@ -218,10 +218,10 @@ SUBROUTINE SGSVJ0( JOBV, M, N, A, LDA, D, SVA, MV, V, LDV, EPS, $ SFMIN, TOL, NSWEEP, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDV, LWORK, M, MV, N, NSWEEP diff --git a/SRC/sgsvj1.f b/SRC/sgsvj1.f index fd9b6c29..06e576ad 100644 --- a/SRC/sgsvj1.f +++ b/SRC/sgsvj1.f @@ -223,7 +223,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realOTHERcomputational * @@ -236,10 +236,10 @@ SUBROUTINE SGSVJ1( JOBV, M, N, N1, A, LDA, D, SVA, MV, V, LDV, $ EPS, SFMIN, TOL, NSWEEP, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. REAL EPS, SFMIN, TOL diff --git a/SRC/sisnan.f b/SRC/sisnan.f index a01f7798..311bfbf9 100644 --- a/SRC/sisnan.f +++ b/SRC/sisnan.f @@ -52,17 +52,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * * ===================================================================== LOGICAL FUNCTION SISNAN( SIN ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. REAL, INTENT(IN) :: SIN diff --git a/SRC/sla_gbamv.f b/SRC/sla_gbamv.f index 073f5610..b513f24d 100644 --- a/SRC/sla_gbamv.f +++ b/SRC/sla_gbamv.f @@ -177,7 +177,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realGBcomputational * @@ -185,10 +185,10 @@ SUBROUTINE SLA_GBAMV( TRANS, M, N, KL, KU, ALPHA, AB, LDAB, X, $ INCX, BETA, Y, INCY ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. REAL ALPHA, BETA diff --git a/SRC/sla_gbrfsx_extended.f b/SRC/sla_gbrfsx_extended.f index 884bb3a1..a81feb45 100644 --- a/SRC/sla_gbrfsx_extended.f +++ b/SRC/sla_gbrfsx_extended.f @@ -397,7 +397,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realGBcomputational * @@ -410,10 +410,10 @@ $ Y_TAIL, RCOND, ITHRESH, RTHRESH, $ DZ_UB, IGNORE_CWISE, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDAB, LDAFB, LDB, LDY, N, KL, KU, NRHS, diff --git a/SRC/sla_geamv.f b/SRC/sla_geamv.f index e5dcfb3a..7906d04d 100644 --- a/SRC/sla_geamv.f +++ b/SRC/sla_geamv.f @@ -166,7 +166,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realGEcomputational * @@ -174,10 +174,10 @@ SUBROUTINE SLA_GEAMV ( TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, $ Y, INCY ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. REAL ALPHA, BETA diff --git a/SRC/sla_syamv.f b/SRC/sla_syamv.f index aad2fbf2..d40e7bd9 100644 --- a/SRC/sla_syamv.f +++ b/SRC/sla_syamv.f @@ -153,7 +153,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realSYcomputational * @@ -177,10 +177,10 @@ SUBROUTINE SLA_SYAMV( UPLO, N, ALPHA, A, LDA, X, INCX, BETA, Y, $ INCY ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. REAL ALPHA, BETA diff --git a/SRC/slabrd.f b/SRC/slabrd.f index 6321c191..f4e3d73a 100644 --- a/SRC/slabrd.f +++ b/SRC/slabrd.f @@ -156,7 +156,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realOTHERauxiliary * @@ -210,10 +210,10 @@ SUBROUTINE SLABRD( M, N, NB, A, LDA, D, E, TAUQ, TAUP, X, LDX, Y, $ LDY ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER LDA, LDX, LDY, M, N, NB diff --git a/SRC/slaed3.f b/SRC/slaed3.f index b9e0b586..dffd23e4 100644 --- a/SRC/slaed3.f +++ b/SRC/slaed3.f @@ -170,7 +170,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup auxOTHERcomputational * @@ -185,10 +185,10 @@ SUBROUTINE SLAED3( K, N, N1, D, Q, LDQ, RHO, DLAMDA, Q2, INDX, $ CTOT, W, S, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, K, LDQ, N, N1 diff --git a/SRC/slaisnan.f b/SRC/slaisnan.f index 7db5b401..568d632a 100644 --- a/SRC/slaisnan.f +++ b/SRC/slaisnan.f @@ -67,17 +67,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * * ===================================================================== LOGICAL FUNCTION SLAISNAN( SIN1, SIN2 ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. REAL, INTENT(IN) :: SIN1, SIN2 diff --git a/SRC/slalsa.f b/SRC/slalsa.f index 5d82f33d..135a6736 100644 --- a/SRC/slalsa.f +++ b/SRC/slalsa.f @@ -250,7 +250,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realOTHERcomputational * @@ -267,10 +267,10 @@ $ GIVCOL, LDGCOL, PERM, GIVNUM, C, S, WORK, $ IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER ICOMPQ, INFO, LDB, LDBX, LDGCOL, LDU, N, NRHS, diff --git a/SRC/slamswlq.f b/SRC/slamswlq.f index 9e912a73..b13d02b6 100644 --- a/SRC/slamswlq.f +++ b/SRC/slamswlq.f @@ -202,10 +202,10 @@ SUBROUTINE SLAMSWLQ( SIDE, TRANS, M, N, K, MB, NB, A, LDA, T, $ LDT, C, LDC, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER SIDE, TRANS diff --git a/SRC/slamtsqr.f b/SRC/slamtsqr.f index cbcace69..84ac86ee 100644 --- a/SRC/slamtsqr.f +++ b/SRC/slamtsqr.f @@ -195,10 +195,10 @@ SUBROUTINE SLAMTSQR( SIDE, TRANS, M, N, K, MB, NB, A, LDA, T, $ LDT, C, LDC, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER SIDE, TRANS diff --git a/SRC/slapy2.f b/SRC/slapy2.f index a8ee8b5b..3b1b7e43 100644 --- a/SRC/slapy2.f +++ b/SRC/slapy2.f @@ -56,17 +56,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * * ===================================================================== REAL FUNCTION SLAPY2( X, Y ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. REAL X, Y diff --git a/SRC/slaqr1.f b/SRC/slaqr1.f index 318b976e..7d7d851e 100644 --- a/SRC/slaqr1.f +++ b/SRC/slaqr1.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realOTHERauxiliary * @@ -121,10 +121,10 @@ * ===================================================================== SUBROUTINE SLAQR1( N, H, LDH, SR1, SI1, SR2, SI2, V ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. REAL SI1, SI2, SR1, SR2 diff --git a/SRC/slaqr2.f b/SRC/slaqr2.f index 578a2025..8e1f3491 100644 --- a/SRC/slaqr2.f +++ b/SRC/slaqr2.f @@ -263,7 +263,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realOTHERauxiliary * @@ -278,10 +278,10 @@ $ IHIZ, Z, LDZ, NS, ND, SR, SI, V, LDV, NH, T, $ LDT, NV, WV, LDWV, WORK, LWORK ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV, diff --git a/SRC/slaqr3.f b/SRC/slaqr3.f index 330589c2..534e2c48 100644 --- a/SRC/slaqr3.f +++ b/SRC/slaqr3.f @@ -275,7 +275,7 @@ $ IHIZ, Z, LDZ, NS, ND, SR, SI, V, LDV, NH, T, $ LDT, NV, WV, LDWV, WORK, LWORK ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/slaqr5.f b/SRC/slaqr5.f index 59692bd0..65278e35 100644 --- a/SRC/slaqr5.f +++ b/SRC/slaqr5.f @@ -257,7 +257,7 @@ $ SR, SI, H, LDH, ILOZ, IHIZ, Z, LDZ, V, LDV, U, $ LDU, NV, WV, LDWV, NH, WH, LDWH ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/slarra.f b/SRC/slarra.f index e06cdf0e..0456263a 100644 --- a/SRC/slarra.f +++ b/SRC/slarra.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -136,10 +136,10 @@ SUBROUTINE SLARRA( N, D, E, E2, SPLTOL, TNRM, $ NSPLIT, ISPLIT, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, N, NSPLIT diff --git a/SRC/slarrb.f b/SRC/slarrb.f index ea6e12b7..988e25ff 100644 --- a/SRC/slarrb.f +++ b/SRC/slarrb.f @@ -178,7 +178,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -196,10 +196,10 @@ $ RTOL2, OFFSET, W, WGAP, WERR, WORK, IWORK, $ PIVMIN, SPDIAM, TWIST, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER IFIRST, ILAST, INFO, N, OFFSET, TWIST diff --git a/SRC/slarrc.f b/SRC/slarrc.f index 75e568e8..f0c03351 100644 --- a/SRC/slarrc.f +++ b/SRC/slarrc.f @@ -137,7 +137,7 @@ SUBROUTINE SLARRC( JOBT, N, VL, VU, D, E, PIVMIN, $ EIGCNT, LCNT, RCNT, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/slarrd.f b/SRC/slarrd.f index ab389b44..7a7ec0ab 100644 --- a/SRC/slarrd.f +++ b/SRC/slarrd.f @@ -329,7 +329,7 @@ $ M, W, WERR, WL, WU, IBLOCK, INDEXW, $ WORK, IWORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/slarre.f b/SRC/slarre.f index 6dd8939f..d77ac249 100644 --- a/SRC/slarre.f +++ b/SRC/slarre.f @@ -305,7 +305,7 @@ $ W, WERR, WGAP, IBLOCK, INDEXW, GERS, PIVMIN, $ WORK, IWORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/slarrf.f b/SRC/slarrf.f index 8a265743..8c8de52f 100644 --- a/SRC/slarrf.f +++ b/SRC/slarrf.f @@ -193,7 +193,7 @@ $ SPDIAM, CLGAPL, CLGAPR, PIVMIN, SIGMA, $ DPLUS, LPLUS, WORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/slarrj.f b/SRC/slarrj.f index 665942d4..a721d075 100644 --- a/SRC/slarrj.f +++ b/SRC/slarrj.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -168,10 +168,10 @@ $ RTOL, OFFSET, W, WERR, WORK, IWORK, $ PIVMIN, SPDIAM, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER IFIRST, ILAST, INFO, N, OFFSET diff --git a/SRC/slarrk.f b/SRC/slarrk.f index 3fdb7769..f39f074d 100644 --- a/SRC/slarrk.f +++ b/SRC/slarrk.f @@ -137,7 +137,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -145,10 +145,10 @@ SUBROUTINE SLARRK( N, IW, GL, GU, $ D, E2, PIVMIN, RELTOL, W, WERR, INFO) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, IW, N diff --git a/SRC/slarrr.f b/SRC/slarrr.f index dd4b835f..3f77d388 100644 --- a/SRC/slarrr.f +++ b/SRC/slarrr.f @@ -78,7 +78,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -94,10 +94,10 @@ * ===================================================================== SUBROUTINE SLARRR( N, D, E, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER N, INFO diff --git a/SRC/slarrv.f b/SRC/slarrv.f index 675aac3d..782ed713 100644 --- a/SRC/slarrv.f +++ b/SRC/slarrv.f @@ -292,7 +292,7 @@ $ IBLOCK, INDEXW, GERS, Z, LDZ, ISUPPZ, $ WORK, IWORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/slasd0.f b/SRC/slasd0.f index 60b05eb4..3b875442 100644 --- a/SRC/slasd0.f +++ b/SRC/slasd0.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -150,10 +150,10 @@ SUBROUTINE SLASD0( N, SQRE, D, E, U, LDU, VT, LDVT, SMLSIZ, IWORK, $ WORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDU, LDVT, N, SMLSIZ, SQRE diff --git a/SRC/slasd3.f b/SRC/slasd3.f index f9b0c01d..add92f35 100644 --- a/SRC/slasd3.f +++ b/SRC/slasd3.f @@ -209,7 +209,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -224,10 +224,10 @@ $ LDU2, VT, LDVT, VT2, LDVT2, IDXC, CTOT, Z, $ INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, K, LDQ, LDU, LDU2, LDVT, LDVT2, NL, NR, diff --git a/SRC/slasd8.f b/SRC/slasd8.f index 578d569c..1d1d5cdb 100644 --- a/SRC/slasd8.f +++ b/SRC/slasd8.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup OTHERauxiliary * @@ -166,10 +166,10 @@ SUBROUTINE SLASD8( ICOMPQ, K, D, Z, VF, VL, DIFL, DIFR, LDDIFR, $ DSIGMA, WORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER ICOMPQ, INFO, K, LDDIFR diff --git a/SRC/slasq4.f b/SRC/slasq4.f index 78fb7e69..99317831 100644 --- a/SRC/slasq4.f +++ b/SRC/slasq4.f @@ -151,7 +151,7 @@ SUBROUTINE SLASQ4( I0, N0, Z, PP, N0IN, DMIN, DMIN1, DMIN2, DN, $ DN1, DN2, TAU, TTYPE, G ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/slaswlq.f b/SRC/slaswlq.f index 565ce2b6..478baebe 100644 --- a/SRC/slaswlq.f +++ b/SRC/slaswlq.f @@ -150,10 +150,10 @@ SUBROUTINE SLASWLQ( M, N, MB, NB, A, LDA, T, LDT, WORK, LWORK, $ INFO) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd. -- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, M, N, MB, NB, LWORK, LDT diff --git a/SRC/slaswp.f b/SRC/slaswp.f index 9a17fdfd..4fcef5b9 100644 --- a/SRC/slaswp.f +++ b/SRC/slaswp.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realOTHERauxiliary * @@ -115,10 +115,10 @@ * ===================================================================== SUBROUTINE SLASWP( N, A, LDA, K1, K2, IPIV, INCX ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INCX, K1, K2, LDA, N diff --git a/SRC/slasyf_aa.f b/SRC/slasyf_aa.f index 5391cef1..0437db3a 100644 --- a/SRC/slasyf_aa.f +++ b/SRC/slasyf_aa.f @@ -146,7 +146,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realSYcomputational * @@ -154,10 +154,10 @@ SUBROUTINE SLASYF_AA( UPLO, J1, M, NB, A, LDA, IPIV, $ H, LDH, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * IMPLICIT NONE * diff --git a/SRC/sorbdb1.f b/SRC/sorbdb1.f index 055993b6..98bc8e79 100644 --- a/SRC/sorbdb1.f +++ b/SRC/sorbdb1.f @@ -203,7 +203,7 @@ SUBROUTINE SORBDB1( M, P, Q, X11, LDX11, X21, LDX21, THETA, PHI, $ TAUP1, TAUP2, TAUQ1, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/sorbdb2.f b/SRC/sorbdb2.f index 3eed6148..684778ef 100644 --- a/SRC/sorbdb2.f +++ b/SRC/sorbdb2.f @@ -201,7 +201,7 @@ SUBROUTINE SORBDB2( M, P, Q, X11, LDX11, X21, LDX21, THETA, PHI, $ TAUP1, TAUP2, TAUQ1, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/sorbdb3.f b/SRC/sorbdb3.f index b679da3b..d849613c 100644 --- a/SRC/sorbdb3.f +++ b/SRC/sorbdb3.f @@ -202,7 +202,7 @@ SUBROUTINE SORBDB3( M, P, Q, X11, LDX11, X21, LDX21, THETA, PHI, $ TAUP1, TAUP2, TAUQ1, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/sorbdb4.f b/SRC/sorbdb4.f index e24609d0..42bbcbda 100644 --- a/SRC/sorbdb4.f +++ b/SRC/sorbdb4.f @@ -214,7 +214,7 @@ $ TAUP1, TAUP2, TAUQ1, PHANTOM, WORK, LWORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/sorbdb5.f b/SRC/sorbdb5.f index b565e5aa..f5af1db1 100644 --- a/SRC/sorbdb5.f +++ b/SRC/sorbdb5.f @@ -156,7 +156,7 @@ SUBROUTINE SORBDB5( M1, M2, N, X1, INCX1, X2, INCX2, Q1, LDQ1, Q2, $ LDQ2, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/sorbdb6.f b/SRC/sorbdb6.f index 1fc9f3d9..beedbfcb 100644 --- a/SRC/sorbdb6.f +++ b/SRC/sorbdb6.f @@ -154,7 +154,7 @@ SUBROUTINE SORBDB6( M1, M2, N, X1, INCX1, X2, INCX2, Q1, LDQ1, Q2, $ LDQ2, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/sorcsd.f b/SRC/sorcsd.f index bba032f8..06c77d8e 100644 --- a/SRC/sorcsd.f +++ b/SRC/sorcsd.f @@ -289,7 +289,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realOTHERcomputational * @@ -300,10 +300,10 @@ $ U1, LDU1, U2, LDU2, V1T, LDV1T, V2T, $ LDV2T, WORK, LWORK, IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBU1, JOBU2, JOBV1T, JOBV2T, SIGNS, TRANS diff --git a/SRC/sorcsd2by1.f b/SRC/sorcsd2by1.f index a700c1b2..18a2a790 100644 --- a/SRC/sorcsd2by1.f +++ b/SRC/sorcsd2by1.f @@ -233,7 +233,7 @@ $ X21, LDX21, THETA, U1, LDU1, U2, LDU2, V1T, $ LDV1T, WORK, LWORK, IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/sorm22.f b/SRC/sorm22.f index 06f18d68..265e9769 100644 --- a/SRC/sorm22.f +++ b/SRC/sorm22.f @@ -163,7 +163,7 @@ SUBROUTINE SORM22( SIDE, TRANS, M, N, N1, N2, Q, LDQ, C, LDC, $ WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.6.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2015 diff --git a/SRC/sppsvx.f b/SRC/sppsvx.f index a1cd2760..a4ac1494 100644 --- a/SRC/sppsvx.f +++ b/SRC/sppsvx.f @@ -311,7 +311,7 @@ SUBROUTINE SPPSVX( FACT, UPLO, N, NRHS, AP, AFP, EQUED, S, B, LDB, $ X, LDX, RCOND, FERR, BERR, WORK, IWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * April 2012 diff --git a/SRC/ssb2st_kernels.f b/SRC/ssb2st_kernels.f index 4d046d8f..54479f89 100644 --- a/SRC/ssb2st_kernels.f +++ b/SRC/ssb2st_kernels.f @@ -173,10 +173,10 @@ * IMPLICIT NONE * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/ssbev_2stage.f b/SRC/ssbev_2stage.f index f77368ab..f6c80249 100644 --- a/SRC/ssbev_2stage.f +++ b/SRC/ssbev_2stage.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realOTHEReigen * @@ -206,10 +206,10 @@ * IMPLICIT NONE * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBZ, UPLO diff --git a/SRC/ssbgvx.f b/SRC/ssbgvx.f index 312c2c55..3408810b 100644 --- a/SRC/ssbgvx.f +++ b/SRC/ssbgvx.f @@ -294,7 +294,7 @@ $ LDBB, Q, LDQ, VL, VU, IL, IU, ABSTOL, M, W, Z, $ LDZ, WORK, IWORK, IFAIL, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/ssfrk.f b/SRC/ssfrk.f index a0c0e9ce..6dc50fee 100644 --- a/SRC/ssfrk.f +++ b/SRC/ssfrk.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realOTHERcomputational * @@ -166,10 +166,10 @@ SUBROUTINE SSFRK( TRANSR, UPLO, TRANS, N, K, ALPHA, A, LDA, BETA, $ C ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. REAL ALPHA, BETA diff --git a/SRC/sspgv.f b/SRC/sspgv.f index d3614e26..3f20f62b 100644 --- a/SRC/sspgv.f +++ b/SRC/sspgv.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realOTHEReigen * @@ -160,10 +160,10 @@ SUBROUTINE SSPGV( ITYPE, JOBZ, UPLO, N, AP, BP, W, Z, LDZ, WORK, $ INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBZ, UPLO diff --git a/SRC/sspsvx.f b/SRC/sspsvx.f index 771f863e..52819b13 100644 --- a/SRC/sspsvx.f +++ b/SRC/sspsvx.f @@ -276,7 +276,7 @@ SUBROUTINE SSPSVX( FACT, UPLO, N, NRHS, AP, AFP, IPIV, B, LDB, X, $ LDX, RCOND, FERR, BERR, WORK, IWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * April 2012 diff --git a/SRC/sstegr.f b/SRC/sstegr.f index 99a4be62..37ce8cdb 100644 --- a/SRC/sstegr.f +++ b/SRC/sstegr.f @@ -265,7 +265,7 @@ $ ABSTOL, M, W, Z, LDZ, ISUPPZ, WORK, LWORK, IWORK, $ LIWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/sstemr.f b/SRC/sstemr.f index 917e896c..22853816 100644 --- a/SRC/sstemr.f +++ b/SRC/sstemr.f @@ -321,7 +321,7 @@ $ M, W, Z, LDZ, NZC, ISUPPZ, TRYRAC, WORK, LWORK, $ IWORK, LIWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/ssycon_3.f b/SRC/ssycon_3.f index 74f6761e..f91a527f 100644 --- a/SRC/ssycon_3.f +++ b/SRC/ssycon_3.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup singleSYcomputational * @@ -157,7 +157,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -171,10 +171,10 @@ SUBROUTINE SSYCON_3( UPLO, N, A, LDA, E, IPIV, ANORM, RCOND, $ WORK, IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/ssyconvf.f b/SRC/ssyconvf.f index b9069093..5983e3e5 100644 --- a/SRC/ssyconvf.f +++ b/SRC/ssyconvf.f @@ -189,7 +189,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup singleSYcomputational * @@ -198,7 +198,7 @@ *> *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -206,10 +206,10 @@ * ===================================================================== SUBROUTINE SSYCONVF( UPLO, WAY, N, A, LDA, E, IPIV, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO, WAY diff --git a/SRC/ssyconvf_rook.f b/SRC/ssyconvf_rook.f index 1ed5774f..e3bd3d81 100644 --- a/SRC/ssyconvf_rook.f +++ b/SRC/ssyconvf_rook.f @@ -180,7 +180,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup singleSYcomputational * @@ -189,7 +189,7 @@ *> *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -197,10 +197,10 @@ * ===================================================================== SUBROUTINE SSYCONVF_ROOK( UPLO, WAY, N, A, LDA, E, IPIV, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO, WAY diff --git a/SRC/ssygv_2stage.f b/SRC/ssygv_2stage.f index 0ba5799f..4ad690af 100644 --- a/SRC/ssygv_2stage.f +++ b/SRC/ssygv_2stage.f @@ -186,7 +186,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realSYeigen * @@ -228,10 +228,10 @@ * IMPLICIT NONE * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBZ, UPLO diff --git a/SRC/ssygvx.f b/SRC/ssygvx.f index 0e8f6515..8a99c939 100644 --- a/SRC/ssygvx.f +++ b/SRC/ssygvx.f @@ -297,7 +297,7 @@ $ VL, VU, IL, IU, ABSTOL, M, W, Z, LDZ, WORK, $ LWORK, IWORK, IFAIL, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/ssytrd_2stage.f b/SRC/ssytrd_2stage.f index 1aed9590..0982690d 100644 --- a/SRC/ssytrd_2stage.f +++ b/SRC/ssytrd_2stage.f @@ -183,7 +183,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realSYcomputational * @@ -227,10 +227,10 @@ * IMPLICIT NONE * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER VECT, UPLO diff --git a/SRC/ssytrd_sy2sb.f b/SRC/ssytrd_sy2sb.f index 3ba309fa..1c039003 100644 --- a/SRC/ssytrd_sy2sb.f +++ b/SRC/ssytrd_sy2sb.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realSYcomputational * @@ -245,10 +245,10 @@ * IMPLICIT NONE * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/ssytri2x.f b/SRC/ssytri2x.f index 6d15fad1..9aa567fd 100644 --- a/SRC/ssytri2x.f +++ b/SRC/ssytri2x.f @@ -113,17 +113,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realSYcomputational * * ===================================================================== SUBROUTINE SSYTRI2X( UPLO, N, A, LDA, IPIV, WORK, NB, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/ssytri_3.f b/SRC/ssytri_3.f index e1ef66ee..b1b41e48 100644 --- a/SRC/ssytri_3.f +++ b/SRC/ssytri_3.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup singleSYcomputational * @@ -160,7 +160,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -170,10 +170,10 @@ SUBROUTINE SSYTRI_3( UPLO, N, A, LDA, E, IPIV, WORK, LWORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/ssytri_3x.f b/SRC/ssytri_3x.f index 09c9f939..a2b011f5 100644 --- a/SRC/ssytri_3x.f +++ b/SRC/ssytri_3x.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup singleSYcomputational * @@ -150,7 +150,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -159,10 +159,10 @@ * ===================================================================== SUBROUTINE SSYTRI_3X( UPLO, N, A, LDA, E, IPIV, WORK, NB, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/ssytrs_3.f b/SRC/ssytrs_3.f index bf565704..4e988192 100644 --- a/SRC/ssytrs_3.f +++ b/SRC/ssytrs_3.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup singleSYcomputational * @@ -151,7 +151,7 @@ *> *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -165,10 +165,10 @@ SUBROUTINE SSYTRS_3( UPLO, N, NRHS, A, LDA, E, IPIV, B, LDB, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/ssytrs_aa.f b/SRC/ssytrs_aa.f index aa2f9cfc..80983fdc 100644 --- a/SRC/ssytrs_aa.f +++ b/SRC/ssytrs_aa.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realSYcomputational * @@ -129,10 +129,10 @@ SUBROUTINE SSYTRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, $ WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * IMPLICIT NONE * diff --git a/SRC/stfsm.f b/SRC/stfsm.f index 4ac3c3f5..a631cc47 100644 --- a/SRC/stfsm.f +++ b/SRC/stfsm.f @@ -182,7 +182,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realOTHERcomputational * @@ -277,10 +277,10 @@ SUBROUTINE STFSM( TRANSR, SIDE, UPLO, TRANS, DIAG, M, N, ALPHA, A, $ B, LDB ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER TRANSR, DIAG, SIDE, TRANS, UPLO diff --git a/SRC/stgex2.f b/SRC/stgex2.f index 7fb67fcc..1ae9563c 100644 --- a/SRC/stgex2.f +++ b/SRC/stgex2.f @@ -181,7 +181,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realGEauxiliary * @@ -221,10 +221,10 @@ SUBROUTINE STGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, $ LDZ, J1, N1, N2, WORK, LWORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. LOGICAL WANTQ, WANTZ diff --git a/SRC/stgexc.f b/SRC/stgexc.f index 0bfda7ff..840036db 100644 --- a/SRC/stgexc.f +++ b/SRC/stgexc.f @@ -195,7 +195,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realGEcomputational * @@ -220,10 +220,10 @@ SUBROUTINE STGEXC( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, $ LDZ, IFST, ILST, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. LOGICAL WANTQ, WANTZ diff --git a/SRC/stplqt.f b/SRC/stplqt.f index 482ce568..8077b086 100644 --- a/SRC/stplqt.f +++ b/SRC/stplqt.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERcomputational * @@ -189,10 +189,10 @@ SUBROUTINE STPLQT( M, N, L, MB, A, LDA, B, LDB, T, LDT, WORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDB, LDT, N, M, L, MB diff --git a/SRC/stplqt2.f b/SRC/stplqt2.f index b16738fb..ca38a954 100644 --- a/SRC/stplqt2.f +++ b/SRC/stplqt2.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERcomputational * @@ -177,10 +177,10 @@ * ===================================================================== SUBROUTINE STPLQT2( M, N, L, A, LDA, B, LDB, T, LDT, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDB, LDT, N, M, L diff --git a/SRC/strttp.f b/SRC/strttp.f index 7a1cf079..557ccfa4 100644 --- a/SRC/strttp.f +++ b/SRC/strttp.f @@ -97,17 +97,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup realOTHERcomputational * * ===================================================================== SUBROUTINE STRTTP( UPLO, N, A, LDA, AP, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/zbbcsd.f b/SRC/zbbcsd.f index fd1d95ab..4647181e 100644 --- a/SRC/zbbcsd.f +++ b/SRC/zbbcsd.f @@ -332,7 +332,7 @@ $ V2T, LDV2T, B11D, B11E, B12D, B12E, B21D, B21E, $ B22D, B22E, RWORK, LRWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/zcgesv.f b/SRC/zcgesv.f index 142a0e7c..dfb57546 100644 --- a/SRC/zcgesv.f +++ b/SRC/zcgesv.f @@ -201,7 +201,7 @@ SUBROUTINE ZCGESV( N, NRHS, A, LDA, IPIV, B, LDB, X, LDX, WORK, $ SWORK, RWORK, ITER, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/zcposv.f b/SRC/zcposv.f index c90a70ce..08d7fddb 100644 --- a/SRC/zcposv.f +++ b/SRC/zcposv.f @@ -209,7 +209,7 @@ SUBROUTINE ZCPOSV( UPLO, N, NRHS, A, LDA, B, LDB, X, LDX, WORK, $ SWORK, RWORK, ITER, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/zgebal.f b/SRC/zgebal.f index 94b8aadf..68291e2b 100644 --- a/SRC/zgebal.f +++ b/SRC/zgebal.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16GEcomputational * @@ -162,10 +162,10 @@ * ===================================================================== SUBROUTINE ZGEBAL( JOB, N, A, LDA, ILO, IHI, SCALE, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOB diff --git a/SRC/zgebd2.f b/SRC/zgebd2.f index 77779d6c..3afe79ec 100644 --- a/SRC/zgebd2.f +++ b/SRC/zgebd2.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16GEcomputational * @@ -189,10 +189,10 @@ * ===================================================================== SUBROUTINE ZGEBD2( M, N, A, LDA, D, E, TAUQ, TAUP, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, M, N diff --git a/SRC/zgebrd.f b/SRC/zgebrd.f index 47db32f4..6fd12b33 100644 --- a/SRC/zgebrd.f +++ b/SRC/zgebrd.f @@ -147,7 +147,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16GEcomputational * @@ -205,10 +205,10 @@ SUBROUTINE ZGEBRD( M, N, A, LDA, D, E, TAUQ, TAUP, WORK, LWORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LWORK, M, N diff --git a/SRC/zgejsv.f b/SRC/zgejsv.f index 0d05c993..e8418c68 100644 --- a/SRC/zgejsv.f +++ b/SRC/zgejsv.f @@ -569,10 +569,10 @@ $ M, N, A, LDA, SVA, U, LDU, V, LDV, $ CWORK, LWORK, RWORK, LRWORK, IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. IMPLICIT NONE diff --git a/SRC/zgelqt.f b/SRC/zgelqt.f index 54da169b..015bd3d7 100644 --- a/SRC/zgelqt.f +++ b/SRC/zgelqt.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -139,10 +139,10 @@ * ===================================================================== SUBROUTINE ZGELQT( M, N, MB, A, LDA, T, LDT, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDT, M, N, MB diff --git a/SRC/zgelqt3.f b/SRC/zgelqt3.f index 438238a1..fced7ee5 100644 --- a/SRC/zgelqt3.f +++ b/SRC/zgelqt3.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -131,10 +131,10 @@ * ===================================================================== RECURSIVE SUBROUTINE ZGELQT3( M, N, A, LDA, T, LDT, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, M, N, LDT diff --git a/SRC/zgelsd.f b/SRC/zgelsd.f index d671f191..9463ccc1 100644 --- a/SRC/zgelsd.f +++ b/SRC/zgelsd.f @@ -210,7 +210,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16GEsolve * @@ -225,10 +225,10 @@ SUBROUTINE ZGELSD( M, N, NRHS, A, LDA, B, LDB, S, RCOND, RANK, $ WORK, LWORK, RWORK, IWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS, RANK diff --git a/SRC/zgemlqt.f b/SRC/zgemlqt.f index e75b24b0..8d8dcb9c 100644 --- a/SRC/zgemlqt.f +++ b/SRC/zgemlqt.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleGEcomputational * @@ -168,10 +168,10 @@ SUBROUTINE ZGEMLQT( SIDE, TRANS, M, N, K, MB, V, LDV, T, LDT, $ C, LDC, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER SIDE, TRANS diff --git a/SRC/zgeqrt.f b/SRC/zgeqrt.f index 910f803e..60adfec7 100644 --- a/SRC/zgeqrt.f +++ b/SRC/zgeqrt.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16GEcomputational * @@ -141,10 +141,10 @@ * ===================================================================== SUBROUTINE ZGEQRT( M, N, NB, A, LDA, T, LDT, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDT, M, N, NB diff --git a/SRC/zgesv.f b/SRC/zgesv.f index e3ff3c45..40dd14f0 100644 --- a/SRC/zgesv.f +++ b/SRC/zgesv.f @@ -115,17 +115,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16GEsolve * * ===================================================================== SUBROUTINE ZGESV( N, NRHS, A, LDA, IPIV, B, LDB, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDB, N, NRHS diff --git a/SRC/zgesvj.f b/SRC/zgesvj.f index 1e1be50c..b3ced90f 100644 --- a/SRC/zgesvj.f +++ b/SRC/zgesvj.f @@ -351,7 +351,7 @@ SUBROUTINE ZGESVJ( JOBA, JOBU, JOBV, M, N, A, LDA, SVA, MV, V, $ LDV, CWORK, LWORK, RWORK, LRWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/zgetsls.f b/SRC/zgetsls.f index 04876471..5ce11efe 100644 --- a/SRC/zgetsls.f +++ b/SRC/zgetsls.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16GEsolve * @@ -160,10 +160,10 @@ SUBROUTINE ZGETSLS( TRANS, M, N, NRHS, A, LDA, B, LDB, $ WORK, LWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER TRANS diff --git a/SRC/zggesx.f b/SRC/zggesx.f index c43374d2..66152346 100644 --- a/SRC/zggesx.f +++ b/SRC/zggesx.f @@ -320,7 +320,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16GEeigen * @@ -330,10 +330,10 @@ $ LDVSR, RCONDE, RCONDV, WORK, LWORK, RWORK, $ IWORK, LIWORK, BWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBVSL, JOBVSR, SENSE, SORT diff --git a/SRC/zgsvj0.f b/SRC/zgsvj0.f index ad0d2bbd..d57090d4 100644 --- a/SRC/zgsvj0.f +++ b/SRC/zgsvj0.f @@ -218,7 +218,7 @@ SUBROUTINE ZGSVJ0( JOBV, M, N, A, LDA, D, SVA, MV, V, LDV, EPS, $ SFMIN, TOL, NSWEEP, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/zhb2st_kernels.f b/SRC/zhb2st_kernels.f index 862eb9d5..a440b5c0 100644 --- a/SRC/zhb2st_kernels.f +++ b/SRC/zhb2st_kernels.f @@ -170,10 +170,10 @@ * IMPLICIT NONE * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/zhbev_2stage.f b/SRC/zhbev_2stage.f index bb0faefd..f6f6abe2 100644 --- a/SRC/zhbev_2stage.f +++ b/SRC/zhbev_2stage.f @@ -171,7 +171,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16OTHEReigen * @@ -213,10 +213,10 @@ * IMPLICIT NONE * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBZ, UPLO diff --git a/SRC/zhecon_3.f b/SRC/zhecon_3.f index e544ac1f..8c3a9f32 100644 --- a/SRC/zhecon_3.f +++ b/SRC/zhecon_3.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16HEcomputational * @@ -157,7 +157,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -171,10 +171,10 @@ SUBROUTINE ZHECON_3( UPLO, N, A, LDA, E, IPIV, ANORM, RCOND, $ WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/zhecon_rook.f b/SRC/zhecon_rook.f index d19ffc7e..6dabdcff 100644 --- a/SRC/zhecon_rook.f +++ b/SRC/zhecon_rook.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16HEcomputational * @@ -125,7 +125,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -139,10 +139,10 @@ SUBROUTINE ZHECON_ROOK( UPLO, N, A, LDA, IPIV, ANORM, RCOND, WORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/zhegv_2stage.f b/SRC/zhegv_2stage.f index 2976c9fb..fc96881e 100644 --- a/SRC/zhegv_2stage.f +++ b/SRC/zhegv_2stage.f @@ -192,7 +192,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16HEeigen * @@ -234,10 +234,10 @@ * IMPLICIT NONE * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBZ, UPLO diff --git a/SRC/zhetrd_2stage.f b/SRC/zhetrd_2stage.f index 4a303142..7fb9e716 100644 --- a/SRC/zhetrd_2stage.f +++ b/SRC/zhetrd_2stage.f @@ -183,7 +183,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16HEcomputational * @@ -227,10 +227,10 @@ * IMPLICIT NONE * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER VECT, UPLO diff --git a/SRC/zhetrd_he2hb.f b/SRC/zhetrd_he2hb.f index 86ebddb9..9f5af849 100644 --- a/SRC/zhetrd_he2hb.f +++ b/SRC/zhetrd_he2hb.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16HEcomputational * @@ -245,10 +245,10 @@ * IMPLICIT NONE * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/zhetri2x.f b/SRC/zhetri2x.f index b78ebd85..ab35e700 100644 --- a/SRC/zhetri2x.f +++ b/SRC/zhetri2x.f @@ -113,17 +113,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16HEcomputational * * ===================================================================== SUBROUTINE ZHETRI2X( UPLO, N, A, LDA, IPIV, WORK, NB, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/zhetri_3.f b/SRC/zhetri_3.f index 69d6e0b8..f3fdcead 100644 --- a/SRC/zhetri_3.f +++ b/SRC/zhetri_3.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16HEcomputational * @@ -160,7 +160,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -170,10 +170,10 @@ SUBROUTINE ZHETRI_3( UPLO, N, A, LDA, E, IPIV, WORK, LWORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/zhetri_3x.f b/SRC/zhetri_3x.f index 8be104cb..d7c00c81 100644 --- a/SRC/zhetri_3x.f +++ b/SRC/zhetri_3x.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16HEcomputational * @@ -150,7 +150,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -159,10 +159,10 @@ * ===================================================================== SUBROUTINE ZHETRI_3X( UPLO, N, A, LDA, E, IPIV, WORK, NB, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/zhetrs_3.f b/SRC/zhetrs_3.f index a73f51b4..937544e8 100644 --- a/SRC/zhetrs_3.f +++ b/SRC/zhetrs_3.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16HEcomputational * @@ -151,7 +151,7 @@ *> *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -165,10 +165,10 @@ SUBROUTINE ZHETRS_3( UPLO, N, NRHS, A, LDA, E, IPIV, B, LDB, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/zhetrs_aa.f b/SRC/zhetrs_aa.f index af8e6762..25f40d16 100644 --- a/SRC/zhetrs_aa.f +++ b/SRC/zhetrs_aa.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16HEcomputational * @@ -130,10 +130,10 @@ SUBROUTINE ZHETRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, $ WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * IMPLICIT NONE * diff --git a/SRC/zhfrk.f b/SRC/zhfrk.f index a4d55078..6440542f 100644 --- a/SRC/zhfrk.f +++ b/SRC/zhfrk.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16OTHERcomputational * @@ -168,10 +168,10 @@ SUBROUTINE ZHFRK( TRANSR, UPLO, TRANS, N, K, ALPHA, A, LDA, BETA, $ C ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. DOUBLE PRECISION ALPHA, BETA diff --git a/SRC/zhpevd.f b/SRC/zhpevd.f index 8f0c8fda..83983ee8 100644 --- a/SRC/zhpevd.f +++ b/SRC/zhpevd.f @@ -192,7 +192,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16OTHEReigen * @@ -200,10 +200,10 @@ SUBROUTINE ZHPEVD( JOBZ, UPLO, N, AP, W, Z, LDZ, WORK, LWORK, $ RWORK, LRWORK, IWORK, LIWORK, INFO ) * -* -- LAPACK driver routine (version 3.7.0) -- +* -- LAPACK driver routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBZ, UPLO diff --git a/SRC/zla_gbamv.f b/SRC/zla_gbamv.f index 673535fa..6ffaf8f7 100644 --- a/SRC/zla_gbamv.f +++ b/SRC/zla_gbamv.f @@ -178,7 +178,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16GBcomputational * @@ -186,10 +186,10 @@ SUBROUTINE ZLA_GBAMV( TRANS, M, N, KL, KU, ALPHA, AB, LDAB, X, $ INCX, BETA, Y, INCY ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. DOUBLE PRECISION ALPHA, BETA diff --git a/SRC/zla_gbrfsx_extended.f b/SRC/zla_gbrfsx_extended.f index dcb6dac7..7a850f1a 100644 --- a/SRC/zla_gbrfsx_extended.f +++ b/SRC/zla_gbrfsx_extended.f @@ -397,7 +397,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16GBcomputational * @@ -410,10 +410,10 @@ $ Y_TAIL, RCOND, ITHRESH, RTHRESH, $ DZ_UB, IGNORE_CWISE, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDAB, LDAFB, LDB, LDY, N, KL, KU, NRHS, diff --git a/SRC/zla_geamv.f b/SRC/zla_geamv.f index ffcf6890..221e0c3f 100644 --- a/SRC/zla_geamv.f +++ b/SRC/zla_geamv.f @@ -167,7 +167,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16GEcomputational * @@ -175,10 +175,10 @@ SUBROUTINE ZLA_GEAMV ( TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, $ Y, INCY ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. DOUBLE PRECISION ALPHA, BETA diff --git a/SRC/zla_gerfsx_extended.f b/SRC/zla_gerfsx_extended.f index 1de80d40..2e93e265 100644 --- a/SRC/zla_gerfsx_extended.f +++ b/SRC/zla_gerfsx_extended.f @@ -384,7 +384,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16GEcomputational * @@ -396,10 +396,10 @@ $ Y_TAIL, RCOND, ITHRESH, RTHRESH, $ DZ_UB, IGNORE_CWISE, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE, diff --git a/SRC/zla_heamv.f b/SRC/zla_heamv.f index cc6407d6..cd536efb 100644 --- a/SRC/zla_heamv.f +++ b/SRC/zla_heamv.f @@ -154,7 +154,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16HEcomputational * @@ -178,10 +178,10 @@ SUBROUTINE ZLA_HEAMV( UPLO, N, ALPHA, A, LDA, X, INCX, BETA, Y, $ INCY ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. DOUBLE PRECISION ALPHA, BETA diff --git a/SRC/zla_herfsx_extended.f b/SRC/zla_herfsx_extended.f index a1f06151..5b43a58b 100644 --- a/SRC/zla_herfsx_extended.f +++ b/SRC/zla_herfsx_extended.f @@ -382,7 +382,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16HEcomputational * @@ -395,10 +395,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE, diff --git a/SRC/zla_porfsx_extended.f b/SRC/zla_porfsx_extended.f index 1df66e10..85dd4278 100644 --- a/SRC/zla_porfsx_extended.f +++ b/SRC/zla_porfsx_extended.f @@ -374,7 +374,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16POcomputational * @@ -387,10 +387,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE, diff --git a/SRC/zla_syamv.f b/SRC/zla_syamv.f index 0f1f4e05..02958bef 100644 --- a/SRC/zla_syamv.f +++ b/SRC/zla_syamv.f @@ -155,7 +155,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16SYcomputational * @@ -179,10 +179,10 @@ SUBROUTINE ZLA_SYAMV( UPLO, N, ALPHA, A, LDA, X, INCX, BETA, Y, $ INCY ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. DOUBLE PRECISION ALPHA, BETA diff --git a/SRC/zla_syrfsx_extended.f b/SRC/zla_syrfsx_extended.f index 0ea8a100..a9716fd2 100644 --- a/SRC/zla_syrfsx_extended.f +++ b/SRC/zla_syrfsx_extended.f @@ -382,7 +382,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16SYcomputational * @@ -395,10 +395,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE, diff --git a/SRC/zlabrd.f b/SRC/zlabrd.f index 812a973b..90784096 100644 --- a/SRC/zlabrd.f +++ b/SRC/zlabrd.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16OTHERauxiliary * @@ -212,10 +212,10 @@ SUBROUTINE ZLABRD( M, N, NB, A, LDA, D, E, TAUQ, TAUP, X, LDX, Y, $ LDY ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER LDA, LDX, LDY, M, N, NB diff --git a/SRC/zlahef_aa.f b/SRC/zlahef_aa.f index 4646233b..b7d46dfb 100644 --- a/SRC/zlahef_aa.f +++ b/SRC/zlahef_aa.f @@ -146,7 +146,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16HEcomputational * @@ -154,10 +154,10 @@ SUBROUTINE ZLAHEF_AA( UPLO, J1, M, NB, A, LDA, IPIV, $ H, LDH, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * IMPLICIT NONE * diff --git a/SRC/zlalsa.f b/SRC/zlalsa.f index 7d939c0a..ed5845ba 100644 --- a/SRC/zlalsa.f +++ b/SRC/zlalsa.f @@ -250,7 +250,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16OTHERcomputational * @@ -267,10 +267,10 @@ $ GIVCOL, LDGCOL, PERM, GIVNUM, C, S, RWORK, $ IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER ICOMPQ, INFO, LDB, LDBX, LDGCOL, LDU, N, NRHS, diff --git a/SRC/zlalsd.f b/SRC/zlalsd.f index 01f3ac03..409ebe3a 100644 --- a/SRC/zlalsd.f +++ b/SRC/zlalsd.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16OTHERcomputational * @@ -187,10 +187,10 @@ SUBROUTINE ZLALSD( UPLO, SMLSIZ, N, NRHS, D, E, B, LDB, RCOND, $ RANK, WORK, RWORK, IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/zlamswlq.f b/SRC/zlamswlq.f index 9cd529bf..0e0b0a1d 100644 --- a/SRC/zlamswlq.f +++ b/SRC/zlamswlq.f @@ -202,10 +202,10 @@ SUBROUTINE ZLAMSWLQ( SIDE, TRANS, M, N, K, MB, NB, A, LDA, T, $ LDT, C, LDC, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER SIDE, TRANS diff --git a/SRC/zlamtsqr.f b/SRC/zlamtsqr.f index 79370017..1ee73242 100644 --- a/SRC/zlamtsqr.f +++ b/SRC/zlamtsqr.f @@ -195,10 +195,10 @@ SUBROUTINE ZLAMTSQR( SIDE, TRANS, M, N, K, MB, NB, A, LDA, T, $ LDT, C, LDC, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER SIDE, TRANS diff --git a/SRC/zlaqr1.f b/SRC/zlaqr1.f index cc7200eb..03afb87a 100644 --- a/SRC/zlaqr1.f +++ b/SRC/zlaqr1.f @@ -94,7 +94,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16OTHERauxiliary * @@ -107,10 +107,10 @@ * ===================================================================== SUBROUTINE ZLAQR1( N, H, LDH, S1, S2, V ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. COMPLEX*16 S1, S2 diff --git a/SRC/zlaqr2.f b/SRC/zlaqr2.f index 7d1a31d5..e6e2ea48 100644 --- a/SRC/zlaqr2.f +++ b/SRC/zlaqr2.f @@ -255,7 +255,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16OTHERauxiliary * @@ -270,10 +270,10 @@ $ IHIZ, Z, LDZ, NS, ND, SH, V, LDV, NH, T, LDT, $ NV, WV, LDWV, WORK, LWORK ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV, diff --git a/SRC/zlaqr3.f b/SRC/zlaqr3.f index b88b6f06..64ab59f3 100644 --- a/SRC/zlaqr3.f +++ b/SRC/zlaqr3.f @@ -267,7 +267,7 @@ $ IHIZ, Z, LDZ, NS, ND, SH, V, LDV, NH, T, LDT, $ NV, WV, LDWV, WORK, LWORK ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/zlaqr5.f b/SRC/zlaqr5.f index 422d7b21..0dfbce82 100644 --- a/SRC/zlaqr5.f +++ b/SRC/zlaqr5.f @@ -249,7 +249,7 @@ $ H, LDH, ILOZ, IHIZ, Z, LDZ, V, LDV, U, LDU, NV, $ WV, LDWV, NH, WH, LDWH ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/zlarrv.f b/SRC/zlarrv.f index 690e5b6e..67a67584 100644 --- a/SRC/zlarrv.f +++ b/SRC/zlarrv.f @@ -286,7 +286,7 @@ $ IBLOCK, INDEXW, GERS, Z, LDZ, ISUPPZ, $ WORK, IWORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/zlaswlq.f b/SRC/zlaswlq.f index 96f86f18..24dd41d7 100644 --- a/SRC/zlaswlq.f +++ b/SRC/zlaswlq.f @@ -150,10 +150,10 @@ SUBROUTINE ZLASWLQ( M, N, MB, NB, A, LDA, T, LDT, WORK, LWORK, $ INFO) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd. -- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, M, N, MB, NB, LWORK, LDT diff --git a/SRC/zlaswp.f b/SRC/zlaswp.f index 1333e26f..13c0f9b4 100644 --- a/SRC/zlaswp.f +++ b/SRC/zlaswp.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16OTHERauxiliary * @@ -115,10 +115,10 @@ * ===================================================================== SUBROUTINE ZLASWP( N, A, LDA, K1, K2, IPIV, INCX ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INCX, K1, K2, LDA, N diff --git a/SRC/zlasyf_aa.f b/SRC/zlasyf_aa.f index 8e28d4f2..3e1b7639 100644 --- a/SRC/zlasyf_aa.f +++ b/SRC/zlasyf_aa.f @@ -146,7 +146,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16SYcomputational * @@ -154,10 +154,10 @@ SUBROUTINE ZLASYF_AA( UPLO, J1, M, NB, A, LDA, IPIV, $ H, LDH, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * IMPLICIT NONE * diff --git a/SRC/zstedc.f b/SRC/zstedc.f index b742ac62..b6be431b 100644 --- a/SRC/zstedc.f +++ b/SRC/zstedc.f @@ -198,7 +198,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16OTHERcomputational * @@ -212,10 +212,10 @@ SUBROUTINE ZSTEDC( COMPZ, N, D, E, Z, LDZ, WORK, LWORK, RWORK, $ LRWORK, IWORK, LIWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER COMPZ diff --git a/SRC/zstegr.f b/SRC/zstegr.f index b8d20729..5ad98109 100644 --- a/SRC/zstegr.f +++ b/SRC/zstegr.f @@ -265,7 +265,7 @@ $ ABSTOL, M, W, Z, LDZ, ISUPPZ, WORK, LWORK, IWORK, $ LIWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/zstemr.f b/SRC/zstemr.f index 7fa8f3cb..ac7552a6 100644 --- a/SRC/zstemr.f +++ b/SRC/zstemr.f @@ -338,7 +338,7 @@ $ M, W, Z, LDZ, NZC, ISUPPZ, TRYRAC, WORK, LWORK, $ IWORK, LIWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/zsycon_3.f b/SRC/zsycon_3.f index f279f3c6..85684596 100644 --- a/SRC/zsycon_3.f +++ b/SRC/zsycon_3.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16SYcomputational * @@ -157,7 +157,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -171,10 +171,10 @@ SUBROUTINE ZSYCON_3( UPLO, N, A, LDA, E, IPIV, ANORM, RCOND, $ WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/zsyconvf.f b/SRC/zsyconvf.f index 5bd93199..49d51233 100644 --- a/SRC/zsyconvf.f +++ b/SRC/zsyconvf.f @@ -192,7 +192,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16SYcomputational * @@ -201,7 +201,7 @@ *> *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -209,10 +209,10 @@ * ===================================================================== SUBROUTINE ZSYCONVF( UPLO, WAY, N, A, LDA, E, IPIV, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO, WAY diff --git a/SRC/zsyconvf_rook.f b/SRC/zsyconvf_rook.f index daddd260..ca4d1047 100644 --- a/SRC/zsyconvf_rook.f +++ b/SRC/zsyconvf_rook.f @@ -183,7 +183,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16SYcomputational * @@ -192,7 +192,7 @@ *> *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -200,10 +200,10 @@ * ===================================================================== SUBROUTINE ZSYCONVF_ROOK( UPLO, WAY, N, A, LDA, E, IPIV, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO, WAY diff --git a/SRC/zsytri2x.f b/SRC/zsytri2x.f index 38e3cb32..4feb4d56 100644 --- a/SRC/zsytri2x.f +++ b/SRC/zsytri2x.f @@ -113,17 +113,17 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16SYcomputational * * ===================================================================== SUBROUTINE ZSYTRI2X( UPLO, N, A, LDA, IPIV, WORK, NB, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/zsytri_3.f b/SRC/zsytri_3.f index 99d771a8..e2b03a29 100644 --- a/SRC/zsytri_3.f +++ b/SRC/zsytri_3.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16SYcomputational * @@ -160,7 +160,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -170,10 +170,10 @@ SUBROUTINE ZSYTRI_3( UPLO, N, A, LDA, E, IPIV, WORK, LWORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/zsytri_3x.f b/SRC/zsytri_3x.f index 7f999e06..a9439292 100644 --- a/SRC/zsytri_3x.f +++ b/SRC/zsytri_3x.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16SYcomputational * @@ -150,7 +150,7 @@ * ================== *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -159,10 +159,10 @@ * ===================================================================== SUBROUTINE ZSYTRI_3X( UPLO, N, A, LDA, E, IPIV, WORK, NB, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/zsytrs_3.f b/SRC/zsytrs_3.f index dab36135..67368753 100644 --- a/SRC/zsytrs_3.f +++ b/SRC/zsytrs_3.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16SYcomputational * @@ -151,7 +151,7 @@ *> *> \verbatim *> -*> December 2016, Igor Kozachenko, +*> June 2017, Igor Kozachenko, *> Computer Science Division, *> University of California, Berkeley *> @@ -165,10 +165,10 @@ SUBROUTINE ZSYTRS_3( UPLO, N, NRHS, A, LDA, E, IPIV, B, LDB, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/zsytrs_aa.f b/SRC/zsytrs_aa.f index fc7f31e6..ccb55f7d 100644 --- a/SRC/zsytrs_aa.f +++ b/SRC/zsytrs_aa.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16SYcomputational * @@ -129,10 +129,10 @@ SUBROUTINE ZSYTRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, $ WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * IMPLICIT NONE * diff --git a/SRC/ztgex2.f b/SRC/ztgex2.f index 593bc247..ba80d716 100644 --- a/SRC/ztgex2.f +++ b/SRC/ztgex2.f @@ -153,7 +153,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16GEauxiliary * @@ -190,10 +190,10 @@ SUBROUTINE ZTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, $ LDZ, J1, INFO ) * -* -- LAPACK auxiliary routine (version 3.7.0) -- +* -- LAPACK auxiliary routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. LOGICAL WANTQ, WANTZ diff --git a/SRC/ztgexc.f b/SRC/ztgexc.f index d5d27a92..7eac54ca 100644 --- a/SRC/ztgexc.f +++ b/SRC/ztgexc.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16GEcomputational * @@ -200,10 +200,10 @@ SUBROUTINE ZTGEXC( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, $ LDZ, IFST, ILST, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. LOGICAL WANTQ, WANTZ diff --git a/SRC/ztgsen.f b/SRC/ztgsen.f index 1671c468..cb4afd5e 100644 --- a/SRC/ztgsen.f +++ b/SRC/ztgsen.f @@ -433,7 +433,7 @@ $ ALPHA, BETA, Q, LDQ, Z, LDZ, M, PL, PR, DIF, $ WORK, LWORK, IWORK, LIWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * June 2016 diff --git a/SRC/ztplqt.f b/SRC/ztplqt.f index a9a035ef..bbf00104 100644 --- a/SRC/ztplqt.f +++ b/SRC/ztplqt.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERcomputational * @@ -189,10 +189,10 @@ SUBROUTINE ZTPLQT( M, N, L, MB, A, LDA, B, LDB, T, LDT, WORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDB, LDT, N, M, L, MB diff --git a/SRC/ztplqt2.f b/SRC/ztplqt2.f index a1d96dba..9fecfddf 100644 --- a/SRC/ztplqt2.f +++ b/SRC/ztplqt2.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERcomputational * @@ -177,10 +177,10 @@ * ===================================================================== SUBROUTINE ZTPLQT2( M, N, L, A, LDA, B, LDB, T, LDT, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDB, LDT, N, M, L diff --git a/SRC/ztpmlqt.f b/SRC/ztpmlqt.f index e6c611e0..6a67e444 100644 --- a/SRC/ztpmlqt.f +++ b/SRC/ztpmlqt.f @@ -175,7 +175,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup doubleOTHERcomputational * @@ -216,10 +216,10 @@ SUBROUTINE ZTPMLQT( SIDE, TRANS, M, N, K, L, MB, V, LDV, T, LDT, $ A, LDA, B, LDB, WORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER SIDE, TRANS diff --git a/SRC/ztrevc3.f b/SRC/ztrevc3.f index ef833117..08c1b11d 100644 --- a/SRC/ztrevc3.f +++ b/SRC/ztrevc3.f @@ -222,7 +222,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * * @precisions fortran z -> c * @@ -247,10 +247,10 @@ $ LDVR, MM, M, WORK, LWORK, RWORK, LRWORK, INFO) IMPLICIT NONE * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER HOWMNY, SIDE diff --git a/SRC/zunbdb1.f b/SRC/zunbdb1.f index cab871b0..039d160c 100644 --- a/SRC/zunbdb1.f +++ b/SRC/zunbdb1.f @@ -203,7 +203,7 @@ SUBROUTINE ZUNBDB1( M, P, Q, X11, LDX11, X21, LDX21, THETA, PHI, $ TAUP1, TAUP2, TAUQ1, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/zunbdb2.f b/SRC/zunbdb2.f index c10c4f65..a62abb06 100644 --- a/SRC/zunbdb2.f +++ b/SRC/zunbdb2.f @@ -201,7 +201,7 @@ SUBROUTINE ZUNBDB2( M, P, Q, X11, LDX11, X21, LDX21, THETA, PHI, $ TAUP1, TAUP2, TAUQ1, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/zunbdb3.f b/SRC/zunbdb3.f index 4243fd37..9381da87 100644 --- a/SRC/zunbdb3.f +++ b/SRC/zunbdb3.f @@ -201,7 +201,7 @@ SUBROUTINE ZUNBDB3( M, P, Q, X11, LDX11, X21, LDX21, THETA, PHI, $ TAUP1, TAUP2, TAUQ1, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/zunbdb4.f b/SRC/zunbdb4.f index 8c759d07..0b7b5442 100644 --- a/SRC/zunbdb4.f +++ b/SRC/zunbdb4.f @@ -213,7 +213,7 @@ $ TAUP1, TAUP2, TAUQ1, PHANTOM, WORK, LWORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/zunbdb5.f b/SRC/zunbdb5.f index d9c08012..be708b79 100644 --- a/SRC/zunbdb5.f +++ b/SRC/zunbdb5.f @@ -156,7 +156,7 @@ SUBROUTINE ZUNBDB5( M1, M2, N, X1, INCX1, X2, INCX2, Q1, LDQ1, Q2, $ LDQ2, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/zunbdb6.f b/SRC/zunbdb6.f index 32b8e3e9..c4ccbfb1 100644 --- a/SRC/zunbdb6.f +++ b/SRC/zunbdb6.f @@ -154,7 +154,7 @@ SUBROUTINE ZUNBDB6( M1, M2, N, X1, INCX1, X2, INCX2, Q1, LDQ1, Q2, $ LDQ2, WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/zuncsd.f b/SRC/zuncsd.f index 570b370b..db53f93d 100644 --- a/SRC/zuncsd.f +++ b/SRC/zuncsd.f @@ -308,7 +308,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date December 2016 +*> \date June 2017 * *> \ingroup complex16OTHERcomputational * @@ -320,10 +320,10 @@ $ LDV2T, WORK, LWORK, RWORK, LRWORK, $ IWORK, INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* December 2016 +* June 2017 * * .. Scalar Arguments .. CHARACTER JOBU1, JOBU2, JOBV1T, JOBV2T, SIGNS, TRANS diff --git a/SRC/zuncsd2by1.f b/SRC/zuncsd2by1.f index 5e899079..56285a19 100644 --- a/SRC/zuncsd2by1.f +++ b/SRC/zuncsd2by1.f @@ -254,7 +254,7 @@ $ LDV1T, WORK, LWORK, RWORK, LRWORK, IWORK, $ INFO ) * -* -- LAPACK computational routine (version 3.7.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * July 2012 diff --git a/SRC/zunm22.f b/SRC/zunm22.f index 01f8b73c..f612e8fa 100644 --- a/SRC/zunm22.f +++ b/SRC/zunm22.f @@ -162,7 +162,7 @@ SUBROUTINE ZUNM22( SIDE, TRANS, M, N, N1, N2, Q, LDQ, C, LDC, $ WORK, LWORK, INFO ) * -* -- LAPACK computational routine (version 3.6.0) -- +* -- LAPACK computational routine (version 3.7.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2015 |