diff options
| author | julie <julielangou@users.noreply.github.com> | 2009-04-16 18:10:16 +0000 |
|---|---|---|
| committer | julie <julielangou@users.noreply.github.com> | 2009-04-16 18:10:16 +0000 |
| commit | be91086043cf7661e6c6de1715895e5a48e0e74e (patch) | |
| tree | 03aa2dfc3ed8c705aecc14044d1ad91cae3c2e0e /SRC | |
| parent | cd6bf778913fc535e5a0ecb79eeaf4a1ad88b291 (diff) | |
| download | lapack-be91086043cf7661e6c6de1715895e5a48e0e74e.tar.gz lapack-be91086043cf7661e6c6de1715895e5a48e0e74e.tar.bz2 lapack-be91086043cf7661e6c6de1715895e5a48e0e74e.zip | |
Big commit before 3.2.1 release.
Those are just cosmetic changes to update version number and various other minor change.
Diffstat (limited to 'SRC')
1502 files changed, 3115 insertions, 1753 deletions
diff --git a/SRC/cbdsqr.f b/SRC/cbdsqr.f index 2e4b77bb..effb1f18 100644 --- a/SRC/cbdsqr.f +++ b/SRC/cbdsqr.f @@ -2,7 +2,8 @@ $ LDU, C, LDC, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgbbrd.f b/SRC/cgbbrd.f index 1d97dd93..4de53667 100644 --- a/SRC/cgbbrd.f +++ b/SRC/cgbbrd.f @@ -2,7 +2,8 @@ $ LDQ, PT, LDPT, C, LDC, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgbcon.f b/SRC/cgbcon.f index 58f80d07..8acd43a6 100644 --- a/SRC/cgbcon.f +++ b/SRC/cgbcon.f @@ -2,7 +2,8 @@ $ WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/cgbequ.f b/SRC/cgbequ.f index d2f49215..6d9e37f3 100644 --- a/SRC/cgbequ.f +++ b/SRC/cgbequ.f @@ -2,7 +2,8 @@ $ AMAX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgbrfs.f b/SRC/cgbrfs.f index 719c1971..c52cfb2f 100644 --- a/SRC/cgbrfs.f +++ b/SRC/cgbrfs.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/cgbrfsx.f b/SRC/cgbrfsx.f index 4f6cd434..253abf72 100644 --- a/SRC/cgbrfsx.f +++ b/SRC/cgbrfsx.f @@ -4,10 +4,10 @@ $ ERR_BNDS_COMP, NPARAMS, PARAMS, WORK, RWORK, $ INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cgbsv.f b/SRC/cgbsv.f index 72a204dc..882491f5 100644 --- a/SRC/cgbsv.f +++ b/SRC/cgbsv.f @@ -1,7 +1,8 @@ SUBROUTINE CGBSV( N, KL, KU, NRHS, AB, LDAB, IPIV, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgbsvx.f b/SRC/cgbsvx.f index 89e086c2..1a5d107a 100644 --- a/SRC/cgbsvx.f +++ b/SRC/cgbsvx.f @@ -3,7 +3,8 @@ $ RCOND, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgbtf2.f b/SRC/cgbtf2.f index 8fa9b2a2..951755d6 100644 --- a/SRC/cgbtf2.f +++ b/SRC/cgbtf2.f @@ -1,7 +1,8 @@ SUBROUTINE CGBTF2( M, N, KL, KU, AB, LDAB, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgbtrf.f b/SRC/cgbtrf.f index 968ab777..636d8be7 100644 --- a/SRC/cgbtrf.f +++ b/SRC/cgbtrf.f @@ -1,7 +1,8 @@ SUBROUTINE CGBTRF( M, N, KL, KU, AB, LDAB, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgbtrs.f b/SRC/cgbtrs.f index 97cd84bb..040f16ba 100644 --- a/SRC/cgbtrs.f +++ b/SRC/cgbtrs.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgebak.f b/SRC/cgebak.f index 2f8c8c5d..48d87e42 100644 --- a/SRC/cgebak.f +++ b/SRC/cgebak.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgebal.f b/SRC/cgebal.f index 4fd1d092..8708638b 100644 --- a/SRC/cgebal.f +++ b/SRC/cgebal.f @@ -1,7 +1,8 @@ SUBROUTINE CGEBAL( JOB, N, A, LDA, ILO, IHI, SCALE, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgebd2.f b/SRC/cgebd2.f index 1d4030dc..d1148a15 100644 --- a/SRC/cgebd2.f +++ b/SRC/cgebd2.f @@ -1,7 +1,8 @@ SUBROUTINE CGEBD2( M, N, A, LDA, D, E, TAUQ, TAUP, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgebrd.f b/SRC/cgebrd.f index 27392c19..72749e3c 100644 --- a/SRC/cgebrd.f +++ b/SRC/cgebrd.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgecon.f b/SRC/cgecon.f index 2f789732..de14d318 100644 --- a/SRC/cgecon.f +++ b/SRC/cgecon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/cgeequ.f b/SRC/cgeequ.f index 5895f132..7b3b2932 100644 --- a/SRC/cgeequ.f +++ b/SRC/cgeequ.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgees.f b/SRC/cgees.f index 0be4146a..47480b35 100644 --- a/SRC/cgees.f +++ b/SRC/cgees.f @@ -2,7 +2,8 @@ $ LDVS, WORK, LWORK, RWORK, BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgeesx.f b/SRC/cgeesx.f index 2ccb03a9..8cda6e67 100644 --- a/SRC/cgeesx.f +++ b/SRC/cgeesx.f @@ -3,7 +3,8 @@ $ BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgeev.f b/SRC/cgeev.f index 536e5620..3652a6ac 100644 --- a/SRC/cgeev.f +++ b/SRC/cgeev.f @@ -2,7 +2,8 @@ $ WORK, LWORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgeevx.f b/SRC/cgeevx.f index d07efc94..bdd0c2dd 100644 --- a/SRC/cgeevx.f +++ b/SRC/cgeevx.f @@ -3,7 +3,8 @@ $ RCONDV, WORK, LWORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgegs.f b/SRC/cgegs.f index 16a5125b..fc504296 100644 --- a/SRC/cgegs.f +++ b/SRC/cgegs.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgegv.f b/SRC/cgegv.f index 202bcc55..080524e5 100644 --- a/SRC/cgegv.f +++ b/SRC/cgegv.f @@ -2,7 +2,8 @@ $ VL, LDVL, VR, LDVR, WORK, LWORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgehd2.f b/SRC/cgehd2.f index 0650827b..9237dca8 100644 --- a/SRC/cgehd2.f +++ b/SRC/cgehd2.f @@ -1,7 +1,8 @@ SUBROUTINE CGEHD2( N, ILO, IHI, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgehrd.f b/SRC/cgehrd.f index cbc50440..6f7f9855 100644 --- a/SRC/cgehrd.f +++ b/SRC/cgehrd.f @@ -1,8 +1,9 @@ SUBROUTINE CGEHRD( N, ILO, IHI, A, LDA, TAU, WORK, LWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. INTEGER IHI, ILO, INFO, LDA, LWORK, N diff --git a/SRC/cgelq2.f b/SRC/cgelq2.f index e94d5e69..529c6a3f 100644 --- a/SRC/cgelq2.f +++ b/SRC/cgelq2.f @@ -1,7 +1,8 @@ SUBROUTINE CGELQ2( M, N, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgelqf.f b/SRC/cgelqf.f index 6c9c66e4..0c90359b 100644 --- a/SRC/cgelqf.f +++ b/SRC/cgelqf.f @@ -1,7 +1,8 @@ SUBROUTINE CGELQF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgels.f b/SRC/cgels.f index 4055e556..646d6e89 100644 --- a/SRC/cgels.f +++ b/SRC/cgels.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgelsd.f b/SRC/cgelsd.f index 900bd128..214e0a29 100644 --- a/SRC/cgelsd.f +++ b/SRC/cgelsd.f @@ -2,7 +2,8 @@ $ WORK, LWORK, RWORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgelss.f b/SRC/cgelss.f index f6f08b51..da5e1cc3 100644 --- a/SRC/cgelss.f +++ b/SRC/cgelss.f @@ -2,7 +2,8 @@ $ WORK, LWORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgelsx.f b/SRC/cgelsx.f index 293210da..b321bc6c 100644 --- a/SRC/cgelsx.f +++ b/SRC/cgelsx.f @@ -2,7 +2,8 @@ $ WORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgelsy.f b/SRC/cgelsy.f index 8bd49205..e0da0be2 100644 --- a/SRC/cgelsy.f +++ b/SRC/cgelsy.f @@ -2,7 +2,8 @@ $ WORK, LWORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgeql2.f b/SRC/cgeql2.f index b16506f0..c0aea5b9 100644 --- a/SRC/cgeql2.f +++ b/SRC/cgeql2.f @@ -1,7 +1,8 @@ SUBROUTINE CGEQL2( M, N, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgeqlf.f b/SRC/cgeqlf.f index e5c2d17a..340f7c25 100644 --- a/SRC/cgeqlf.f +++ b/SRC/cgeqlf.f @@ -1,7 +1,8 @@ SUBROUTINE CGEQLF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgeqp3.f b/SRC/cgeqp3.f index 5df5e6f8..e97c55a0 100644 --- a/SRC/cgeqp3.f +++ b/SRC/cgeqp3.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgeqpf.f b/SRC/cgeqpf.f index 2b3a46f0..6918e072 100644 --- a/SRC/cgeqpf.f +++ b/SRC/cgeqpf.f @@ -1,7 +1,8 @@ SUBROUTINE CGEQPF( M, N, A, LDA, JPVT, TAU, WORK, RWORK, INFO ) * * -- LAPACK deprecated driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgeqr2.f b/SRC/cgeqr2.f index 4860d21d..135a167c 100644 --- a/SRC/cgeqr2.f +++ b/SRC/cgeqr2.f @@ -1,7 +1,8 @@ SUBROUTINE CGEQR2( M, N, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgeqrf.f b/SRC/cgeqrf.f index 76c0e6ab..01d2af1d 100644 --- a/SRC/cgeqrf.f +++ b/SRC/cgeqrf.f @@ -1,7 +1,8 @@ SUBROUTINE CGEQRF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgerfs.f b/SRC/cgerfs.f index b0c7813d..09312dcf 100644 --- a/SRC/cgerfs.f +++ b/SRC/cgerfs.f @@ -2,7 +2,8 @@ $ X, LDX, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/cgerfsx.f b/SRC/cgerfsx.f index 0f18369d..5fbdd729 100644 --- a/SRC/cgerfsx.f +++ b/SRC/cgerfsx.f @@ -3,10 +3,10 @@ $ ERR_BNDS_NORM, ERR_BNDS_COMP, NPARAMS, PARAMS, $ WORK, RWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cgerq2.f b/SRC/cgerq2.f index fd23f31f..50b61927 100644 --- a/SRC/cgerq2.f +++ b/SRC/cgerq2.f @@ -1,7 +1,8 @@ SUBROUTINE CGERQ2( M, N, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgerqf.f b/SRC/cgerqf.f index 7d8dedb7..04e7f530 100644 --- a/SRC/cgerqf.f +++ b/SRC/cgerqf.f @@ -1,7 +1,8 @@ SUBROUTINE CGERQF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgesc2.f b/SRC/cgesc2.f index 7b030fc8..0335547b 100644 --- a/SRC/cgesc2.f +++ b/SRC/cgesc2.f @@ -1,7 +1,8 @@ SUBROUTINE CGESC2( N, A, LDA, RHS, IPIV, JPIV, SCALE ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgesdd.f b/SRC/cgesdd.f index 89e06f74..d4cf49af 100644 --- a/SRC/cgesdd.f +++ b/SRC/cgesdd.f @@ -2,7 +2,8 @@ $ WORK, LWORK, RWORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * 8-15-00: Improve consistency of WS calculations (eca) * diff --git a/SRC/cgesv.f b/SRC/cgesv.f index 5e7a1175..2fc6fd49 100644 --- a/SRC/cgesv.f +++ b/SRC/cgesv.f @@ -1,7 +1,8 @@ SUBROUTINE CGESV( N, NRHS, A, LDA, IPIV, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgesvd.f b/SRC/cgesvd.f index 8ab58d00..48e595f2 100644 --- a/SRC/cgesvd.f +++ b/SRC/cgesvd.f @@ -2,7 +2,8 @@ $ WORK, LWORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgesvx.f b/SRC/cgesvx.f index a6255766..d675baab 100644 --- a/SRC/cgesvx.f +++ b/SRC/cgesvx.f @@ -3,7 +3,8 @@ $ WORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgesvxx.f b/SRC/cgesvxx.f index 7daaea19..43c24e84 100644 --- a/SRC/cgesvxx.f +++ b/SRC/cgesvxx.f @@ -4,10 +4,10 @@ $ ERR_BNDS_COMP, NPARAMS, PARAMS, WORK, RWORK, $ INFO ) * -* -- LAPACK driver routine (version 3.2) -- +* -- LAPACK driver routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cgetc2.f b/SRC/cgetc2.f index 2bb66697..0782a686 100644 --- a/SRC/cgetc2.f +++ b/SRC/cgetc2.f @@ -1,7 +1,8 @@ SUBROUTINE CGETC2( N, A, LDA, IPIV, JPIV, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgetf2.f b/SRC/cgetf2.f index 6b36e77a..f038e961 100644 --- a/SRC/cgetf2.f +++ b/SRC/cgetf2.f @@ -1,7 +1,8 @@ SUBROUTINE CGETF2( M, N, A, LDA, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgetrf.f b/SRC/cgetrf.f index 0368fce6..076fac8f 100644 --- a/SRC/cgetrf.f +++ b/SRC/cgetrf.f @@ -1,7 +1,8 @@ SUBROUTINE CGETRF( M, N, A, LDA, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgetri.f b/SRC/cgetri.f index 21d79119..9c7288d8 100644 --- a/SRC/cgetri.f +++ b/SRC/cgetri.f @@ -1,7 +1,8 @@ SUBROUTINE CGETRI( N, A, LDA, IPIV, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgetrs.f b/SRC/cgetrs.f index fc98256c..2b85559e 100644 --- a/SRC/cgetrs.f +++ b/SRC/cgetrs.f @@ -1,7 +1,8 @@ SUBROUTINE CGETRS( TRANS, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cggbak.f b/SRC/cggbak.f index 0f15eeef..5cd9ed63 100644 --- a/SRC/cggbak.f +++ b/SRC/cggbak.f @@ -2,7 +2,8 @@ $ LDV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cggbal.f b/SRC/cggbal.f index c64cae30..6c1eb0a3 100644 --- a/SRC/cggbal.f +++ b/SRC/cggbal.f @@ -2,7 +2,8 @@ $ RSCALE, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgges.f b/SRC/cgges.f index b8b5ff2e..51befd81 100644 --- a/SRC/cgges.f +++ b/SRC/cgges.f @@ -3,7 +3,8 @@ $ LWORK, RWORK, BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cggesx.f b/SRC/cggesx.f index ba1f292a..647ec3be 100644 --- a/SRC/cggesx.f +++ b/SRC/cggesx.f @@ -4,7 +4,8 @@ $ IWORK, LIWORK, BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cggev.f b/SRC/cggev.f index d8408d9c..9d5437d3 100644 --- a/SRC/cggev.f +++ b/SRC/cggev.f @@ -2,7 +2,8 @@ $ VL, LDVL, VR, LDVR, WORK, LWORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cggevx.f b/SRC/cggevx.f index 4f9fcc80..26e43d8e 100644 --- a/SRC/cggevx.f +++ b/SRC/cggevx.f @@ -4,7 +4,8 @@ $ WORK, LWORK, RWORK, IWORK, BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cggglm.f b/SRC/cggglm.f index 22adb156..7bc72af5 100644 --- a/SRC/cggglm.f +++ b/SRC/cggglm.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgghrd.f b/SRC/cgghrd.f index 961350f0..e46068a3 100644 --- a/SRC/cgghrd.f +++ b/SRC/cgghrd.f @@ -2,7 +2,8 @@ $ LDQ, Z, LDZ, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgglse.f b/SRC/cgglse.f index 4c2eed7f..43984c96 100644 --- a/SRC/cgglse.f +++ b/SRC/cgglse.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cggqrf.f b/SRC/cggqrf.f index c5732ce7..d409bfbf 100644 --- a/SRC/cggqrf.f +++ b/SRC/cggqrf.f @@ -2,7 +2,8 @@ $ LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cggrqf.f b/SRC/cggrqf.f index 849e0e6d..5ed04080 100644 --- a/SRC/cggrqf.f +++ b/SRC/cggrqf.f @@ -2,7 +2,8 @@ $ LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cggsvd.f b/SRC/cggsvd.f index 6dd3a7e1..0396e584 100644 --- a/SRC/cggsvd.f +++ b/SRC/cggsvd.f @@ -3,7 +3,8 @@ $ RWORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cggsvp.f b/SRC/cggsvp.f index dd4feeef..e4aa67cf 100644 --- a/SRC/cggsvp.f +++ b/SRC/cggsvp.f @@ -3,7 +3,8 @@ $ IWORK, RWORK, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgtcon.f b/SRC/cgtcon.f index a6914a0f..a2791840 100644 --- a/SRC/cgtcon.f +++ b/SRC/cgtcon.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/cgtrfs.f b/SRC/cgtrfs.f index 5fee190f..a4bb7edf 100644 --- a/SRC/cgtrfs.f +++ b/SRC/cgtrfs.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/cgtsv.f b/SRC/cgtsv.f index 260ceaa4..4dc3c47b 100644 --- a/SRC/cgtsv.f +++ b/SRC/cgtsv.f @@ -1,7 +1,8 @@ SUBROUTINE CGTSV( N, NRHS, DL, D, DU, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgtsvx.f b/SRC/cgtsvx.f index cfb47c30..cce56794 100644 --- a/SRC/cgtsvx.f +++ b/SRC/cgtsvx.f @@ -3,7 +3,8 @@ $ WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgttrf.f b/SRC/cgttrf.f index fbe5313a..d84b973c 100644 --- a/SRC/cgttrf.f +++ b/SRC/cgttrf.f @@ -1,7 +1,8 @@ SUBROUTINE CGTTRF( N, DL, D, DU, DU2, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgttrs.f b/SRC/cgttrs.f index 1e311100..7d7e1075 100644 --- a/SRC/cgttrs.f +++ b/SRC/cgttrs.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cgtts2.f b/SRC/cgtts2.f index d190e45a..56c2ac9d 100644 --- a/SRC/cgtts2.f +++ b/SRC/cgtts2.f @@ -1,7 +1,8 @@ SUBROUTINE CGTTS2( ITRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chbev.f b/SRC/chbev.f index e2200052..696bcd8b 100644 --- a/SRC/chbev.f +++ b/SRC/chbev.f @@ -2,7 +2,8 @@ $ RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chbevd.f b/SRC/chbevd.f index cbac0dd9..a82b4bba 100644 --- a/SRC/chbevd.f +++ b/SRC/chbevd.f @@ -2,7 +2,8 @@ $ LWORK, RWORK, LRWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chbevx.f b/SRC/chbevx.f index 09e6581a..6a9f51f5 100644 --- a/SRC/chbevx.f +++ b/SRC/chbevx.f @@ -3,7 +3,8 @@ $ IWORK, IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chbgst.f b/SRC/chbgst.f index ceab0c1d..491600b6 100644 --- a/SRC/chbgst.f +++ b/SRC/chbgst.f @@ -2,7 +2,8 @@ $ LDX, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chbgv.f b/SRC/chbgv.f index 86c940e2..36e96f7f 100644 --- a/SRC/chbgv.f +++ b/SRC/chbgv.f @@ -2,7 +2,8 @@ $ LDZ, WORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chbgvd.f b/SRC/chbgvd.f index aeb0c350..4a6230c7 100644 --- a/SRC/chbgvd.f +++ b/SRC/chbgvd.f @@ -3,7 +3,8 @@ $ LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chbgvx.f b/SRC/chbgvx.f index d66fe6f8..011eea99 100644 --- a/SRC/chbgvx.f +++ b/SRC/chbgvx.f @@ -3,7 +3,8 @@ $ LDZ, WORK, RWORK, IWORK, IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chbtrd.f b/SRC/chbtrd.f index 456b154d..3796e1e6 100644 --- a/SRC/chbtrd.f +++ b/SRC/chbtrd.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/checon.f b/SRC/checon.f index bb95d663..226c17ac 100644 --- a/SRC/checon.f +++ b/SRC/checon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/cheev.f b/SRC/cheev.f index c931eefb..a2a1e482 100644 --- a/SRC/cheev.f +++ b/SRC/cheev.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cheevd.f b/SRC/cheevd.f index 6e3013a9..16e4fb97 100644 --- a/SRC/cheevd.f +++ b/SRC/cheevd.f @@ -2,7 +2,8 @@ $ LRWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cheevr.f b/SRC/cheevr.f index 3c40390b..4ccbcfb3 100644 --- a/SRC/cheevr.f +++ b/SRC/cheevr.f @@ -3,7 +3,8 @@ $ RWORK, LRWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cheevx.f b/SRC/cheevx.f index bb4e6782..85f7c10b 100644 --- a/SRC/cheevx.f +++ b/SRC/cheevx.f @@ -3,7 +3,8 @@ $ IWORK, IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chegs2.f b/SRC/chegs2.f index 27889836..f88631f0 100644 --- a/SRC/chegs2.f +++ b/SRC/chegs2.f @@ -1,7 +1,8 @@ SUBROUTINE CHEGS2( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chegst.f b/SRC/chegst.f index 9632edba..10a2c264 100644 --- a/SRC/chegst.f +++ b/SRC/chegst.f @@ -1,7 +1,8 @@ SUBROUTINE CHEGST( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chegv.f b/SRC/chegv.f index a182dc5a..d8e45a75 100644 --- a/SRC/chegv.f +++ b/SRC/chegv.f @@ -2,7 +2,8 @@ $ LWORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chegvd.f b/SRC/chegvd.f index c1109b03..61ee89a4 100644 --- a/SRC/chegvd.f +++ b/SRC/chegvd.f @@ -2,7 +2,8 @@ $ LWORK, RWORK, LRWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chegvx.f b/SRC/chegvx.f index 8e7aff01..eb6b8756 100644 --- a/SRC/chegvx.f +++ b/SRC/chegvx.f @@ -3,7 +3,8 @@ $ LWORK, RWORK, IWORK, IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cherfs.f b/SRC/cherfs.f index abea730e..413fd7f3 100644 --- a/SRC/cherfs.f +++ b/SRC/cherfs.f @@ -2,7 +2,8 @@ $ X, LDX, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/cherfsx.f b/SRC/cherfsx.f index 757624cb..1b81dd18 100644 --- a/SRC/cherfsx.f +++ b/SRC/cherfsx.f @@ -3,10 +3,10 @@ $ ERR_BNDS_NORM, ERR_BNDS_COMP, NPARAMS, PARAMS, $ WORK, RWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/chesv.f b/SRC/chesv.f index 4cc97e3a..c2c19752 100644 --- a/SRC/chesv.f +++ b/SRC/chesv.f @@ -2,7 +2,8 @@ $ LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chesvx.f b/SRC/chesvx.f index 1ef2253d..ea0c5e2f 100644 --- a/SRC/chesvx.f +++ b/SRC/chesvx.f @@ -3,7 +3,8 @@ $ RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chesvxx.f b/SRC/chesvxx.f index b7de7781..9d412f2b 100644 --- a/SRC/chesvxx.f +++ b/SRC/chesvxx.f @@ -3,10 +3,10 @@ $ N_ERR_BNDS, ERR_BNDS_NORM, ERR_BNDS_COMP, $ NPARAMS, PARAMS, WORK, RWORK, INFO ) * -* -- LAPACK driver routine (version 3.2) -- +* -- LAPACK driver routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/chetd2.f b/SRC/chetd2.f index baba8b44..89eb1e90 100644 --- a/SRC/chetd2.f +++ b/SRC/chetd2.f @@ -1,7 +1,8 @@ SUBROUTINE CHETD2( UPLO, N, A, LDA, D, E, TAU, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chetf2.f b/SRC/chetf2.f index e929e883..99c11509 100644 --- a/SRC/chetf2.f +++ b/SRC/chetf2.f @@ -1,7 +1,8 @@ SUBROUTINE CHETF2( UPLO, N, A, LDA, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chetrd.f b/SRC/chetrd.f index e7116e5f..367aca1a 100644 --- a/SRC/chetrd.f +++ b/SRC/chetrd.f @@ -1,7 +1,8 @@ SUBROUTINE CHETRD( UPLO, N, A, LDA, D, E, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chetrf.f b/SRC/chetrf.f index b4392e7d..c9b94ad2 100644 --- a/SRC/chetrf.f +++ b/SRC/chetrf.f @@ -1,7 +1,8 @@ SUBROUTINE CHETRF( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chetri.f b/SRC/chetri.f index 27c8731d..6160f600 100644 --- a/SRC/chetri.f +++ b/SRC/chetri.f @@ -1,7 +1,8 @@ SUBROUTINE CHETRI( UPLO, N, A, LDA, IPIV, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chetrs.f b/SRC/chetrs.f index 693d3222..9decc888 100644 --- a/SRC/chetrs.f +++ b/SRC/chetrs.f @@ -1,7 +1,8 @@ SUBROUTINE CHETRS( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chgeqz.f b/SRC/chgeqz.f index b05dd8c2..ddf4ee66 100644 --- a/SRC/chgeqz.f +++ b/SRC/chgeqz.f @@ -3,7 +3,8 @@ $ RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chla_transtype.f b/SRC/chla_transtype.f index 687cc25c..d1f44eed 100644 --- a/SRC/chla_transtype.f +++ b/SRC/chla_transtype.f @@ -1,7 +1,8 @@ CHARACTER*1 FUNCTION CHLA_TRANSTYPE( TRANS ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * October 2008 * .. Scalar Arguments .. INTEGER TRANS diff --git a/SRC/chpcon.f b/SRC/chpcon.f index dab1f42b..c83a0ed9 100644 --- a/SRC/chpcon.f +++ b/SRC/chpcon.f @@ -1,7 +1,8 @@ SUBROUTINE CHPCON( UPLO, N, AP, IPIV, ANORM, RCOND, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/chpev.f b/SRC/chpev.f index b73a7dc3..ca140573 100644 --- a/SRC/chpev.f +++ b/SRC/chpev.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chpevd.f b/SRC/chpevd.f index 0f3447f2..782a3bb0 100644 --- a/SRC/chpevd.f +++ b/SRC/chpevd.f @@ -2,7 +2,8 @@ $ RWORK, LRWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chpevx.f b/SRC/chpevx.f index 1fa8e8eb..1fbf9ab6 100644 --- a/SRC/chpevx.f +++ b/SRC/chpevx.f @@ -3,7 +3,8 @@ $ IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chpgst.f b/SRC/chpgst.f index 52940d30..acc6acf2 100644 --- a/SRC/chpgst.f +++ b/SRC/chpgst.f @@ -1,7 +1,8 @@ SUBROUTINE CHPGST( ITYPE, UPLO, N, AP, BP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chpgv.f b/SRC/chpgv.f index bbc593c4..8973bbf5 100644 --- a/SRC/chpgv.f +++ b/SRC/chpgv.f @@ -2,7 +2,8 @@ $ RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chpgvd.f b/SRC/chpgvd.f index 64ee833e..f7eb424c 100644 --- a/SRC/chpgvd.f +++ b/SRC/chpgvd.f @@ -2,7 +2,8 @@ $ LWORK, RWORK, LRWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chpgvx.f b/SRC/chpgvx.f index 9e7e64fb..1f01775e 100644 --- a/SRC/chpgvx.f +++ b/SRC/chpgvx.f @@ -3,7 +3,8 @@ $ IWORK, IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chprfs.f b/SRC/chprfs.f index 7f5b4b3d..5bcff58f 100644 --- a/SRC/chprfs.f +++ b/SRC/chprfs.f @@ -2,7 +2,8 @@ $ FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/chpsv.f b/SRC/chpsv.f index 5c429a76..fcb5d1ca 100644 --- a/SRC/chpsv.f +++ b/SRC/chpsv.f @@ -1,7 +1,8 @@ SUBROUTINE CHPSV( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chpsvx.f b/SRC/chpsvx.f index 06ccfc8c..390b2c83 100644 --- a/SRC/chpsvx.f +++ b/SRC/chpsvx.f @@ -2,7 +2,8 @@ $ LDX, RCOND, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chptrd.f b/SRC/chptrd.f index 704d9237..eeb80e0a 100644 --- a/SRC/chptrd.f +++ b/SRC/chptrd.f @@ -1,7 +1,8 @@ SUBROUTINE CHPTRD( UPLO, N, AP, D, E, TAU, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chptrf.f b/SRC/chptrf.f index cb980e47..13846f9c 100644 --- a/SRC/chptrf.f +++ b/SRC/chptrf.f @@ -1,7 +1,8 @@ SUBROUTINE CHPTRF( UPLO, N, AP, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chptri.f b/SRC/chptri.f index 71a61aaf..d02dca89 100644 --- a/SRC/chptri.f +++ b/SRC/chptri.f @@ -1,7 +1,8 @@ SUBROUTINE CHPTRI( UPLO, N, AP, IPIV, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chptrs.f b/SRC/chptrs.f index 58a13045..0cfa967c 100644 --- a/SRC/chptrs.f +++ b/SRC/chptrs.f @@ -1,7 +1,8 @@ SUBROUTINE CHPTRS( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/chsein.f b/SRC/chsein.f index c9533127..57ff16df 100644 --- a/SRC/chsein.f +++ b/SRC/chsein.f @@ -3,7 +3,8 @@ $ IFAILR, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cla_gbamv.f b/SRC/cla_gbamv.f index f40f583c..db54ccab 100644 --- a/SRC/cla_gbamv.f +++ b/SRC/cla_gbamv.f @@ -4,7 +4,7 @@ * -- LAPACK routine (version 3.2) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_gbrcond_c.f b/SRC/cla_gbrcond_c.f index 2851b147..209111bf 100644 --- a/SRC/cla_gbrcond_c.f +++ b/SRC/cla_gbrcond_c.f @@ -5,7 +5,7 @@ * -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_gbrcond_x.f b/SRC/cla_gbrcond_x.f index 74be8320..bea99e6d 100644 --- a/SRC/cla_gbrcond_x.f +++ b/SRC/cla_gbrcond_x.f @@ -4,7 +4,7 @@ * -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_gbrfsx_extended.f b/SRC/cla_gbrfsx_extended.f index 552bf47e..49101d23 100644 --- a/SRC/cla_gbrfsx_extended.f +++ b/SRC/cla_gbrfsx_extended.f @@ -6,10 +6,10 @@ $ Y_TAIL, RCOND, ITHRESH, RTHRESH, $ DZ_UB, IGNORE_CWISE, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_gbrpvgrw.f b/SRC/cla_gbrpvgrw.f index 5eef387a..20a3f15a 100644 --- a/SRC/cla_gbrpvgrw.f +++ b/SRC/cla_gbrpvgrw.f @@ -1,10 +1,10 @@ REAL FUNCTION CLA_GBRPVGRW( N, KL, KU, NCOLS, AB, LDAB, AFB, $ LDAFB ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_geamv.f b/SRC/cla_geamv.f index 7ff39a63..caee2470 100644 --- a/SRC/cla_geamv.f +++ b/SRC/cla_geamv.f @@ -1,10 +1,10 @@ SUBROUTINE CLA_GEAMV ( TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, $ Y, INCY ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_gercond_c.f b/SRC/cla_gercond_c.f index c61cd8d1..92403302 100644 --- a/SRC/cla_gercond_c.f +++ b/SRC/cla_gercond_c.f @@ -1,10 +1,10 @@ REAL FUNCTION CLA_GERCOND_C( TRANS, N, A, LDA, AF, LDAF, IPIV, C, $ CAPPLY, INFO, WORK, RWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_gercond_x.f b/SRC/cla_gercond_x.f index 5848ad7f..405f5e15 100644 --- a/SRC/cla_gercond_x.f +++ b/SRC/cla_gercond_x.f @@ -1,10 +1,10 @@ REAL FUNCTION CLA_GERCOND_X( TRANS, N, A, LDA, AF, LDAF, IPIV, X, $ INFO, WORK, RWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_gerfsx_extended.f b/SRC/cla_gerfsx_extended.f index 6c7f4ed9..dba3c059 100644 --- a/SRC/cla_gerfsx_extended.f +++ b/SRC/cla_gerfsx_extended.f @@ -5,10 +5,10 @@ $ Y_TAIL, RCOND, ITHRESH, RTHRESH, $ DZ_UB, IGNORE_CWISE, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_heamv.f b/SRC/cla_heamv.f index a57dde82..d806ea29 100644 --- a/SRC/cla_heamv.f +++ b/SRC/cla_heamv.f @@ -1,10 +1,10 @@ SUBROUTINE CLA_HEAMV( UPLO, N, ALPHA, A, LDA, X, INCX, BETA, Y, $ INCY ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_hercond_c.f b/SRC/cla_hercond_c.f index 1f56fd6a..5e9d850c 100644 --- a/SRC/cla_hercond_c.f +++ b/SRC/cla_hercond_c.f @@ -1,10 +1,10 @@ REAL FUNCTION CLA_HERCOND_C( UPLO, N, A, LDA, AF, LDAF, IPIV, C, $ CAPPLY, INFO, WORK, RWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_hercond_x.f b/SRC/cla_hercond_x.f index 63add72e..d5df6542 100644 --- a/SRC/cla_hercond_x.f +++ b/SRC/cla_hercond_x.f @@ -1,10 +1,10 @@ REAL FUNCTION CLA_HERCOND_X( UPLO, N, A, LDA, AF, LDAF, IPIV, X, $ INFO, WORK, RWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_herfsx_extended.f b/SRC/cla_herfsx_extended.f index eaeddfd9..03093223 100644 --- a/SRC/cla_herfsx_extended.f +++ b/SRC/cla_herfsx_extended.f @@ -6,10 +6,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_herpvgrw.f b/SRC/cla_herpvgrw.f index 7b97af0e..6ef497dd 100644 --- a/SRC/cla_herpvgrw.f +++ b/SRC/cla_herpvgrw.f @@ -1,10 +1,10 @@ REAL FUNCTION CLA_HERPVGRW( UPLO, N, INFO, A, LDA, AF, LDAF, IPIV, $ WORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_lin_berr.f b/SRC/cla_lin_berr.f index 73d849d3..97118d1a 100644 --- a/SRC/cla_lin_berr.f +++ b/SRC/cla_lin_berr.f @@ -1,9 +1,9 @@ SUBROUTINE CLA_LIN_BERR ( N, NZ, NRHS, RES, AYB, BERR ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_porcond_c.f b/SRC/cla_porcond_c.f index 5f4ec437..492eaa9e 100644 --- a/SRC/cla_porcond_c.f +++ b/SRC/cla_porcond_c.f @@ -1,10 +1,10 @@ REAL FUNCTION CLA_PORCOND_C( UPLO, N, A, LDA, AF, LDAF, C, CAPPLY, $ INFO, WORK, RWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_porcond_x.f b/SRC/cla_porcond_x.f index ef98df01..9e7d945e 100644 --- a/SRC/cla_porcond_x.f +++ b/SRC/cla_porcond_x.f @@ -1,10 +1,10 @@ REAL FUNCTION CLA_PORCOND_X( UPLO, N, A, LDA, AF, LDAF, X, INFO, $ WORK, RWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_porfsx_extended.f b/SRC/cla_porfsx_extended.f index 4963b6a1..c3f7bed0 100644 --- a/SRC/cla_porfsx_extended.f +++ b/SRC/cla_porfsx_extended.f @@ -6,10 +6,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_porpvgrw.f b/SRC/cla_porpvgrw.f index f94aac27..ded8ad6a 100644 --- a/SRC/cla_porpvgrw.f +++ b/SRC/cla_porpvgrw.f @@ -1,9 +1,9 @@ REAL FUNCTION CLA_PORPVGRW( UPLO, NCOLS, A, LDA, AF, LDAF, WORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_rpvgrw.f b/SRC/cla_rpvgrw.f index 699e0410..20d27ea3 100644 --- a/SRC/cla_rpvgrw.f +++ b/SRC/cla_rpvgrw.f @@ -1,9 +1,9 @@ REAL FUNCTION CLA_RPVGRW( N, NCOLS, A, LDA, AF, LDAF ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_syamv.f b/SRC/cla_syamv.f index f366060a..3ea05931 100644 --- a/SRC/cla_syamv.f +++ b/SRC/cla_syamv.f @@ -1,10 +1,10 @@ SUBROUTINE CLA_SYAMV( UPLO, N, ALPHA, A, LDA, X, INCX, BETA, Y, $ INCY ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_syrcond_c.f b/SRC/cla_syrcond_c.f index 4df92b13..8e1864d7 100644 --- a/SRC/cla_syrcond_c.f +++ b/SRC/cla_syrcond_c.f @@ -1,10 +1,10 @@ REAL FUNCTION CLA_SYRCOND_C( UPLO, N, A, LDA, AF, LDAF, IPIV, C, $ CAPPLY, INFO, WORK, RWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_syrcond_x.f b/SRC/cla_syrcond_x.f index b686755f..b07a3077 100644 --- a/SRC/cla_syrcond_x.f +++ b/SRC/cla_syrcond_x.f @@ -1,10 +1,10 @@ REAL FUNCTION CLA_SYRCOND_X( UPLO, N, A, LDA, AF, LDAF, IPIV, X, $ INFO, WORK, RWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_syrfsx_extended.f b/SRC/cla_syrfsx_extended.f index 1abd33c5..0fa981c0 100644 --- a/SRC/cla_syrfsx_extended.f +++ b/SRC/cla_syrfsx_extended.f @@ -6,10 +6,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_syrpvgrw.f b/SRC/cla_syrpvgrw.f index 94f9be2b..d50676f9 100644 --- a/SRC/cla_syrpvgrw.f +++ b/SRC/cla_syrpvgrw.f @@ -1,10 +1,10 @@ REAL FUNCTION CLA_SYRPVGRW( UPLO, N, INFO, A, LDA, AF, LDAF, IPIV, $ WORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cla_wwaddw.f b/SRC/cla_wwaddw.f index ebbe3f0b..f5abec76 100644 --- a/SRC/cla_wwaddw.f +++ b/SRC/cla_wwaddw.f @@ -1,9 +1,9 @@ SUBROUTINE CLA_WWADDW( N, X, Y, W ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/clabrd.f b/SRC/clabrd.f index 2053b86f..c96fe003 100644 --- a/SRC/clabrd.f +++ b/SRC/clabrd.f @@ -2,7 +2,8 @@ $ LDY ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clacgv.f b/SRC/clacgv.f index 6a634d27..f995e6c1 100644 --- a/SRC/clacgv.f +++ b/SRC/clacgv.f @@ -1,7 +1,8 @@ SUBROUTINE CLACGV( N, X, INCX ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clacn2.f b/SRC/clacn2.f index 8fb1fd00..f01dda06 100644 --- a/SRC/clacn2.f +++ b/SRC/clacn2.f @@ -1,7 +1,8 @@ SUBROUTINE CLACN2( N, V, X, EST, KASE, ISAVE ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clacon.f b/SRC/clacon.f index 8e648864..0c4ee14e 100644 --- a/SRC/clacon.f +++ b/SRC/clacon.f @@ -1,7 +1,8 @@ SUBROUTINE CLACON( N, V, X, EST, KASE ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clacp2.f b/SRC/clacp2.f index ea6c01a6..189bcc3d 100644 --- a/SRC/clacp2.f +++ b/SRC/clacp2.f @@ -1,7 +1,8 @@ SUBROUTINE CLACP2( UPLO, M, N, A, LDA, B, LDB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clacpy.f b/SRC/clacpy.f index 7a24cbd2..0155a620 100644 --- a/SRC/clacpy.f +++ b/SRC/clacpy.f @@ -1,7 +1,8 @@ SUBROUTINE CLACPY( UPLO, M, N, A, LDA, B, LDB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clacrm.f b/SRC/clacrm.f index c917194b..266ef8fd 100644 --- a/SRC/clacrm.f +++ b/SRC/clacrm.f @@ -1,7 +1,8 @@ SUBROUTINE CLACRM( M, N, A, LDA, B, LDB, C, LDC, RWORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clacrt.f b/SRC/clacrt.f index f41477e8..1c02f15c 100644 --- a/SRC/clacrt.f +++ b/SRC/clacrt.f @@ -1,7 +1,8 @@ SUBROUTINE CLACRT( N, CX, INCX, CY, INCY, C, S ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cladiv.f b/SRC/cladiv.f index 202abe9f..00e79c76 100644 --- a/SRC/cladiv.f +++ b/SRC/cladiv.f @@ -1,7 +1,8 @@ COMPLEX FUNCTION CLADIV( X, Y ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claed0.f b/SRC/claed0.f index 2b0ace6a..9e4cb2db 100644 --- a/SRC/claed0.f +++ b/SRC/claed0.f @@ -2,7 +2,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claed7.f b/SRC/claed7.f index 3583f8ce..2f773a47 100644 --- a/SRC/claed7.f +++ b/SRC/claed7.f @@ -4,7 +4,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claed8.f b/SRC/claed8.f index 50a46eec..07cf124c 100644 --- a/SRC/claed8.f +++ b/SRC/claed8.f @@ -3,7 +3,8 @@ $ GIVCOL, GIVNUM, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claein.f b/SRC/claein.f index 17ed3c33..b036e9e6 100644 --- a/SRC/claein.f +++ b/SRC/claein.f @@ -2,7 +2,8 @@ $ EPS3, SMLNUM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claesy.f b/SRC/claesy.f index 52fc1615..c98058bb 100644 --- a/SRC/claesy.f +++ b/SRC/claesy.f @@ -1,7 +1,8 @@ SUBROUTINE CLAESY( A, B, C, RT1, RT2, EVSCAL, CS1, SN1 ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claev2.f b/SRC/claev2.f index 3a59cbd9..1c2163ca 100644 --- a/SRC/claev2.f +++ b/SRC/claev2.f @@ -1,7 +1,8 @@ SUBROUTINE CLAEV2( A, B, C, RT1, RT2, CS1, SN1 ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clag2z.f b/SRC/clag2z.f index b2fbef38..df695c36 100644 --- a/SRC/clag2z.f +++ b/SRC/clag2z.f @@ -1,7 +1,8 @@ SUBROUTINE CLAG2Z( M, N, SA, LDSA, A, LDA, INFO ) * * -- LAPACK PROTOTYPE auxiliary routine (version 3.1.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * August 2007 * * .. diff --git a/SRC/clags2.f b/SRC/clags2.f index a63a4f03..508d3ea7 100644 --- a/SRC/clags2.f +++ b/SRC/clags2.f @@ -2,7 +2,8 @@ $ SNV, CSQ, SNQ ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clagtm.f b/SRC/clagtm.f index f07a6208..990f406a 100644 --- a/SRC/clagtm.f +++ b/SRC/clagtm.f @@ -2,7 +2,8 @@ $ B, LDB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clahef.f b/SRC/clahef.f index ce7dfb09..5527f202 100644 --- a/SRC/clahef.f +++ b/SRC/clahef.f @@ -1,7 +1,8 @@ SUBROUTINE CLAHEF( UPLO, N, NB, KB, A, LDA, IPIV, W, LDW, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clahr2.f b/SRC/clahr2.f index 6caaf832..ddf73b8b 100644 --- a/SRC/clahr2.f +++ b/SRC/clahr2.f @@ -1,8 +1,8 @@ SUBROUTINE CLAHR2( N, K, NB, A, LDA, TAU, T, LDT, Y, LDY ) * -* -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK auxiliary routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, --* -- April 2009 -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * * .. Scalar Arguments .. INTEGER K, LDA, LDT, LDY, N, NB diff --git a/SRC/clahrd.f b/SRC/clahrd.f index 48a2b01b..f7b97b62 100644 --- a/SRC/clahrd.f +++ b/SRC/clahrd.f @@ -1,7 +1,8 @@ SUBROUTINE CLAHRD( N, K, NB, A, LDA, TAU, T, LDT, Y, LDY ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claic1.f b/SRC/claic1.f index f2e4f6f6..37877d6c 100644 --- a/SRC/claic1.f +++ b/SRC/claic1.f @@ -1,7 +1,8 @@ SUBROUTINE CLAIC1( JOB, J, X, SEST, W, GAMMA, SESTPR, S, C ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clals0.f b/SRC/clals0.f index 4a3f728c..d9eaa87b 100644 --- a/SRC/clals0.f +++ b/SRC/clals0.f @@ -3,7 +3,8 @@ $ POLES, DIFL, DIFR, Z, K, C, S, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clalsa.f b/SRC/clalsa.f index 56182ce2..199e1330 100644 --- a/SRC/clalsa.f +++ b/SRC/clalsa.f @@ -4,7 +4,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clalsd.f b/SRC/clalsd.f index 6ef18299..c67bf5e7 100644 --- a/SRC/clalsd.f +++ b/SRC/clalsd.f @@ -2,7 +2,8 @@ $ RANK, WORK, RWORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clangb.f b/SRC/clangb.f index 0e43f01b..d298fc6f 100644 --- a/SRC/clangb.f +++ b/SRC/clangb.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clange.f b/SRC/clange.f index 49bd8337..66779867 100644 --- a/SRC/clange.f +++ b/SRC/clange.f @@ -1,7 +1,8 @@ REAL FUNCTION CLANGE( NORM, M, N, A, LDA, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clangt.f b/SRC/clangt.f index 8a773d8a..3ce47a32 100644 --- a/SRC/clangt.f +++ b/SRC/clangt.f @@ -1,7 +1,8 @@ REAL FUNCTION CLANGT( NORM, N, DL, D, DU ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clanhb.f b/SRC/clanhb.f index d0c75c68..391a5a4d 100644 --- a/SRC/clanhb.f +++ b/SRC/clanhb.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clanhe.f b/SRC/clanhe.f index 3afaa67d..221a9cd0 100644 --- a/SRC/clanhe.f +++ b/SRC/clanhe.f @@ -1,7 +1,8 @@ REAL FUNCTION CLANHE( NORM, UPLO, N, A, LDA, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clanhf.f b/SRC/clanhf.f index 46957811..63818d9a 100644 --- a/SRC/clanhf.f +++ b/SRC/clanhf.f @@ -1,9 +1,9 @@ REAL FUNCTION CLANHF( NORM, TRANSR, UPLO, N, A, WORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/clanhp.f b/SRC/clanhp.f index 1d591034..1d10856d 100644 --- a/SRC/clanhp.f +++ b/SRC/clanhp.f @@ -1,7 +1,8 @@ REAL FUNCTION CLANHP( NORM, UPLO, N, AP, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clanhs.f b/SRC/clanhs.f index 133f8d4f..da8f1477 100644 --- a/SRC/clanhs.f +++ b/SRC/clanhs.f @@ -1,7 +1,8 @@ REAL FUNCTION CLANHS( NORM, N, A, LDA, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clanht.f b/SRC/clanht.f index 444a0681..788a5ba9 100644 --- a/SRC/clanht.f +++ b/SRC/clanht.f @@ -1,7 +1,8 @@ REAL FUNCTION CLANHT( NORM, N, D, E ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clansb.f b/SRC/clansb.f index 2855d5cf..1ba4900d 100644 --- a/SRC/clansb.f +++ b/SRC/clansb.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clansp.f b/SRC/clansp.f index 816eb7e3..351800c6 100644 --- a/SRC/clansp.f +++ b/SRC/clansp.f @@ -1,7 +1,8 @@ REAL FUNCTION CLANSP( NORM, UPLO, N, AP, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clansy.f b/SRC/clansy.f index a11f9412..66082022 100644 --- a/SRC/clansy.f +++ b/SRC/clansy.f @@ -1,7 +1,8 @@ REAL FUNCTION CLANSY( NORM, UPLO, N, A, LDA, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clantb.f b/SRC/clantb.f index 2ad6cba9..6771e60e 100644 --- a/SRC/clantb.f +++ b/SRC/clantb.f @@ -2,7 +2,8 @@ $ LDAB, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clantp.f b/SRC/clantp.f index e41fa1aa..2926942e 100644 --- a/SRC/clantp.f +++ b/SRC/clantp.f @@ -1,7 +1,8 @@ REAL FUNCTION CLANTP( NORM, UPLO, DIAG, N, AP, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clantr.f b/SRC/clantr.f index d3ed29af..6c225c13 100644 --- a/SRC/clantr.f +++ b/SRC/clantr.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clapll.f b/SRC/clapll.f index 90068921..2095a27b 100644 --- a/SRC/clapll.f +++ b/SRC/clapll.f @@ -1,7 +1,8 @@ SUBROUTINE CLAPLL( N, X, INCX, Y, INCY, SSMIN ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clapmt.f b/SRC/clapmt.f index 0749be0e..ff3acd4c 100644 --- a/SRC/clapmt.f +++ b/SRC/clapmt.f @@ -1,7 +1,8 @@ SUBROUTINE CLAPMT( FORWRD, M, N, X, LDX, K ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claqgb.f b/SRC/claqgb.f index 50558447..23b915b4 100644 --- a/SRC/claqgb.f +++ b/SRC/claqgb.f @@ -2,7 +2,8 @@ $ AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claqge.f b/SRC/claqge.f index 587ffc0f..7309d6e6 100644 --- a/SRC/claqge.f +++ b/SRC/claqge.f @@ -2,7 +2,8 @@ $ EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claqhb.f b/SRC/claqhb.f index ec9c35ed..199a9028 100644 --- a/SRC/claqhb.f +++ b/SRC/claqhb.f @@ -1,7 +1,8 @@ SUBROUTINE CLAQHB( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claqhe.f b/SRC/claqhe.f index e489793f..089ed9f0 100644 --- a/SRC/claqhe.f +++ b/SRC/claqhe.f @@ -1,7 +1,8 @@ SUBROUTINE CLAQHE( UPLO, N, A, LDA, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claqhp.f b/SRC/claqhp.f index f5a878f0..045d8be8 100644 --- a/SRC/claqhp.f +++ b/SRC/claqhp.f @@ -1,7 +1,8 @@ SUBROUTINE CLAQHP( UPLO, N, AP, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claqp2.f b/SRC/claqp2.f index bc2c6e0f..b65f6157 100644 --- a/SRC/claqp2.f +++ b/SRC/claqp2.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claqps.f b/SRC/claqps.f index 4c67492f..cefdf044 100644 --- a/SRC/claqps.f +++ b/SRC/claqps.f @@ -2,7 +2,8 @@ $ VN2, AUXV, F, LDF ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claqr2.f b/SRC/claqr2.f index 4b980bb1..a0e58056 100644 --- a/SRC/claqr2.f +++ b/SRC/claqr2.f @@ -2,9 +2,9 @@ $ IHIZ, Z, LDZ, NS, ND, SH, V, LDV, NH, T, LDT, $ NV, WV, LDWV, WORK, LWORK ) * -* -- LAPACK auxiliary routine (version 3.2) -- +* -- LAPACK auxiliary routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd.. -* November 2006 +* -- April 2009 -- * * .. Scalar Arguments .. INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV, diff --git a/SRC/claqr3.f b/SRC/claqr3.f index f69ae2f2..52ab9398 100644 --- a/SRC/claqr3.f +++ b/SRC/claqr3.f @@ -2,9 +2,9 @@ $ IHIZ, Z, LDZ, NS, ND, SH, V, LDV, NH, T, LDT, $ NV, WV, LDWV, WORK, LWORK ) * -* -- LAPACK auxiliary routine (version 3.2) -- +* -- LAPACK auxiliary routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd.. -* November 2006 +* -- April 2009 -- * * .. Scalar Arguments .. INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV, diff --git a/SRC/claqsb.f b/SRC/claqsb.f index c4c5ef17..bcd97d62 100644 --- a/SRC/claqsb.f +++ b/SRC/claqsb.f @@ -1,7 +1,8 @@ SUBROUTINE CLAQSB( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claqsp.f b/SRC/claqsp.f index b02cf4b4..da3e8a06 100644 --- a/SRC/claqsp.f +++ b/SRC/claqsp.f @@ -1,7 +1,8 @@ SUBROUTINE CLAQSP( UPLO, N, AP, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claqsy.f b/SRC/claqsy.f index 85ce4656..33fc9e7c 100644 --- a/SRC/claqsy.f +++ b/SRC/claqsy.f @@ -1,7 +1,8 @@ SUBROUTINE CLAQSY( UPLO, N, A, LDA, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clar1v.f b/SRC/clar1v.f index 55f5f4a0..f27e46f3 100644 --- a/SRC/clar1v.f +++ b/SRC/clar1v.f @@ -3,7 +3,8 @@ $ R, ISUPPZ, NRMINV, RESID, RQCORR, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clar2v.f b/SRC/clar2v.f index 207728f4..3b36a206 100644 --- a/SRC/clar2v.f +++ b/SRC/clar2v.f @@ -1,7 +1,8 @@ SUBROUTINE CLAR2V( N, X, Y, Z, INCX, C, S, INCC ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clarcm.f b/SRC/clarcm.f index 151a4771..6a01a1b9 100644 --- a/SRC/clarcm.f +++ b/SRC/clarcm.f @@ -1,7 +1,8 @@ SUBROUTINE CLARCM( M, N, A, LDA, B, LDB, C, LDC, RWORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clarf.f b/SRC/clarf.f index c17ac1d0..e4ee75ca 100644 --- a/SRC/clarf.f +++ b/SRC/clarf.f @@ -2,7 +2,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clarfb.f b/SRC/clarfb.f index be1bc3cf..06065494 100644 --- a/SRC/clarfb.f +++ b/SRC/clarfb.f @@ -3,7 +3,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clarfg.f b/SRC/clarfg.f index 695dd61f..786419c0 100644 --- a/SRC/clarfg.f +++ b/SRC/clarfg.f @@ -1,7 +1,8 @@ SUBROUTINE CLARFG( N, ALPHA, X, INCX, TAU ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clarfp.f b/SRC/clarfp.f index 938ae78d..a65e377c 100644 --- a/SRC/clarfp.f +++ b/SRC/clarfp.f @@ -1,7 +1,8 @@ SUBROUTINE CLARFP( N, ALPHA, X, INCX, TAU ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clarft.f b/SRC/clarft.f index 8c257385..3b8b9976 100644 --- a/SRC/clarft.f +++ b/SRC/clarft.f @@ -1,7 +1,8 @@ SUBROUTINE CLARFT( DIRECT, STOREV, N, K, V, LDV, TAU, T, LDT ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clarfx.f b/SRC/clarfx.f index 686b1a19..5b76e6e3 100644 --- a/SRC/clarfx.f +++ b/SRC/clarfx.f @@ -2,7 +2,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clargv.f b/SRC/clargv.f index ac23a5ca..c4bad275 100644 --- a/SRC/clargv.f +++ b/SRC/clargv.f @@ -1,7 +1,8 @@ SUBROUTINE CLARGV( N, X, INCX, Y, INCY, C, INCC ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clarnv.f b/SRC/clarnv.f index 9c33c582..eb89ca05 100644 --- a/SRC/clarnv.f +++ b/SRC/clarnv.f @@ -1,7 +1,8 @@ SUBROUTINE CLARNV( IDIST, ISEED, N, X ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clarrv.f b/SRC/clarrv.f index 8a3bb377..0832ab7b 100644 --- a/SRC/clarrv.f +++ b/SRC/clarrv.f @@ -5,7 +5,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clarscl2.f b/SRC/clarscl2.f index 42294f7e..4fc079a4 100644 --- a/SRC/clarscl2.f +++ b/SRC/clarscl2.f @@ -1,9 +1,9 @@ SUBROUTINE CLARSCL2 ( M, N, D, X, LDX ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/clartg.f b/SRC/clartg.f index 2a21ddb0..1bcab75e 100644 --- a/SRC/clartg.f +++ b/SRC/clartg.f @@ -1,7 +1,8 @@ SUBROUTINE CLARTG( F, G, CS, SN, R ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clartv.f b/SRC/clartv.f index a6925a15..4ff17258 100644 --- a/SRC/clartv.f +++ b/SRC/clartv.f @@ -1,7 +1,8 @@ SUBROUTINE CLARTV( N, X, INCX, Y, INCY, C, S, INCC ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clarz.f b/SRC/clarz.f index e6679292..ead41fe0 100644 --- a/SRC/clarz.f +++ b/SRC/clarz.f @@ -1,7 +1,8 @@ SUBROUTINE CLARZ( SIDE, M, N, L, V, INCV, TAU, C, LDC, WORK ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clarzb.f b/SRC/clarzb.f index da6ac15b..82a46c7d 100644 --- a/SRC/clarzb.f +++ b/SRC/clarzb.f @@ -2,7 +2,8 @@ $ LDV, T, LDT, C, LDC, WORK, LDWORK ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clarzt.f b/SRC/clarzt.f index 000542c3..8d807ab3 100644 --- a/SRC/clarzt.f +++ b/SRC/clarzt.f @@ -1,7 +1,8 @@ SUBROUTINE CLARZT( DIRECT, STOREV, N, K, V, LDV, TAU, T, LDT ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clascl.f b/SRC/clascl.f index 8ebb8ad6..1b8b8e81 100644 --- a/SRC/clascl.f +++ b/SRC/clascl.f @@ -1,7 +1,8 @@ SUBROUTINE CLASCL( TYPE, KL, KU, CFROM, CTO, M, N, A, LDA, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clascl2.f b/SRC/clascl2.f index 12efe2cd..489d8d28 100644 --- a/SRC/clascl2.f +++ b/SRC/clascl2.f @@ -1,9 +1,9 @@ SUBROUTINE CLASCL2 ( M, N, D, X, LDX ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/claset.f b/SRC/claset.f index c12fe768..7c0cbddb 100644 --- a/SRC/claset.f +++ b/SRC/claset.f @@ -1,7 +1,8 @@ SUBROUTINE CLASET( UPLO, M, N, ALPHA, BETA, A, LDA ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clasr.f b/SRC/clasr.f index 5521bb13..f03cb656 100644 --- a/SRC/clasr.f +++ b/SRC/clasr.f @@ -1,7 +1,8 @@ SUBROUTINE CLASR( SIDE, PIVOT, DIRECT, M, N, C, S, A, LDA ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/classq.f b/SRC/classq.f index ff1505f7..8232f97e 100644 --- a/SRC/classq.f +++ b/SRC/classq.f @@ -1,7 +1,8 @@ SUBROUTINE CLASSQ( N, X, INCX, SCALE, SUMSQ ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/claswp.f b/SRC/claswp.f index 71d7fa98..206e1f5f 100644 --- a/SRC/claswp.f +++ b/SRC/claswp.f @@ -1,7 +1,8 @@ SUBROUTINE CLASWP( N, A, LDA, K1, K2, IPIV, INCX ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clasyf.f b/SRC/clasyf.f index 1e5f88bb..136ef5e6 100644 --- a/SRC/clasyf.f +++ b/SRC/clasyf.f @@ -1,7 +1,8 @@ SUBROUTINE CLASYF( UPLO, N, NB, KB, A, LDA, IPIV, W, LDW, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clatbs.f b/SRC/clatbs.f index 4d896ff0..63036dad 100644 --- a/SRC/clatbs.f +++ b/SRC/clatbs.f @@ -2,7 +2,8 @@ $ SCALE, CNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clatdf.f b/SRC/clatdf.f index fc951cca..b053fe27 100644 --- a/SRC/clatdf.f +++ b/SRC/clatdf.f @@ -2,7 +2,8 @@ $ JPIV ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clatps.f b/SRC/clatps.f index f395cb8e..14c9fa8a 100644 --- a/SRC/clatps.f +++ b/SRC/clatps.f @@ -2,7 +2,8 @@ $ CNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clatrd.f b/SRC/clatrd.f index 04ef71fb..24b3ba40 100644 --- a/SRC/clatrd.f +++ b/SRC/clatrd.f @@ -1,7 +1,8 @@ SUBROUTINE CLATRD( UPLO, N, NB, A, LDA, E, TAU, W, LDW ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clatrs.f b/SRC/clatrs.f index e3106009..b54f07c1 100644 --- a/SRC/clatrs.f +++ b/SRC/clatrs.f @@ -2,7 +2,8 @@ $ CNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clatrz.f b/SRC/clatrz.f index f0c68806..da5e42d4 100644 --- a/SRC/clatrz.f +++ b/SRC/clatrz.f @@ -1,7 +1,8 @@ SUBROUTINE CLATRZ( M, N, L, A, LDA, TAU, WORK ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clatzm.f b/SRC/clatzm.f index fe969ed2..87ec6835 100644 --- a/SRC/clatzm.f +++ b/SRC/clatzm.f @@ -1,7 +1,8 @@ SUBROUTINE CLATZM( SIDE, M, N, V, INCV, TAU, C1, C2, LDC, WORK ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clauu2.f b/SRC/clauu2.f index 2670c6bd..ccfecec9 100644 --- a/SRC/clauu2.f +++ b/SRC/clauu2.f @@ -1,7 +1,8 @@ SUBROUTINE CLAUU2( UPLO, N, A, LDA, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/clauum.f b/SRC/clauum.f index f65c6fb9..498ae80a 100644 --- a/SRC/clauum.f +++ b/SRC/clauum.f @@ -1,7 +1,8 @@ SUBROUTINE CLAUUM( UPLO, N, A, LDA, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpbcon.f b/SRC/cpbcon.f index 395e54e8..a3f4a891 100644 --- a/SRC/cpbcon.f +++ b/SRC/cpbcon.f @@ -2,7 +2,8 @@ $ RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/cpbequ.f b/SRC/cpbequ.f index d6638559..c968fea7 100644 --- a/SRC/cpbequ.f +++ b/SRC/cpbequ.f @@ -1,7 +1,8 @@ SUBROUTINE CPBEQU( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpbrfs.f b/SRC/cpbrfs.f index 60082501..49b7ef4c 100644 --- a/SRC/cpbrfs.f +++ b/SRC/cpbrfs.f @@ -2,7 +2,8 @@ $ LDB, X, LDX, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/cpbstf.f b/SRC/cpbstf.f index 2d6b3411..2055c658 100644 --- a/SRC/cpbstf.f +++ b/SRC/cpbstf.f @@ -1,7 +1,8 @@ SUBROUTINE CPBSTF( UPLO, N, KD, AB, LDAB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpbsv.f b/SRC/cpbsv.f index 7f1217d9..e14b5d9f 100644 --- a/SRC/cpbsv.f +++ b/SRC/cpbsv.f @@ -1,7 +1,8 @@ SUBROUTINE CPBSV( UPLO, N, KD, NRHS, AB, LDAB, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpbsvx.f b/SRC/cpbsvx.f index 6b7fed9c..9407a07e 100644 --- a/SRC/cpbsvx.f +++ b/SRC/cpbsvx.f @@ -3,7 +3,8 @@ $ WORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpbtf2.f b/SRC/cpbtf2.f index 968d0895..4a6bb91e 100644 --- a/SRC/cpbtf2.f +++ b/SRC/cpbtf2.f @@ -1,7 +1,8 @@ SUBROUTINE CPBTF2( UPLO, N, KD, AB, LDAB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpbtrf.f b/SRC/cpbtrf.f index 403225d2..6ba42425 100644 --- a/SRC/cpbtrf.f +++ b/SRC/cpbtrf.f @@ -1,7 +1,8 @@ SUBROUTINE CPBTRF( UPLO, N, KD, AB, LDAB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpbtrs.f b/SRC/cpbtrs.f index 50de5de5..6db8cd7b 100644 --- a/SRC/cpbtrs.f +++ b/SRC/cpbtrs.f @@ -1,7 +1,8 @@ SUBROUTINE CPBTRS( UPLO, N, KD, NRHS, AB, LDAB, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpftri.f b/SRC/cpftri.f index 56b4c581..bc6ee252 100644 --- a/SRC/cpftri.f +++ b/SRC/cpftri.f @@ -1,9 +1,9 @@ SUBROUTINE CPFTRI( TRANSR, UPLO, N, A, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/cpftrs.f b/SRC/cpftrs.f index 8b36d15f..6b6261a9 100644 --- a/SRC/cpftrs.f +++ b/SRC/cpftrs.f @@ -1,9 +1,9 @@ SUBROUTINE CPFTRS( TRANSR, UPLO, N, NRHS, A, B, LDB, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/cpocon.f b/SRC/cpocon.f index 4763b58a..9faf372d 100644 --- a/SRC/cpocon.f +++ b/SRC/cpocon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/cpoequ.f b/SRC/cpoequ.f index acd0057e..0d426cc9 100644 --- a/SRC/cpoequ.f +++ b/SRC/cpoequ.f @@ -1,7 +1,8 @@ SUBROUTINE CPOEQU( N, A, LDA, S, SCOND, AMAX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cporfs.f b/SRC/cporfs.f index aece7b6a..9643bd91 100644 --- a/SRC/cporfs.f +++ b/SRC/cporfs.f @@ -2,7 +2,8 @@ $ LDX, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/cporfsx.f b/SRC/cporfsx.f index 0f914231..d0ddc8f8 100644 --- a/SRC/cporfsx.f +++ b/SRC/cporfsx.f @@ -3,10 +3,10 @@ $ ERR_BNDS_NORM, ERR_BNDS_COMP, NPARAMS, PARAMS, $ WORK, RWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cposv.f b/SRC/cposv.f index 1694a534..a37afc63 100644 --- a/SRC/cposv.f +++ b/SRC/cposv.f @@ -1,7 +1,8 @@ SUBROUTINE CPOSV( UPLO, N, NRHS, A, LDA, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cposvx.f b/SRC/cposvx.f index e286b1de..61563158 100644 --- a/SRC/cposvx.f +++ b/SRC/cposvx.f @@ -3,7 +3,8 @@ $ RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cposvxx.f b/SRC/cposvxx.f index 8b2eae8f..38e8d8f3 100644 --- a/SRC/cposvxx.f +++ b/SRC/cposvxx.f @@ -3,10 +3,10 @@ $ N_ERR_BNDS, ERR_BNDS_NORM, ERR_BNDS_COMP, $ NPARAMS, PARAMS, WORK, RWORK, INFO ) * -* -- LAPACK driver routine (version 3.2) -- +* -- LAPACK driver routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/cpotf2.f b/SRC/cpotf2.f index 63643327..f15d8d04 100644 --- a/SRC/cpotf2.f +++ b/SRC/cpotf2.f @@ -1,7 +1,8 @@ SUBROUTINE CPOTF2( UPLO, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpotrf.f b/SRC/cpotrf.f index 755bc2db..34f45412 100644 --- a/SRC/cpotrf.f +++ b/SRC/cpotrf.f @@ -1,7 +1,8 @@ SUBROUTINE CPOTRF( UPLO, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpotri.f b/SRC/cpotri.f index 14dde3ff..041b0802 100644 --- a/SRC/cpotri.f +++ b/SRC/cpotri.f @@ -1,7 +1,8 @@ SUBROUTINE CPOTRI( UPLO, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpotrs.f b/SRC/cpotrs.f index d2a13a8e..6020d33d 100644 --- a/SRC/cpotrs.f +++ b/SRC/cpotrs.f @@ -1,7 +1,8 @@ SUBROUTINE CPOTRS( UPLO, N, NRHS, A, LDA, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cppcon.f b/SRC/cppcon.f index ac811de1..10ff4772 100644 --- a/SRC/cppcon.f +++ b/SRC/cppcon.f @@ -1,7 +1,8 @@ SUBROUTINE CPPCON( UPLO, N, AP, ANORM, RCOND, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/cppequ.f b/SRC/cppequ.f index ec5464ea..93ad30dd 100644 --- a/SRC/cppequ.f +++ b/SRC/cppequ.f @@ -1,7 +1,8 @@ SUBROUTINE CPPEQU( UPLO, N, AP, S, SCOND, AMAX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpprfs.f b/SRC/cpprfs.f index 98cbc4e7..0e511914 100644 --- a/SRC/cpprfs.f +++ b/SRC/cpprfs.f @@ -2,7 +2,8 @@ $ BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/cppsv.f b/SRC/cppsv.f index 3f73bb64..0e437b73 100644 --- a/SRC/cppsv.f +++ b/SRC/cppsv.f @@ -1,7 +1,8 @@ SUBROUTINE CPPSV( UPLO, N, NRHS, AP, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cppsvx.f b/SRC/cppsvx.f index 51c48c32..43522997 100644 --- a/SRC/cppsvx.f +++ b/SRC/cppsvx.f @@ -2,7 +2,8 @@ $ X, LDX, RCOND, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpptrf.f b/SRC/cpptrf.f index 8d6a511e..bf214eb7 100644 --- a/SRC/cpptrf.f +++ b/SRC/cpptrf.f @@ -1,7 +1,8 @@ SUBROUTINE CPPTRF( UPLO, N, AP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpptri.f b/SRC/cpptri.f index 7d63eaad..bcab4542 100644 --- a/SRC/cpptri.f +++ b/SRC/cpptri.f @@ -1,7 +1,8 @@ SUBROUTINE CPPTRI( UPLO, N, AP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpptrs.f b/SRC/cpptrs.f index 50e0c0f0..f9d2c2fd 100644 --- a/SRC/cpptrs.f +++ b/SRC/cpptrs.f @@ -1,7 +1,8 @@ SUBROUTINE CPPTRS( UPLO, N, NRHS, AP, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cptcon.f b/SRC/cptcon.f index 54402211..6ed1103f 100644 --- a/SRC/cptcon.f +++ b/SRC/cptcon.f @@ -1,7 +1,8 @@ SUBROUTINE CPTCON( N, D, E, ANORM, RCOND, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpteqr.f b/SRC/cpteqr.f index 31b6b04d..9b475944 100644 --- a/SRC/cpteqr.f +++ b/SRC/cpteqr.f @@ -1,7 +1,8 @@ SUBROUTINE CPTEQR( COMPZ, N, D, E, Z, LDZ, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cptrfs.f b/SRC/cptrfs.f index a95cce4a..0e4e9dd3 100644 --- a/SRC/cptrfs.f +++ b/SRC/cptrfs.f @@ -2,7 +2,8 @@ $ FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cptsv.f b/SRC/cptsv.f index 945a281c..98032219 100644 --- a/SRC/cptsv.f +++ b/SRC/cptsv.f @@ -1,7 +1,8 @@ SUBROUTINE CPTSV( N, NRHS, D, E, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cptsvx.f b/SRC/cptsvx.f index 0f73da01..23361c70 100644 --- a/SRC/cptsvx.f +++ b/SRC/cptsvx.f @@ -2,7 +2,8 @@ $ RCOND, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpttrf.f b/SRC/cpttrf.f index 70bf326f..d3509013 100644 --- a/SRC/cpttrf.f +++ b/SRC/cpttrf.f @@ -1,7 +1,8 @@ SUBROUTINE CPTTRF( N, D, E, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cpttrs.f b/SRC/cpttrs.f index 11815e80..ed6b5c45 100644 --- a/SRC/cpttrs.f +++ b/SRC/cpttrs.f @@ -1,7 +1,8 @@ SUBROUTINE CPTTRS( UPLO, N, NRHS, D, E, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cptts2.f b/SRC/cptts2.f index b4aa625a..46c5911d 100644 --- a/SRC/cptts2.f +++ b/SRC/cptts2.f @@ -1,7 +1,8 @@ SUBROUTINE CPTTS2( IUPLO, N, NRHS, D, E, B, LDB ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. @@ -1,7 +1,8 @@ SUBROUTINE CROT( N, CX, INCX, CY, INCY, C, S ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cspcon.f b/SRC/cspcon.f index 1740f89e..c3ea45e9 100644 --- a/SRC/cspcon.f +++ b/SRC/cspcon.f @@ -1,7 +1,8 @@ SUBROUTINE CSPCON( UPLO, N, AP, IPIV, ANORM, RCOND, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/cspmv.f b/SRC/cspmv.f index b1fca225..68043a36 100644 --- a/SRC/cspmv.f +++ b/SRC/cspmv.f @@ -1,7 +1,8 @@ SUBROUTINE CSPMV( UPLO, N, ALPHA, AP, X, INCX, BETA, Y, INCY ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. @@ -1,7 +1,8 @@ SUBROUTINE CSPR( UPLO, N, ALPHA, X, INCX, AP ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/csprfs.f b/SRC/csprfs.f index 4652e7c0..71a27132 100644 --- a/SRC/csprfs.f +++ b/SRC/csprfs.f @@ -2,7 +2,8 @@ $ FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/cspsv.f b/SRC/cspsv.f index 5e9d8539..cbdbbfea 100644 --- a/SRC/cspsv.f +++ b/SRC/cspsv.f @@ -1,7 +1,8 @@ SUBROUTINE CSPSV( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cspsvx.f b/SRC/cspsvx.f index 9ac2c4a5..eb6304fb 100644 --- a/SRC/cspsvx.f +++ b/SRC/cspsvx.f @@ -2,7 +2,8 @@ $ LDX, RCOND, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/csptrf.f b/SRC/csptrf.f index c2df86d3..30064764 100644 --- a/SRC/csptrf.f +++ b/SRC/csptrf.f @@ -1,7 +1,8 @@ SUBROUTINE CSPTRF( UPLO, N, AP, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/csptri.f b/SRC/csptri.f index 70c18349..07eeab15 100644 --- a/SRC/csptri.f +++ b/SRC/csptri.f @@ -1,7 +1,8 @@ SUBROUTINE CSPTRI( UPLO, N, AP, IPIV, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/csptrs.f b/SRC/csptrs.f index 5df9627a..753a0c36 100644 --- a/SRC/csptrs.f +++ b/SRC/csptrs.f @@ -1,7 +1,8 @@ SUBROUTINE CSPTRS( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/csrscl.f b/SRC/csrscl.f index 15032fe6..d4788f6a 100644 --- a/SRC/csrscl.f +++ b/SRC/csrscl.f @@ -1,7 +1,8 @@ SUBROUTINE CSRSCL( N, SA, SX, INCX ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cstedc.f b/SRC/cstedc.f index b93d92cf..bb444ce1 100644 --- a/SRC/cstedc.f +++ b/SRC/cstedc.f @@ -2,7 +2,8 @@ $ LRWORK, IWORK, LIWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cstegr.f b/SRC/cstegr.f index 184430ce..b044d4a4 100644 --- a/SRC/cstegr.f +++ b/SRC/cstegr.f @@ -6,7 +6,8 @@ * * * -- LAPACK computational routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cstein.f b/SRC/cstein.f index 3289938b..041ffa5f 100644 --- a/SRC/cstein.f +++ b/SRC/cstein.f @@ -2,7 +2,8 @@ $ IWORK, IFAIL, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cstemr.f b/SRC/cstemr.f index 2525e18b..94256243 100644 --- a/SRC/cstemr.f +++ b/SRC/cstemr.f @@ -3,9 +3,10 @@ $ IWORK, LIWORK, INFO ) IMPLICIT NONE * -* -- LAPACK computational routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK computational routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. CHARACTER JOBZ, RANGE diff --git a/SRC/csteqr.f b/SRC/csteqr.f index 9d2b4af0..ad7542c2 100644 --- a/SRC/csteqr.f +++ b/SRC/csteqr.f @@ -1,7 +1,8 @@ SUBROUTINE CSTEQR( COMPZ, N, D, E, Z, LDZ, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/csycon.f b/SRC/csycon.f index 93b569d1..5b40df5d 100644 --- a/SRC/csycon.f +++ b/SRC/csycon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/csymv.f b/SRC/csymv.f index e1da20a9..06d95b10 100644 --- a/SRC/csymv.f +++ b/SRC/csymv.f @@ -1,7 +1,8 @@ SUBROUTINE CSYMV( UPLO, N, ALPHA, A, LDA, X, INCX, BETA, Y, INCY ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. @@ -1,7 +1,8 @@ SUBROUTINE CSYR( UPLO, N, ALPHA, X, INCX, A, LDA ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/csyrfs.f b/SRC/csyrfs.f index cb2304aa..beeb98b1 100644 --- a/SRC/csyrfs.f +++ b/SRC/csyrfs.f @@ -2,7 +2,8 @@ $ X, LDX, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/csyrfsx.f b/SRC/csyrfsx.f index 6c0692d3..daeb3185 100644 --- a/SRC/csyrfsx.f +++ b/SRC/csyrfsx.f @@ -3,10 +3,10 @@ $ ERR_BNDS_NORM, ERR_BNDS_COMP, NPARAMS, PARAMS, $ WORK, RWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/csysv.f b/SRC/csysv.f index 340d5a85..855405f2 100644 --- a/SRC/csysv.f +++ b/SRC/csysv.f @@ -2,7 +2,8 @@ $ LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/csysvx.f b/SRC/csysvx.f index 91083f1e..b73ad9a8 100644 --- a/SRC/csysvx.f +++ b/SRC/csysvx.f @@ -3,7 +3,8 @@ $ RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/csysvxx.f b/SRC/csysvxx.f index ae76d119..7693b882 100644 --- a/SRC/csysvxx.f +++ b/SRC/csysvxx.f @@ -3,10 +3,10 @@ $ N_ERR_BNDS, ERR_BNDS_NORM, ERR_BNDS_COMP, $ NPARAMS, PARAMS, WORK, RWORK, INFO ) * -* -- LAPACK driver routine (version 3.2) -- +* -- LAPACK driver routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/csytf2.f b/SRC/csytf2.f index 7f1290f0..64be1664 100644 --- a/SRC/csytf2.f +++ b/SRC/csytf2.f @@ -1,7 +1,8 @@ SUBROUTINE CSYTF2( UPLO, N, A, LDA, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/csytrf.f b/SRC/csytrf.f index a3ac09c4..2084d964 100644 --- a/SRC/csytrf.f +++ b/SRC/csytrf.f @@ -1,7 +1,8 @@ SUBROUTINE CSYTRF( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/csytri.f b/SRC/csytri.f index 86db4a98..8b54abe9 100644 --- a/SRC/csytri.f +++ b/SRC/csytri.f @@ -1,7 +1,8 @@ SUBROUTINE CSYTRI( UPLO, N, A, LDA, IPIV, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/csytrs.f b/SRC/csytrs.f index 75dbf31b..4f230619 100644 --- a/SRC/csytrs.f +++ b/SRC/csytrs.f @@ -1,7 +1,8 @@ SUBROUTINE CSYTRS( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ctbcon.f b/SRC/ctbcon.f index 8cbe31b6..302cc490 100644 --- a/SRC/ctbcon.f +++ b/SRC/ctbcon.f @@ -2,7 +2,8 @@ $ RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/ctbrfs.f b/SRC/ctbrfs.f index 6d2004db..4104c987 100644 --- a/SRC/ctbrfs.f +++ b/SRC/ctbrfs.f @@ -2,7 +2,8 @@ $ LDB, X, LDX, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/ctbtrs.f b/SRC/ctbtrs.f index e7deef57..78af210f 100644 --- a/SRC/ctbtrs.f +++ b/SRC/ctbtrs.f @@ -2,7 +2,8 @@ $ LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ctfsm.f b/SRC/ctfsm.f index 303f0109..996d8da6 100644 --- a/SRC/ctfsm.f +++ b/SRC/ctfsm.f @@ -1,10 +1,10 @@ SUBROUTINE CTFSM( TRANSR, SIDE, UPLO, TRANS, DIAG, M, N, ALPHA, A, + B, LDB ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/ctftri.f b/SRC/ctftri.f index 19470e7e..5a5ad432 100644 --- a/SRC/ctftri.f +++ b/SRC/ctftri.f @@ -1,9 +1,9 @@ SUBROUTINE CTFTRI( TRANSR, UPLO, DIAG, N, A, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/ctfttp.f b/SRC/ctfttp.f index c56dfc42..af73f721 100644 --- a/SRC/ctfttp.f +++ b/SRC/ctfttp.f @@ -1,9 +1,9 @@ SUBROUTINE CTFTTP( TRANSR, UPLO, N, ARF, AP, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/ctfttr.f b/SRC/ctfttr.f index c1b716ec..0c46bc2d 100644 --- a/SRC/ctfttr.f +++ b/SRC/ctfttr.f @@ -1,9 +1,9 @@ SUBROUTINE CTFTTR( TRANSR, UPLO, N, ARF, A, LDA, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/ctgevc.f b/SRC/ctgevc.f index f39bb018..392b35a1 100644 --- a/SRC/ctgevc.f +++ b/SRC/ctgevc.f @@ -2,7 +2,8 @@ $ LDVL, VR, LDVR, MM, M, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ctgex2.f b/SRC/ctgex2.f index 57b59d29..dbf9179c 100644 --- a/SRC/ctgex2.f +++ b/SRC/ctgex2.f @@ -2,7 +2,8 @@ $ LDZ, J1, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ctgexc.f b/SRC/ctgexc.f index 71b31c2a..e0484355 100644 --- a/SRC/ctgexc.f +++ b/SRC/ctgexc.f @@ -2,7 +2,8 @@ $ LDZ, IFST, ILST, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ctgsen.f b/SRC/ctgsen.f index cdb4807a..fb3930ec 100644 --- a/SRC/ctgsen.f +++ b/SRC/ctgsen.f @@ -3,7 +3,8 @@ $ WORK, LWORK, IWORK, LIWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2007 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/ctgsja.f b/SRC/ctgsja.f index 05c056a4..9a14ff61 100644 --- a/SRC/ctgsja.f +++ b/SRC/ctgsja.f @@ -2,9 +2,10 @@ $ LDB, TOLA, TOLB, ALPHA, BETA, U, LDU, V, LDV, $ Q, LDQ, WORK, NCYCLE, INFO ) * -* -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. CHARACTER JOBQ, JOBU, JOBV diff --git a/SRC/ctgsna.f b/SRC/ctgsna.f index 30878194..37c11e31 100644 --- a/SRC/ctgsna.f +++ b/SRC/ctgsna.f @@ -3,7 +3,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ctgsy2.f b/SRC/ctgsy2.f index 95145f37..b762b234 100644 --- a/SRC/ctgsy2.f +++ b/SRC/ctgsy2.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ctgsyl.f b/SRC/ctgsyl.f index 80f61d0c..333cbcea 100644 --- a/SRC/ctgsyl.f +++ b/SRC/ctgsyl.f @@ -3,7 +3,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2007 * * .. Scalar Arguments .. diff --git a/SRC/ctpcon.f b/SRC/ctpcon.f index 16bfff18..4cfb771d 100644 --- a/SRC/ctpcon.f +++ b/SRC/ctpcon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/ctprfs.f b/SRC/ctprfs.f index 21ff4b21..b0e0dd8b 100644 --- a/SRC/ctprfs.f +++ b/SRC/ctprfs.f @@ -2,7 +2,8 @@ $ FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/ctptri.f b/SRC/ctptri.f index afc49846..8ccb9156 100644 --- a/SRC/ctptri.f +++ b/SRC/ctptri.f @@ -1,7 +1,8 @@ SUBROUTINE CTPTRI( UPLO, DIAG, N, AP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ctptrs.f b/SRC/ctptrs.f index 529d7278..df9bed36 100644 --- a/SRC/ctptrs.f +++ b/SRC/ctptrs.f @@ -1,7 +1,8 @@ SUBROUTINE CTPTRS( UPLO, TRANS, DIAG, N, NRHS, AP, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ctpttf.f b/SRC/ctpttf.f index 7661f3a0..3854dbfb 100644 --- a/SRC/ctpttf.f +++ b/SRC/ctpttf.f @@ -1,9 +1,9 @@ SUBROUTINE CTPTTF( TRANSR, UPLO, N, AP, ARF, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/ctrcon.f b/SRC/ctrcon.f index 9b725163..2ee42f93 100644 --- a/SRC/ctrcon.f +++ b/SRC/ctrcon.f @@ -2,7 +2,8 @@ $ RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/ctrevc.f b/SRC/ctrevc.f index 0c7ff122..900248f0 100644 --- a/SRC/ctrevc.f +++ b/SRC/ctrevc.f @@ -2,7 +2,8 @@ $ LDVR, MM, M, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ctrexc.f b/SRC/ctrexc.f index 55bc35a7..3a8f0d9b 100644 --- a/SRC/ctrexc.f +++ b/SRC/ctrexc.f @@ -1,7 +1,8 @@ SUBROUTINE CTREXC( COMPQ, N, T, LDT, Q, LDQ, IFST, ILST, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ctrrfs.f b/SRC/ctrrfs.f index b48d888a..ee34596e 100644 --- a/SRC/ctrrfs.f +++ b/SRC/ctrrfs.f @@ -2,7 +2,8 @@ $ LDX, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/ctrsen.f b/SRC/ctrsen.f index 7f603b54..2b35ef3c 100644 --- a/SRC/ctrsen.f +++ b/SRC/ctrsen.f @@ -2,7 +2,8 @@ $ SEP, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/ctrsna.f b/SRC/ctrsna.f index 37b1ab8f..f538b7db 100644 --- a/SRC/ctrsna.f +++ b/SRC/ctrsna.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call CLACN2 in place of CLACON, 10 Feb 03, SJH. diff --git a/SRC/ctrsyl.f b/SRC/ctrsyl.f index 6639fe41..721c5849 100644 --- a/SRC/ctrsyl.f +++ b/SRC/ctrsyl.f @@ -2,7 +2,8 @@ $ LDC, SCALE, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ctrti2.f b/SRC/ctrti2.f index 11c46a82..eb343f2c 100644 --- a/SRC/ctrti2.f +++ b/SRC/ctrti2.f @@ -1,7 +1,8 @@ SUBROUTINE CTRTI2( UPLO, DIAG, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ctrtri.f b/SRC/ctrtri.f index de32204b..aaf4171c 100644 --- a/SRC/ctrtri.f +++ b/SRC/ctrtri.f @@ -1,7 +1,8 @@ SUBROUTINE CTRTRI( UPLO, DIAG, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ctrtrs.f b/SRC/ctrtrs.f index 7e5f7061..a343eebb 100644 --- a/SRC/ctrtrs.f +++ b/SRC/ctrtrs.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ctrttf.f b/SRC/ctrttf.f index 1c53ed80..1a7b9089 100644 --- a/SRC/ctrttf.f +++ b/SRC/ctrttf.f @@ -1,9 +1,9 @@ SUBROUTINE CTRTTF( TRANSR, UPLO, N, A, LDA, ARF, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/ctzrqf.f b/SRC/ctzrqf.f index 97ba23ec..fb2bc230 100644 --- a/SRC/ctzrqf.f +++ b/SRC/ctzrqf.f @@ -1,7 +1,8 @@ SUBROUTINE CTZRQF( M, N, A, LDA, TAU, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ctzrzf.f b/SRC/ctzrzf.f index 4790f3fa..b1b7e040 100644 --- a/SRC/ctzrzf.f +++ b/SRC/ctzrzf.f @@ -1,7 +1,8 @@ SUBROUTINE CTZRZF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cung2l.f b/SRC/cung2l.f index c7db2877..c83fbf80 100644 --- a/SRC/cung2l.f +++ b/SRC/cung2l.f @@ -1,7 +1,8 @@ SUBROUTINE CUNG2L( M, N, K, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cung2r.f b/SRC/cung2r.f index 3f5a1070..e1c39ad7 100644 --- a/SRC/cung2r.f +++ b/SRC/cung2r.f @@ -1,7 +1,8 @@ SUBROUTINE CUNG2R( M, N, K, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cungbr.f b/SRC/cungbr.f index a48051fb..7e9a5760 100644 --- a/SRC/cungbr.f +++ b/SRC/cungbr.f @@ -1,7 +1,8 @@ SUBROUTINE CUNGBR( VECT, M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cunghr.f b/SRC/cunghr.f index 746b9933..83012e93 100644 --- a/SRC/cunghr.f +++ b/SRC/cunghr.f @@ -1,7 +1,8 @@ SUBROUTINE CUNGHR( N, ILO, IHI, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cungl2.f b/SRC/cungl2.f index 2497bf6a..daf16e04 100644 --- a/SRC/cungl2.f +++ b/SRC/cungl2.f @@ -1,7 +1,8 @@ SUBROUTINE CUNGL2( M, N, K, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cunglq.f b/SRC/cunglq.f index 9db1040d..ef32e5c7 100644 --- a/SRC/cunglq.f +++ b/SRC/cunglq.f @@ -1,7 +1,8 @@ SUBROUTINE CUNGLQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cungql.f b/SRC/cungql.f index 14c2ac4b..cc1e19d0 100644 --- a/SRC/cungql.f +++ b/SRC/cungql.f @@ -1,7 +1,8 @@ SUBROUTINE CUNGQL( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cungqr.f b/SRC/cungqr.f index eb0a6ab6..1ea9d2cc 100644 --- a/SRC/cungqr.f +++ b/SRC/cungqr.f @@ -1,7 +1,8 @@ SUBROUTINE CUNGQR( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cungr2.f b/SRC/cungr2.f index 1d32d9dd..4e75e51d 100644 --- a/SRC/cungr2.f +++ b/SRC/cungr2.f @@ -1,7 +1,8 @@ SUBROUTINE CUNGR2( M, N, K, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cungrq.f b/SRC/cungrq.f index 4aaf9104..bd9c416f 100644 --- a/SRC/cungrq.f +++ b/SRC/cungrq.f @@ -1,7 +1,8 @@ SUBROUTINE CUNGRQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cungtr.f b/SRC/cungtr.f index 92a584e4..9c95024c 100644 --- a/SRC/cungtr.f +++ b/SRC/cungtr.f @@ -1,7 +1,8 @@ SUBROUTINE CUNGTR( UPLO, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cunm2l.f b/SRC/cunm2l.f index 934fcbc1..06904231 100644 --- a/SRC/cunm2l.f +++ b/SRC/cunm2l.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cunm2r.f b/SRC/cunm2r.f index 665831f4..f710288f 100644 --- a/SRC/cunm2r.f +++ b/SRC/cunm2r.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cunmbr.f b/SRC/cunmbr.f index e0ac0e6a..872cde44 100644 --- a/SRC/cunmbr.f +++ b/SRC/cunmbr.f @@ -2,7 +2,8 @@ $ LDC, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cunmhr.f b/SRC/cunmhr.f index 57b56f84..f63edfd9 100644 --- a/SRC/cunmhr.f +++ b/SRC/cunmhr.f @@ -2,7 +2,8 @@ $ LDC, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cunml2.f b/SRC/cunml2.f index 2657737b..e923d92e 100644 --- a/SRC/cunml2.f +++ b/SRC/cunml2.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cunmlq.f b/SRC/cunmlq.f index 0b3ef69c..acc4c173 100644 --- a/SRC/cunmlq.f +++ b/SRC/cunmlq.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cunmql.f b/SRC/cunmql.f index f69adbca..23128473 100644 --- a/SRC/cunmql.f +++ b/SRC/cunmql.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cunmqr.f b/SRC/cunmqr.f index 02efd411..0e7da561 100644 --- a/SRC/cunmqr.f +++ b/SRC/cunmqr.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cunmr2.f b/SRC/cunmr2.f index 667192b6..e1fc7f08 100644 --- a/SRC/cunmr2.f +++ b/SRC/cunmr2.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cunmr3.f b/SRC/cunmr3.f index 191183fe..a9f6321f 100644 --- a/SRC/cunmr3.f +++ b/SRC/cunmr3.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cunmrq.f b/SRC/cunmrq.f index 1ec0ac65..3ed1cbe1 100644 --- a/SRC/cunmrq.f +++ b/SRC/cunmrq.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cunmrz.f b/SRC/cunmrz.f index b8161f50..55b62623 100644 --- a/SRC/cunmrz.f +++ b/SRC/cunmrz.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2007 * * .. Scalar Arguments .. diff --git a/SRC/cunmtr.f b/SRC/cunmtr.f index 97aabb31..e83c6aad 100644 --- a/SRC/cunmtr.f +++ b/SRC/cunmtr.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cupgtr.f b/SRC/cupgtr.f index cb7d6ffc..cbd3453f 100644 --- a/SRC/cupgtr.f +++ b/SRC/cupgtr.f @@ -1,7 +1,8 @@ SUBROUTINE CUPGTR( UPLO, N, AP, TAU, Q, LDQ, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/cupmtr.f b/SRC/cupmtr.f index 6f8a4c07..6d6e893c 100644 --- a/SRC/cupmtr.f +++ b/SRC/cupmtr.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dbdsdc.f b/SRC/dbdsdc.f index c625d9e9..bf916b2a 100644 --- a/SRC/dbdsdc.f +++ b/SRC/dbdsdc.f @@ -2,7 +2,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dbdsqr.f b/SRC/dbdsqr.f index 472e00e1..4881a69f 100644 --- a/SRC/dbdsqr.f +++ b/SRC/dbdsqr.f @@ -2,7 +2,8 @@ $ LDU, C, LDC, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2007 * * .. Scalar Arguments .. diff --git a/SRC/ddisna.f b/SRC/ddisna.f index 74a5e1ca..24afafce 100644 --- a/SRC/ddisna.f +++ b/SRC/ddisna.f @@ -1,7 +1,8 @@ SUBROUTINE DDISNA( JOB, M, N, D, SEP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgbbrd.f b/SRC/dgbbrd.f index 3a43bd0f..5cefa7f1 100644 --- a/SRC/dgbbrd.f +++ b/SRC/dgbbrd.f @@ -2,7 +2,8 @@ $ LDQ, PT, LDPT, C, LDC, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgbcon.f b/SRC/dgbcon.f index c961d307..1e43d4da 100644 --- a/SRC/dgbcon.f +++ b/SRC/dgbcon.f @@ -2,7 +2,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dgbequ.f b/SRC/dgbequ.f index 5166d95b..eb2dd8ac 100644 --- a/SRC/dgbequ.f +++ b/SRC/dgbequ.f @@ -2,7 +2,8 @@ $ AMAX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgbrfs.f b/SRC/dgbrfs.f index 4ae8fe7b..f0647c07 100644 --- a/SRC/dgbrfs.f +++ b/SRC/dgbrfs.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dgbrfsx.f b/SRC/dgbrfsx.f index 1161c069..c1bcc829 100644 --- a/SRC/dgbrfsx.f +++ b/SRC/dgbrfsx.f @@ -4,10 +4,10 @@ $ ERR_BNDS_COMP, NPARAMS, PARAMS, WORK, IWORK, $ INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dgbsv.f b/SRC/dgbsv.f index a4226fce..9db11f68 100644 --- a/SRC/dgbsv.f +++ b/SRC/dgbsv.f @@ -1,7 +1,8 @@ SUBROUTINE DGBSV( N, KL, KU, NRHS, AB, LDAB, IPIV, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgbsvx.f b/SRC/dgbsvx.f index 0f1bf5b3..f3f7616e 100644 --- a/SRC/dgbsvx.f +++ b/SRC/dgbsvx.f @@ -3,7 +3,8 @@ $ RCOND, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgbtf2.f b/SRC/dgbtf2.f index 7a118dd7..29876366 100644 --- a/SRC/dgbtf2.f +++ b/SRC/dgbtf2.f @@ -1,7 +1,8 @@ SUBROUTINE DGBTF2( M, N, KL, KU, AB, LDAB, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgbtrf.f b/SRC/dgbtrf.f index f19115e3..e86dc0b5 100644 --- a/SRC/dgbtrf.f +++ b/SRC/dgbtrf.f @@ -1,7 +1,8 @@ SUBROUTINE DGBTRF( M, N, KL, KU, AB, LDAB, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgbtrs.f b/SRC/dgbtrs.f index 06b366a0..3b0571e4 100644 --- a/SRC/dgbtrs.f +++ b/SRC/dgbtrs.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgebak.f b/SRC/dgebak.f index 4a491e62..ddc776db 100644 --- a/SRC/dgebak.f +++ b/SRC/dgebak.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgebal.f b/SRC/dgebal.f index 8d4cb3c6..9056e778 100644 --- a/SRC/dgebal.f +++ b/SRC/dgebal.f @@ -1,7 +1,8 @@ SUBROUTINE DGEBAL( JOB, N, A, LDA, ILO, IHI, SCALE, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgebd2.f b/SRC/dgebd2.f index d91282f3..df13baaa 100644 --- a/SRC/dgebd2.f +++ b/SRC/dgebd2.f @@ -1,7 +1,8 @@ SUBROUTINE DGEBD2( M, N, A, LDA, D, E, TAUQ, TAUP, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgebrd.f b/SRC/dgebrd.f index 5b0f7e3b..eb6b6f5d 100644 --- a/SRC/dgebrd.f +++ b/SRC/dgebrd.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgecon.f b/SRC/dgecon.f index c7132f69..b49a91f6 100644 --- a/SRC/dgecon.f +++ b/SRC/dgecon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dgeequ.f b/SRC/dgeequ.f index 7526a656..f69fa851 100644 --- a/SRC/dgeequ.f +++ b/SRC/dgeequ.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgees.f b/SRC/dgees.f index 099ca355..e3939cab 100644 --- a/SRC/dgees.f +++ b/SRC/dgees.f @@ -2,7 +2,8 @@ $ VS, LDVS, WORK, LWORK, BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgeesx.f b/SRC/dgeesx.f index 35024ddc..950031ec 100644 --- a/SRC/dgeesx.f +++ b/SRC/dgeesx.f @@ -3,7 +3,8 @@ $ IWORK, LIWORK, BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgeev.f b/SRC/dgeev.f index 7b049809..8f8d0b82 100644 --- a/SRC/dgeev.f +++ b/SRC/dgeev.f @@ -2,7 +2,8 @@ $ LDVR, WORK, LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgeevx.f b/SRC/dgeevx.f index 514e28ad..2f914fa9 100644 --- a/SRC/dgeevx.f +++ b/SRC/dgeevx.f @@ -3,7 +3,8 @@ $ RCONDE, RCONDV, WORK, LWORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgegs.f b/SRC/dgegs.f index 7a2375c0..1cb128f0 100644 --- a/SRC/dgegs.f +++ b/SRC/dgegs.f @@ -3,7 +3,8 @@ $ LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgegv.f b/SRC/dgegv.f index 6bb22c7c..9abb961f 100644 --- a/SRC/dgegv.f +++ b/SRC/dgegv.f @@ -2,7 +2,8 @@ $ BETA, VL, LDVL, VR, LDVR, WORK, LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgehd2.f b/SRC/dgehd2.f index 5c0a3597..8853657c 100644 --- a/SRC/dgehd2.f +++ b/SRC/dgehd2.f @@ -1,7 +1,8 @@ SUBROUTINE DGEHD2( N, ILO, IHI, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgehrd.f b/SRC/dgehrd.f index 136f90b6..0cdfdd06 100644 --- a/SRC/dgehrd.f +++ b/SRC/dgehrd.f @@ -1,8 +1,9 @@ SUBROUTINE DGEHRD( N, ILO, IHI, A, LDA, TAU, WORK, LWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. INTEGER IHI, ILO, INFO, LDA, LWORK, N diff --git a/SRC/dgejsv.f b/SRC/dgejsv.f index e0bf503c..f5dc6ef0 100644 --- a/SRC/dgejsv.f +++ b/SRC/dgejsv.f @@ -2,11 +2,11 @@ & M, N, A, LDA, SVA, U, LDU, V, LDV, & WORK, LWORK, IWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Zlatko Drmac of the University of Zagreb and -- * -- Kresimir Veselic of the Fernuniversitaet Hagen -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/dgelq2.f b/SRC/dgelq2.f index 051a0984..96ef32a8 100644 --- a/SRC/dgelq2.f +++ b/SRC/dgelq2.f @@ -1,7 +1,8 @@ SUBROUTINE DGELQ2( M, N, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgelqf.f b/SRC/dgelqf.f index fc8b79e0..6e67d40a 100644 --- a/SRC/dgelqf.f +++ b/SRC/dgelqf.f @@ -1,7 +1,8 @@ SUBROUTINE DGELQF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgels.f b/SRC/dgels.f index 163ce92b..dc9a92fb 100644 --- a/SRC/dgels.f +++ b/SRC/dgels.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgelsd.f b/SRC/dgelsd.f index b6450834..00f17a00 100644 --- a/SRC/dgelsd.f +++ b/SRC/dgelsd.f @@ -2,7 +2,8 @@ $ WORK, LWORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgelss.f b/SRC/dgelss.f index f38fe662..a420b303 100644 --- a/SRC/dgelss.f +++ b/SRC/dgelss.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgelsx.f b/SRC/dgelsx.f index 3990f936..e9194c81 100644 --- a/SRC/dgelsx.f +++ b/SRC/dgelsx.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgelsy.f b/SRC/dgelsy.f index 3a5c78ea..9b5a7844 100644 --- a/SRC/dgelsy.f +++ b/SRC/dgelsy.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgeql2.f b/SRC/dgeql2.f index 47682e84..a684249c 100644 --- a/SRC/dgeql2.f +++ b/SRC/dgeql2.f @@ -1,7 +1,8 @@ SUBROUTINE DGEQL2( M, N, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgeqlf.f b/SRC/dgeqlf.f index a99d356d..989468b6 100644 --- a/SRC/dgeqlf.f +++ b/SRC/dgeqlf.f @@ -1,7 +1,8 @@ SUBROUTINE DGEQLF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgeqp3.f b/SRC/dgeqp3.f index d8b64333..aa471606 100644 --- a/SRC/dgeqp3.f +++ b/SRC/dgeqp3.f @@ -1,7 +1,8 @@ SUBROUTINE DGEQP3( M, N, A, LDA, JPVT, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgeqpf.f b/SRC/dgeqpf.f index 88e3e8ac..78c60ced 100644 --- a/SRC/dgeqpf.f +++ b/SRC/dgeqpf.f @@ -1,7 +1,8 @@ SUBROUTINE DGEQPF( M, N, A, LDA, JPVT, TAU, WORK, INFO ) * * -- LAPACK deprecated driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgeqr2.f b/SRC/dgeqr2.f index 96843188..78c3aac9 100644 --- a/SRC/dgeqr2.f +++ b/SRC/dgeqr2.f @@ -1,7 +1,8 @@ SUBROUTINE DGEQR2( M, N, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgeqrf.f b/SRC/dgeqrf.f index d7befb76..c6bd63fc 100644 --- a/SRC/dgeqrf.f +++ b/SRC/dgeqrf.f @@ -1,7 +1,8 @@ SUBROUTINE DGEQRF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgerfs.f b/SRC/dgerfs.f index 42ddc5d8..4328b8fa 100644 --- a/SRC/dgerfs.f +++ b/SRC/dgerfs.f @@ -2,7 +2,8 @@ $ X, LDX, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dgerfsx.f b/SRC/dgerfsx.f index b2908a8c..22b379a8 100644 --- a/SRC/dgerfsx.f +++ b/SRC/dgerfsx.f @@ -3,10 +3,10 @@ $ ERR_BNDS_NORM, ERR_BNDS_COMP, NPARAMS, PARAMS, $ WORK, IWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dgerq2.f b/SRC/dgerq2.f index 3924dd97..e6357336 100644 --- a/SRC/dgerq2.f +++ b/SRC/dgerq2.f @@ -1,7 +1,8 @@ SUBROUTINE DGERQ2( M, N, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgerqf.f b/SRC/dgerqf.f index 382e5a7e..062638a9 100644 --- a/SRC/dgerqf.f +++ b/SRC/dgerqf.f @@ -1,7 +1,8 @@ SUBROUTINE DGERQF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgesc2.f b/SRC/dgesc2.f index 9ef6253c..9b1e0754 100644 --- a/SRC/dgesc2.f +++ b/SRC/dgesc2.f @@ -1,7 +1,8 @@ SUBROUTINE DGESC2( N, A, LDA, RHS, IPIV, JPIV, SCALE ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgesdd.f b/SRC/dgesdd.f index d2f5f845..798d25ea 100644 --- a/SRC/dgesdd.f +++ b/SRC/dgesdd.f @@ -1,8 +1,9 @@ SUBROUTINE DGESDD( JOBZ, M, N, A, LDA, S, U, LDU, VT, LDVT, WORK, $ LWORK, IWORK, INFO ) * -* -- LAPACK driver routine (version 3.2.1) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK driver routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * March 2009 * * .. Scalar Arguments .. diff --git a/SRC/dgesv.f b/SRC/dgesv.f index 2545da66..0fe73a1f 100644 --- a/SRC/dgesv.f +++ b/SRC/dgesv.f @@ -1,7 +1,8 @@ SUBROUTINE DGESV( N, NRHS, A, LDA, IPIV, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgesvd.f b/SRC/dgesvd.f index 60344521..0598dca1 100644 --- a/SRC/dgesvd.f +++ b/SRC/dgesvd.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgesvj.f b/SRC/dgesvj.f index b583dfee..85eaed29 100644 --- a/SRC/dgesvj.f +++ b/SRC/dgesvj.f @@ -1,11 +1,11 @@ SUBROUTINE DGESVJ( JOBA, JOBU, JOBV, M, N, A, LDA, SVA, MV, V, + LDV, WORK, LWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Zlatko Drmac of the University of Zagreb and -- * -- Kresimir Veselic of the Fernuniversitaet Hagen -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/dgesvx.f b/SRC/dgesvx.f index 9ce0e4f7..9008c96f 100644 --- a/SRC/dgesvx.f +++ b/SRC/dgesvx.f @@ -3,7 +3,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgetc2.f b/SRC/dgetc2.f index b637da8b..f8e84455 100644 --- a/SRC/dgetc2.f +++ b/SRC/dgetc2.f @@ -1,7 +1,8 @@ SUBROUTINE DGETC2( N, A, LDA, IPIV, JPIV, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgetf2.f b/SRC/dgetf2.f index 51a1dc3f..a4277c16 100644 --- a/SRC/dgetf2.f +++ b/SRC/dgetf2.f @@ -1,7 +1,8 @@ SUBROUTINE DGETF2( M, N, A, LDA, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgetrf.f b/SRC/dgetrf.f index 2182de3e..3f7aebee 100644 --- a/SRC/dgetrf.f +++ b/SRC/dgetrf.f @@ -1,7 +1,8 @@ SUBROUTINE DGETRF( M, N, A, LDA, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgetri.f b/SRC/dgetri.f index fda42273..09367b64 100644 --- a/SRC/dgetri.f +++ b/SRC/dgetri.f @@ -1,7 +1,8 @@ SUBROUTINE DGETRI( N, A, LDA, IPIV, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgetrs.f b/SRC/dgetrs.f index f58ed025..927d25cb 100644 --- a/SRC/dgetrs.f +++ b/SRC/dgetrs.f @@ -1,7 +1,8 @@ SUBROUTINE DGETRS( TRANS, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dggbak.f b/SRC/dggbak.f index c39736e9..5718d5bb 100644 --- a/SRC/dggbak.f +++ b/SRC/dggbak.f @@ -2,7 +2,8 @@ $ LDV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dggbal.f b/SRC/dggbal.f index 5390e483..2c3bf70f 100644 --- a/SRC/dggbal.f +++ b/SRC/dggbal.f @@ -2,7 +2,8 @@ $ RSCALE, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgges.f b/SRC/dgges.f index eda39705..b888177a 100644 --- a/SRC/dgges.f +++ b/SRC/dgges.f @@ -3,7 +3,8 @@ $ LDVSR, WORK, LWORK, BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dggesx.f b/SRC/dggesx.f index 369d32a7..7b334345 100644 --- a/SRC/dggesx.f +++ b/SRC/dggesx.f @@ -3,9 +3,10 @@ $ VSR, LDVSR, RCONDE, RCONDV, WORK, LWORK, IWORK, $ LIWORK, BWORK, INFO ) * -* -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK driver routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. CHARACTER JOBVSL, JOBVSR, SENSE, SORT diff --git a/SRC/dggev.f b/SRC/dggev.f index 3384ddb8..6e5451f1 100644 --- a/SRC/dggev.f +++ b/SRC/dggev.f @@ -2,7 +2,8 @@ $ BETA, VL, LDVL, VR, LDVR, WORK, LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dggevx.f b/SRC/dggevx.f index f5304322..88c60f96 100644 --- a/SRC/dggevx.f +++ b/SRC/dggevx.f @@ -4,7 +4,8 @@ $ RCONDV, WORK, LWORK, IWORK, BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dggglm.f b/SRC/dggglm.f index 04a6a924..12a8208b 100644 --- a/SRC/dggglm.f +++ b/SRC/dggglm.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgghrd.f b/SRC/dgghrd.f index e73a8723..4d5ca181 100644 --- a/SRC/dgghrd.f +++ b/SRC/dgghrd.f @@ -2,7 +2,8 @@ $ LDQ, Z, LDZ, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgglse.f b/SRC/dgglse.f index d8c9e26d..8b80ddeb 100644 --- a/SRC/dgglse.f +++ b/SRC/dgglse.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dggqrf.f b/SRC/dggqrf.f index d503c4fb..edcdb6a7 100644 --- a/SRC/dggqrf.f +++ b/SRC/dggqrf.f @@ -2,7 +2,8 @@ $ LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dggrqf.f b/SRC/dggrqf.f index b83e1bec..da8ce675 100644 --- a/SRC/dggrqf.f +++ b/SRC/dggrqf.f @@ -2,7 +2,8 @@ $ LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dggsvd.f b/SRC/dggsvd.f index 0cee70cf..c03c4ca4 100644 --- a/SRC/dggsvd.f +++ b/SRC/dggsvd.f @@ -3,7 +3,8 @@ $ IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dggsvp.f b/SRC/dggsvp.f index 007b92fb..89f1e098 100644 --- a/SRC/dggsvp.f +++ b/SRC/dggsvp.f @@ -3,7 +3,8 @@ $ IWORK, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgsvj0.f b/SRC/dgsvj0.f index 4e66880b..482584b9 100644 --- a/SRC/dgsvj0.f +++ b/SRC/dgsvj0.f @@ -1,11 +1,11 @@ SUBROUTINE DGSVJ0( JOBV, M, N, A, LDA, D, SVA, MV, V, LDV, EPS, + SFMIN, TOL, NSWEEP, WORK, LWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Zlatko Drmac of the University of Zagreb and -- * -- Kresimir Veselic of the Fernuniversitaet Hagen -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/dgsvj1.f b/SRC/dgsvj1.f index 5a49206c..976cc7ac 100644 --- a/SRC/dgsvj1.f +++ b/SRC/dgsvj1.f @@ -1,11 +1,11 @@ SUBROUTINE DGSVJ1( JOBV, M, N, N1, A, LDA, D, SVA, MV, V, LDV, + EPS, SFMIN, TOL, NSWEEP, WORK, LWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Zlatko Drmac of the University of Zagreb and -- * -- Kresimir Veselic of the Fernuniversitaet Hagen -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/dgtcon.f b/SRC/dgtcon.f index 3d0ebd18..330a0c95 100644 --- a/SRC/dgtcon.f +++ b/SRC/dgtcon.f @@ -2,7 +2,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dgtrfs.f b/SRC/dgtrfs.f index 58104d1a..2bd9d217 100644 --- a/SRC/dgtrfs.f +++ b/SRC/dgtrfs.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dgtsv.f b/SRC/dgtsv.f index 2d8eaa53..ab6a9f5d 100644 --- a/SRC/dgtsv.f +++ b/SRC/dgtsv.f @@ -1,7 +1,8 @@ SUBROUTINE DGTSV( N, NRHS, DL, D, DU, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgtsvx.f b/SRC/dgtsvx.f index 9e7ed224..77879ebf 100644 --- a/SRC/dgtsvx.f +++ b/SRC/dgtsvx.f @@ -3,7 +3,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgttrf.f b/SRC/dgttrf.f index d7c48396..d12df005 100644 --- a/SRC/dgttrf.f +++ b/SRC/dgttrf.f @@ -1,7 +1,8 @@ SUBROUTINE DGTTRF( N, DL, D, DU, DU2, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgttrs.f b/SRC/dgttrs.f index 6daad190..1b83afd8 100644 --- a/SRC/dgttrs.f +++ b/SRC/dgttrs.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dgtts2.f b/SRC/dgtts2.f index 709c5bba..4e3bc5bc 100644 --- a/SRC/dgtts2.f +++ b/SRC/dgtts2.f @@ -1,7 +1,8 @@ SUBROUTINE DGTTS2( ITRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dhgeqz.f b/SRC/dhgeqz.f index 6ed505f8..97f78f25 100644 --- a/SRC/dhgeqz.f +++ b/SRC/dhgeqz.f @@ -2,9 +2,10 @@ $ ALPHAR, ALPHAI, BETA, Q, LDQ, Z, LDZ, WORK, $ LWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. CHARACTER COMPQ, COMPZ, JOB diff --git a/SRC/dhsein.f b/SRC/dhsein.f index 6b2767ac..77ba88ce 100644 --- a/SRC/dhsein.f +++ b/SRC/dhsein.f @@ -3,7 +3,8 @@ $ IFAILR, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/disnan.f b/SRC/disnan.f index 06c10845..8334cfcf 100644 --- a/SRC/disnan.f +++ b/SRC/disnan.f @@ -1,7 +1,8 @@ LOGICAL FUNCTION DISNAN(DIN) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dla_gbamv.f b/SRC/dla_gbamv.f index 30babea7..93471443 100644 --- a/SRC/dla_gbamv.f +++ b/SRC/dla_gbamv.f @@ -4,7 +4,7 @@ * -- LAPACK routine (version 3.2) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dla_gbrcond.f b/SRC/dla_gbrcond.f index 3fe18704..33c7ee34 100644 --- a/SRC/dla_gbrcond.f +++ b/SRC/dla_gbrcond.f @@ -5,7 +5,7 @@ * -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dla_gbrfsx_extended.f b/SRC/dla_gbrfsx_extended.f index be7e162b..bddd6942 100644 --- a/SRC/dla_gbrfsx_extended.f +++ b/SRC/dla_gbrfsx_extended.f @@ -6,10 +6,10 @@ $ Y_TAIL, RCOND, ITHRESH, RTHRESH, $ DZ_UB, IGNORE_CWISE, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dla_gbrpvgrw.f b/SRC/dla_gbrpvgrw.f index c0a79a3d..7bac0d16 100644 --- a/SRC/dla_gbrpvgrw.f +++ b/SRC/dla_gbrpvgrw.f @@ -1,10 +1,10 @@ DOUBLE PRECISION FUNCTION DLA_GBRPVGRW( N, KL, KU, NCOLS, AB, $ LDAB, AFB, LDAFB ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dla_geamv.f b/SRC/dla_geamv.f index af1e3bd2..a047f139 100644 --- a/SRC/dla_geamv.f +++ b/SRC/dla_geamv.f @@ -1,10 +1,10 @@ SUBROUTINE DLA_GEAMV ( TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, $ Y, INCY ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dla_gercond.f b/SRC/dla_gercond.f index 732cdd24..5e414037 100644 --- a/SRC/dla_gercond.f +++ b/SRC/dla_gercond.f @@ -2,10 +2,10 @@ $ LDAF, IPIV, CMODE, C, $ INFO, WORK, IWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dla_gerfsx_extended.f b/SRC/dla_gerfsx_extended.f index f5bd1048..ad4aa060 100644 --- a/SRC/dla_gerfsx_extended.f +++ b/SRC/dla_gerfsx_extended.f @@ -5,10 +5,10 @@ $ Y_TAIL, RCOND, ITHRESH, RTHRESH, $ DZ_UB, IGNORE_CWISE, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dla_lin_berr.f b/SRC/dla_lin_berr.f index 04163a15..dd526e92 100644 --- a/SRC/dla_lin_berr.f +++ b/SRC/dla_lin_berr.f @@ -1,9 +1,9 @@ SUBROUTINE DLA_LIN_BERR ( N, NZ, NRHS, RES, AYB, BERR ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dla_porcond.f b/SRC/dla_porcond.f index be4b0613..b914482f 100644 --- a/SRC/dla_porcond.f +++ b/SRC/dla_porcond.f @@ -2,10 +2,10 @@ $ CMODE, C, INFO, WORK, $ IWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dla_porfsx_extended.f b/SRC/dla_porfsx_extended.f index 1bdcaa69..f9056af0 100644 --- a/SRC/dla_porfsx_extended.f +++ b/SRC/dla_porfsx_extended.f @@ -6,10 +6,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dla_porpvgrw.f b/SRC/dla_porpvgrw.f index dc17d30f..069e2d60 100644 --- a/SRC/dla_porpvgrw.f +++ b/SRC/dla_porpvgrw.f @@ -1,10 +1,10 @@ DOUBLE PRECISION FUNCTION DLA_PORPVGRW( UPLO, NCOLS, A, LDA, AF, $ LDAF, WORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dla_rpvgrw.f b/SRC/dla_rpvgrw.f index 92faa67a..f2a80678 100644 --- a/SRC/dla_rpvgrw.f +++ b/SRC/dla_rpvgrw.f @@ -1,9 +1,9 @@ DOUBLE PRECISION FUNCTION DLA_RPVGRW( N, NCOLS, A, LDA, AF, LDAF ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dla_syamv.f b/SRC/dla_syamv.f index 0a51d18a..f0ce64fd 100644 --- a/SRC/dla_syamv.f +++ b/SRC/dla_syamv.f @@ -1,10 +1,10 @@ SUBROUTINE DLA_SYAMV( UPLO, N, ALPHA, A, LDA, X, INCX, BETA, Y, $ INCY ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dla_syrcond.f b/SRC/dla_syrcond.f index 3ce366e0..c61f6b0e 100644 --- a/SRC/dla_syrcond.f +++ b/SRC/dla_syrcond.f @@ -2,10 +2,10 @@ $ IPIV, CMODE, C, INFO, WORK, $ IWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dla_syrfsx_extended.f b/SRC/dla_syrfsx_extended.f index 0a892aa3..b6da8e54 100644 --- a/SRC/dla_syrfsx_extended.f +++ b/SRC/dla_syrfsx_extended.f @@ -6,10 +6,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dla_syrpvgrw.f b/SRC/dla_syrpvgrw.f index d3899fa7..d6ea5c22 100644 --- a/SRC/dla_syrpvgrw.f +++ b/SRC/dla_syrpvgrw.f @@ -1,10 +1,10 @@ DOUBLE PRECISION FUNCTION DLA_SYRPVGRW( UPLO, N, INFO, A, LDA, AF, $ LDAF, IPIV, WORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dla_wwaddw.f b/SRC/dla_wwaddw.f index 5c3d79a7..c80c40f3 100644 --- a/SRC/dla_wwaddw.f +++ b/SRC/dla_wwaddw.f @@ -1,9 +1,9 @@ SUBROUTINE DLA_WWADDW( N, X, Y, W ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dlabad.f b/SRC/dlabad.f index ea18855c..8eb5ce4f 100644 --- a/SRC/dlabad.f +++ b/SRC/dlabad.f @@ -1,7 +1,8 @@ SUBROUTINE DLABAD( SMALL, LARGE ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlabrd.f b/SRC/dlabrd.f index fb786e3f..f48ee892 100644 --- a/SRC/dlabrd.f +++ b/SRC/dlabrd.f @@ -2,7 +2,8 @@ $ LDY ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlacn2.f b/SRC/dlacn2.f index 8a9f2b41..26b8f3c7 100644 --- a/SRC/dlacn2.f +++ b/SRC/dlacn2.f @@ -1,7 +1,8 @@ SUBROUTINE DLACN2( N, V, X, ISGN, EST, KASE, ISAVE ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlacon.f b/SRC/dlacon.f index b7d7d438..98c56831 100644 --- a/SRC/dlacon.f +++ b/SRC/dlacon.f @@ -1,7 +1,8 @@ SUBROUTINE DLACON( N, V, X, ISGN, EST, KASE ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlacpy.f b/SRC/dlacpy.f index 75f979f0..94694de5 100644 --- a/SRC/dlacpy.f +++ b/SRC/dlacpy.f @@ -1,7 +1,8 @@ SUBROUTINE DLACPY( UPLO, M, N, A, LDA, B, LDB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dladiv.f b/SRC/dladiv.f index 641d3428..7a96bfc3 100644 --- a/SRC/dladiv.f +++ b/SRC/dladiv.f @@ -1,7 +1,8 @@ SUBROUTINE DLADIV( A, B, C, D, P, Q ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlae2.f b/SRC/dlae2.f index 98beeda1..a1e47519 100644 --- a/SRC/dlae2.f +++ b/SRC/dlae2.f @@ -1,7 +1,8 @@ SUBROUTINE DLAE2( A, B, C, RT1, RT2 ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaebz.f b/SRC/dlaebz.f index c1e08dfc..bb799de6 100644 --- a/SRC/dlaebz.f +++ b/SRC/dlaebz.f @@ -3,7 +3,8 @@ $ NAB, WORK, IWORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaed0.f b/SRC/dlaed0.f index 6a237cfd..86255b72 100644 --- a/SRC/dlaed0.f +++ b/SRC/dlaed0.f @@ -2,7 +2,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaed1.f b/SRC/dlaed1.f index 88bc6af0..ad45f6ef 100644 --- a/SRC/dlaed1.f +++ b/SRC/dlaed1.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaed2.f b/SRC/dlaed2.f index 8926ad9a..21e2c03f 100644 --- a/SRC/dlaed2.f +++ b/SRC/dlaed2.f @@ -2,7 +2,8 @@ $ Q2, INDX, INDXC, INDXP, COLTYP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaed3.f b/SRC/dlaed3.f index 3f668f8c..41c4695b 100644 --- a/SRC/dlaed3.f +++ b/SRC/dlaed3.f @@ -2,7 +2,8 @@ $ CTOT, W, S, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaed4.f b/SRC/dlaed4.f index a257e5e1..bb90ab13 100644 --- a/SRC/dlaed4.f +++ b/SRC/dlaed4.f @@ -1,7 +1,8 @@ SUBROUTINE DLAED4( N, I, D, Z, DELTA, RHO, DLAM, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaed5.f b/SRC/dlaed5.f index 26e352de..5890dd49 100644 --- a/SRC/dlaed5.f +++ b/SRC/dlaed5.f @@ -1,7 +1,8 @@ SUBROUTINE DLAED5( I, D, Z, DELTA, RHO, DLAM ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaed6.f b/SRC/dlaed6.f index 7262cada..4722304e 100644 --- a/SRC/dlaed6.f +++ b/SRC/dlaed6.f @@ -1,7 +1,8 @@ SUBROUTINE DLAED6( KNITER, ORGATI, RHO, D, Z, FINIT, TAU, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * February 2007 * * .. Scalar Arguments .. diff --git a/SRC/dlaed7.f b/SRC/dlaed7.f index 5e623ddb..72a52a43 100644 --- a/SRC/dlaed7.f +++ b/SRC/dlaed7.f @@ -4,7 +4,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaed8.f b/SRC/dlaed8.f index 9e1389b7..7f2dc584 100644 --- a/SRC/dlaed8.f +++ b/SRC/dlaed8.f @@ -3,7 +3,8 @@ $ GIVCOL, GIVNUM, INDXP, INDX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaed9.f b/SRC/dlaed9.f index a7290233..e9eb7baf 100644 --- a/SRC/dlaed9.f +++ b/SRC/dlaed9.f @@ -2,7 +2,8 @@ $ S, LDS, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaeda.f b/SRC/dlaeda.f index fdff90cd..7c02f2a4 100644 --- a/SRC/dlaeda.f +++ b/SRC/dlaeda.f @@ -2,7 +2,8 @@ $ GIVCOL, GIVNUM, Q, QPTR, Z, ZTEMP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaein.f b/SRC/dlaein.f index ba63809f..1335f60b 100644 --- a/SRC/dlaein.f +++ b/SRC/dlaein.f @@ -2,7 +2,8 @@ $ LDB, WORK, EPS3, SMLNUM, BIGNUM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaev2.f b/SRC/dlaev2.f index c744adf0..23f85b30 100644 --- a/SRC/dlaev2.f +++ b/SRC/dlaev2.f @@ -1,7 +1,8 @@ SUBROUTINE DLAEV2( A, B, C, RT1, RT2, CS1, SN1 ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaexc.f b/SRC/dlaexc.f index d4bb9dd9..d69390c7 100644 --- a/SRC/dlaexc.f +++ b/SRC/dlaexc.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlag2.f b/SRC/dlag2.f index c2267a74..4e21196b 100644 --- a/SRC/dlag2.f +++ b/SRC/dlag2.f @@ -2,7 +2,8 @@ $ WR2, WI ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlag2s.f b/SRC/dlag2s.f index db8c84cb..af47befb 100644 --- a/SRC/dlag2s.f +++ b/SRC/dlag2s.f @@ -1,7 +1,8 @@ SUBROUTINE DLAG2S( M, N, A, LDA, SA, LDSA, INFO ) * * -- LAPACK PROTOTYPE auxiliary routine (version 3.1.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * August 2007 * * .. diff --git a/SRC/dlags2.f b/SRC/dlags2.f index a77482d7..2e1ccf00 100644 --- a/SRC/dlags2.f +++ b/SRC/dlags2.f @@ -2,7 +2,8 @@ $ SNV, CSQ, SNQ ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlagtf.f b/SRC/dlagtf.f index ba3b2f1f..09216dfc 100644 --- a/SRC/dlagtf.f +++ b/SRC/dlagtf.f @@ -1,7 +1,8 @@ SUBROUTINE DLAGTF( N, A, LAMBDA, B, C, TOL, D, IN, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlagtm.f b/SRC/dlagtm.f index 91724239..5c8ee6e8 100644 --- a/SRC/dlagtm.f +++ b/SRC/dlagtm.f @@ -2,7 +2,8 @@ $ B, LDB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlagts.f b/SRC/dlagts.f index 398f6e32..be33157b 100644 --- a/SRC/dlagts.f +++ b/SRC/dlagts.f @@ -1,7 +1,8 @@ SUBROUTINE DLAGTS( JOB, N, A, B, C, D, IN, Y, TOL, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlagv2.f b/SRC/dlagv2.f index 6f0e51b8..90bbf8ad 100644 --- a/SRC/dlagv2.f +++ b/SRC/dlagv2.f @@ -2,7 +2,8 @@ $ CSR, SNR ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlahr2.f b/SRC/dlahr2.f index dd687076..c5363d4a 100644 --- a/SRC/dlahr2.f +++ b/SRC/dlahr2.f @@ -1,8 +1,9 @@ SUBROUTINE DLAHR2( N, K, NB, A, LDA, TAU, T, LDT, Y, LDY ) * -* -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK auxiliary routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. INTEGER K, LDA, LDT, LDY, N, NB diff --git a/SRC/dlahrd.f b/SRC/dlahrd.f index a510f5f7..2e46e2fb 100644 --- a/SRC/dlahrd.f +++ b/SRC/dlahrd.f @@ -1,7 +1,8 @@ SUBROUTINE DLAHRD( N, K, NB, A, LDA, TAU, T, LDT, Y, LDY ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaic1.f b/SRC/dlaic1.f index 97cafff5..bcd4bd2e 100644 --- a/SRC/dlaic1.f +++ b/SRC/dlaic1.f @@ -1,7 +1,8 @@ SUBROUTINE DLAIC1( JOB, J, X, SEST, W, GAMMA, SESTPR, S, C ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaisnan.f b/SRC/dlaisnan.f index 40ed433b..6cac0a31 100644 --- a/SRC/dlaisnan.f +++ b/SRC/dlaisnan.f @@ -1,7 +1,8 @@ LOGICAL FUNCTION DLAISNAN(DIN1,DIN2) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaln2.f b/SRC/dlaln2.f index 991d59b8..4e38e4d0 100644 --- a/SRC/dlaln2.f +++ b/SRC/dlaln2.f @@ -2,7 +2,8 @@ $ LDB, WR, WI, X, LDX, SCALE, XNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlals0.f b/SRC/dlals0.f index d3f0da17..22f74610 100644 --- a/SRC/dlals0.f +++ b/SRC/dlals0.f @@ -3,7 +3,8 @@ $ POLES, DIFL, DIFR, Z, K, C, S, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlalsa.f b/SRC/dlalsa.f index e2e85ed7..83751a6d 100644 --- a/SRC/dlalsa.f +++ b/SRC/dlalsa.f @@ -4,7 +4,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlalsd.f b/SRC/dlalsd.f index 48a9b142..3c601477 100644 --- a/SRC/dlalsd.f +++ b/SRC/dlalsd.f @@ -2,7 +2,8 @@ $ RANK, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlamrg.f b/SRC/dlamrg.f index ce026ff2..e634821f 100644 --- a/SRC/dlamrg.f +++ b/SRC/dlamrg.f @@ -1,7 +1,8 @@ SUBROUTINE DLAMRG( N1, N2, A, DTRD1, DTRD2, INDEX ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaneg.f b/SRC/dlaneg.f index cb895a15..ce78eca4 100644 --- a/SRC/dlaneg.f +++ b/SRC/dlaneg.f @@ -3,7 +3,8 @@ INTEGER DLANEG * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlangb.f b/SRC/dlangb.f index a859c58b..60bda8e1 100644 --- a/SRC/dlangb.f +++ b/SRC/dlangb.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlange.f b/SRC/dlange.f index 22c1aea3..471c2371 100644 --- a/SRC/dlange.f +++ b/SRC/dlange.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION DLANGE( NORM, M, N, A, LDA, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlangt.f b/SRC/dlangt.f index 172c13a4..7b5f6e8b 100644 --- a/SRC/dlangt.f +++ b/SRC/dlangt.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION DLANGT( NORM, N, DL, D, DU ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlanhs.f b/SRC/dlanhs.f index b0928fdb..32070964 100644 --- a/SRC/dlanhs.f +++ b/SRC/dlanhs.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION DLANHS( NORM, N, A, LDA, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlansb.f b/SRC/dlansb.f index fa1f90be..0191008a 100644 --- a/SRC/dlansb.f +++ b/SRC/dlansb.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlansf.f b/SRC/dlansf.f index 2e0354bf..586a2e95 100644 --- a/SRC/dlansf.f +++ b/SRC/dlansf.f @@ -1,9 +1,9 @@ DOUBLE PRECISION FUNCTION DLANSF( NORM, TRANSR, UPLO, N, A, WORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/dlansp.f b/SRC/dlansp.f index 287f86bb..3f456cde 100644 --- a/SRC/dlansp.f +++ b/SRC/dlansp.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION DLANSP( NORM, UPLO, N, AP, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlanst.f b/SRC/dlanst.f index a6906ca7..b5acf1da 100644 --- a/SRC/dlanst.f +++ b/SRC/dlanst.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION DLANST( NORM, N, D, E ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlansy.f b/SRC/dlansy.f index 36bf82a2..4aa14856 100644 --- a/SRC/dlansy.f +++ b/SRC/dlansy.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION DLANSY( NORM, UPLO, N, A, LDA, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlantb.f b/SRC/dlantb.f index dacfd701..7c2c023e 100644 --- a/SRC/dlantb.f +++ b/SRC/dlantb.f @@ -2,7 +2,8 @@ $ LDAB, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlantp.f b/SRC/dlantp.f index 0676a501..de04ca51 100644 --- a/SRC/dlantp.f +++ b/SRC/dlantp.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION DLANTP( NORM, UPLO, DIAG, N, AP, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlantr.f b/SRC/dlantr.f index 5e7fd598..775e0948 100644 --- a/SRC/dlantr.f +++ b/SRC/dlantr.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlanv2.f b/SRC/dlanv2.f index a07f86ac..d0fd0dc3 100644 --- a/SRC/dlanv2.f +++ b/SRC/dlanv2.f @@ -1,7 +1,8 @@ SUBROUTINE DLANV2( A, B, C, D, RT1R, RT1I, RT2R, RT2I, CS, SN ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlapll.f b/SRC/dlapll.f index 583a9247..76ed6e1c 100644 --- a/SRC/dlapll.f +++ b/SRC/dlapll.f @@ -1,7 +1,8 @@ SUBROUTINE DLAPLL( N, X, INCX, Y, INCY, SSMIN ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlapmt.f b/SRC/dlapmt.f index a55fdb40..ffa1cefa 100644 --- a/SRC/dlapmt.f +++ b/SRC/dlapmt.f @@ -1,7 +1,8 @@ SUBROUTINE DLAPMT( FORWRD, M, N, X, LDX, K ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlapy2.f b/SRC/dlapy2.f index 6cd95749..c44b267a 100644 --- a/SRC/dlapy2.f +++ b/SRC/dlapy2.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION DLAPY2( X, Y ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlapy3.f b/SRC/dlapy3.f index 11a6def9..696bffdd 100644 --- a/SRC/dlapy3.f +++ b/SRC/dlapy3.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION DLAPY3( X, Y, Z ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaqgb.f b/SRC/dlaqgb.f index 390a399e..9addce26 100644 --- a/SRC/dlaqgb.f +++ b/SRC/dlaqgb.f @@ -2,7 +2,8 @@ $ AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaqge.f b/SRC/dlaqge.f index eacfc6c9..b3e2734a 100644 --- a/SRC/dlaqge.f +++ b/SRC/dlaqge.f @@ -2,7 +2,8 @@ $ EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaqp2.f b/SRC/dlaqp2.f index cb2e23f6..df455d20 100644 --- a/SRC/dlaqp2.f +++ b/SRC/dlaqp2.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaqps.f b/SRC/dlaqps.f index 49a4d2b3..9e00472c 100644 --- a/SRC/dlaqps.f +++ b/SRC/dlaqps.f @@ -2,7 +2,8 @@ $ VN2, AUXV, F, LDF ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaqr2.f b/SRC/dlaqr2.f index 257e25c1..882c3247 100644 --- a/SRC/dlaqr2.f +++ b/SRC/dlaqr2.f @@ -2,9 +2,9 @@ $ IHIZ, Z, LDZ, NS, ND, SR, SI, V, LDV, NH, T, $ LDT, NV, WV, LDWV, WORK, LWORK ) * -* -- LAPACK auxiliary routine (version 3.2) -- +* -- LAPACK auxiliary routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd.. -* November 2006 +* -- April 2009 -- * * .. Scalar Arguments .. INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV, diff --git a/SRC/dlaqr3.f b/SRC/dlaqr3.f index 52b5999f..86ed6664 100644 --- a/SRC/dlaqr3.f +++ b/SRC/dlaqr3.f @@ -2,9 +2,9 @@ $ IHIZ, Z, LDZ, NS, ND, SR, SI, V, LDV, NH, T, $ LDT, NV, WV, LDWV, WORK, LWORK ) * -* -- LAPACK auxiliary routine (version 3.2) -- +* -- LAPACK auxiliary routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd.. -* November 2006 +* -- April 2009 -- * * .. Scalar Arguments .. INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV, diff --git a/SRC/dlaqr5.f b/SRC/dlaqr5.f index 53c3101d..3e57eb05 100644 --- a/SRC/dlaqr5.f +++ b/SRC/dlaqr5.f @@ -3,7 +3,8 @@ $ LDU, NV, WV, LDWV, NH, WH, LDWH ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaqsb.f b/SRC/dlaqsb.f index 9cf849e3..a57db191 100644 --- a/SRC/dlaqsb.f +++ b/SRC/dlaqsb.f @@ -1,7 +1,8 @@ SUBROUTINE DLAQSB( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaqsp.f b/SRC/dlaqsp.f index aeb63ae3..7cfad592 100644 --- a/SRC/dlaqsp.f +++ b/SRC/dlaqsp.f @@ -1,7 +1,8 @@ SUBROUTINE DLAQSP( UPLO, N, AP, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaqsy.f b/SRC/dlaqsy.f index d1ddf87e..68779cac 100644 --- a/SRC/dlaqsy.f +++ b/SRC/dlaqsy.f @@ -1,7 +1,8 @@ SUBROUTINE DLAQSY( UPLO, N, A, LDA, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaqtr.f b/SRC/dlaqtr.f index 97bb520a..e56a1c23 100644 --- a/SRC/dlaqtr.f +++ b/SRC/dlaqtr.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlar1v.f b/SRC/dlar1v.f index 799381d8..7dfaabfe 100644 --- a/SRC/dlar1v.f +++ b/SRC/dlar1v.f @@ -3,7 +3,8 @@ $ R, ISUPPZ, NRMINV, RESID, RQCORR, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlar2v.f b/SRC/dlar2v.f index e3cbd0ec..3ead67d2 100644 --- a/SRC/dlar2v.f +++ b/SRC/dlar2v.f @@ -1,7 +1,8 @@ SUBROUTINE DLAR2V( N, X, Y, Z, INCX, C, S, INCC ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarf.f b/SRC/dlarf.f index c150b270..2223d71b 100644 --- a/SRC/dlarf.f +++ b/SRC/dlarf.f @@ -2,7 +2,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarfb.f b/SRC/dlarfb.f index a375bb6b..ca7ab0d8 100644 --- a/SRC/dlarfb.f +++ b/SRC/dlarfb.f @@ -3,7 +3,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarfg.f b/SRC/dlarfg.f index 00711492..36e5d89e 100644 --- a/SRC/dlarfg.f +++ b/SRC/dlarfg.f @@ -1,7 +1,8 @@ SUBROUTINE DLARFG( N, ALPHA, X, INCX, TAU ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarfp.f b/SRC/dlarfp.f index 95ac70e2..e9015a78 100644 --- a/SRC/dlarfp.f +++ b/SRC/dlarfp.f @@ -1,7 +1,8 @@ SUBROUTINE DLARFP( N, ALPHA, X, INCX, TAU ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarft.f b/SRC/dlarft.f index 1277ca13..9b05e869 100644 --- a/SRC/dlarft.f +++ b/SRC/dlarft.f @@ -2,7 +2,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarfx.f b/SRC/dlarfx.f index 0a40a099..6f056e13 100644 --- a/SRC/dlarfx.f +++ b/SRC/dlarfx.f @@ -2,7 +2,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlargv.f b/SRC/dlargv.f index 766216a3..84293261 100644 --- a/SRC/dlargv.f +++ b/SRC/dlargv.f @@ -1,7 +1,8 @@ SUBROUTINE DLARGV( N, X, INCX, Y, INCY, C, INCC ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarnv.f b/SRC/dlarnv.f index cfaa4d62..c8b421c2 100644 --- a/SRC/dlarnv.f +++ b/SRC/dlarnv.f @@ -1,7 +1,8 @@ SUBROUTINE DLARNV( IDIST, ISEED, N, X ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarra.f b/SRC/dlarra.f index 63f512bc..3e865912 100644 --- a/SRC/dlarra.f +++ b/SRC/dlarra.f @@ -3,7 +3,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarrb.f b/SRC/dlarrb.f index ab022a45..d879cae2 100644 --- a/SRC/dlarrb.f +++ b/SRC/dlarrb.f @@ -3,7 +3,8 @@ $ PIVMIN, SPDIAM, TWIST, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarrc.f b/SRC/dlarrc.f index 9897a499..c67c6ed3 100644 --- a/SRC/dlarrc.f +++ b/SRC/dlarrc.f @@ -2,7 +2,8 @@ $ EIGCNT, LCNT, RCNT, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarrd.f b/SRC/dlarrd.f index d4b2e7ba..12a63acd 100644 --- a/SRC/dlarrd.f +++ b/SRC/dlarrd.f @@ -3,9 +3,10 @@ $ M, W, WERR, WL, WU, IBLOCK, INDEXW, $ WORK, IWORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK auxiliary routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. CHARACTER ORDER, RANGE diff --git a/SRC/dlarre.f b/SRC/dlarre.f index 0487bd12..9d330374 100644 --- a/SRC/dlarre.f +++ b/SRC/dlarre.f @@ -5,7 +5,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarrf.f b/SRC/dlarrf.f index 6817ac05..29c2c954 100644 --- a/SRC/dlarrf.f +++ b/SRC/dlarrf.f @@ -4,7 +4,8 @@ $ DPLUS, LPLUS, WORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 ** * .. Scalar Arguments .. diff --git a/SRC/dlarrj.f b/SRC/dlarrj.f index 920f2cf2..64a79c30 100644 --- a/SRC/dlarrj.f +++ b/SRC/dlarrj.f @@ -3,7 +3,8 @@ $ PIVMIN, SPDIAM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarrk.f b/SRC/dlarrk.f index a3ade115..d0a2da59 100644 --- a/SRC/dlarrk.f +++ b/SRC/dlarrk.f @@ -3,7 +3,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarrr.f b/SRC/dlarrr.f index 9b6c7e16..c888edb4 100644 --- a/SRC/dlarrr.f +++ b/SRC/dlarrr.f @@ -1,7 +1,8 @@ SUBROUTINE DLARRR( N, D, E, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarrv.f b/SRC/dlarrv.f index 6b30f625..782fcb45 100644 --- a/SRC/dlarrv.f +++ b/SRC/dlarrv.f @@ -5,7 +5,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarscl2.f b/SRC/dlarscl2.f index b0dca822..1c7a54d5 100644 --- a/SRC/dlarscl2.f +++ b/SRC/dlarscl2.f @@ -1,9 +1,9 @@ SUBROUTINE DLARSCL2 ( M, N, D, X, LDX ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dlartg.f b/SRC/dlartg.f index d6876e11..b708beda 100644 --- a/SRC/dlartg.f +++ b/SRC/dlartg.f @@ -1,7 +1,8 @@ SUBROUTINE DLARTG( F, G, CS, SN, R ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlartv.f b/SRC/dlartv.f index dda512bb..0a782246 100644 --- a/SRC/dlartv.f +++ b/SRC/dlartv.f @@ -1,7 +1,8 @@ SUBROUTINE DLARTV( N, X, INCX, Y, INCY, C, S, INCC ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaruv.f b/SRC/dlaruv.f index d8d5cb09..22d05316 100644 --- a/SRC/dlaruv.f +++ b/SRC/dlaruv.f @@ -1,7 +1,8 @@ SUBROUTINE DLARUV( ISEED, N, X ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarz.f b/SRC/dlarz.f index 90eb8a5e..1b6570fa 100644 --- a/SRC/dlarz.f +++ b/SRC/dlarz.f @@ -1,7 +1,8 @@ SUBROUTINE DLARZ( SIDE, M, N, L, V, INCV, TAU, C, LDC, WORK ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarzb.f b/SRC/dlarzb.f index ba51614c..9fc839d4 100644 --- a/SRC/dlarzb.f +++ b/SRC/dlarzb.f @@ -2,7 +2,8 @@ $ LDV, T, LDT, C, LDC, WORK, LDWORK ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlarzt.f b/SRC/dlarzt.f index 023ed937..0f734754 100644 --- a/SRC/dlarzt.f +++ b/SRC/dlarzt.f @@ -1,7 +1,8 @@ SUBROUTINE DLARZT( DIRECT, STOREV, N, K, V, LDV, TAU, T, LDT ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlas2.f b/SRC/dlas2.f index c2a40cf7..27e09b44 100644 --- a/SRC/dlas2.f +++ b/SRC/dlas2.f @@ -1,7 +1,8 @@ SUBROUTINE DLAS2( F, G, H, SSMIN, SSMAX ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlascl.f b/SRC/dlascl.f index 0b0de27a..7cafd731 100644 --- a/SRC/dlascl.f +++ b/SRC/dlascl.f @@ -1,7 +1,8 @@ SUBROUTINE DLASCL( TYPE, KL, KU, CFROM, CTO, M, N, A, LDA, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlascl2.f b/SRC/dlascl2.f index acc2782a..eefccbbf 100644 --- a/SRC/dlascl2.f +++ b/SRC/dlascl2.f @@ -1,9 +1,9 @@ SUBROUTINE DLASCL2 ( M, N, D, X, LDX ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dlasd0.f b/SRC/dlasd0.f index 8a931e3d..be36c3c9 100644 --- a/SRC/dlasd0.f +++ b/SRC/dlasd0.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlasd1.f b/SRC/dlasd1.f index 0c33dc7c..62b4310a 100644 --- a/SRC/dlasd1.f +++ b/SRC/dlasd1.f @@ -2,7 +2,8 @@ $ IDXQ, IWORK, WORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlasd2.f b/SRC/dlasd2.f index 9a0b5881..caeaff06 100644 --- a/SRC/dlasd2.f +++ b/SRC/dlasd2.f @@ -3,7 +3,8 @@ $ IDXC, IDXQ, COLTYP, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlasd3.f b/SRC/dlasd3.f index e4932f60..75800d8b 100644 --- a/SRC/dlasd3.f +++ b/SRC/dlasd3.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlasd4.f b/SRC/dlasd4.f index dca05803..666e35aa 100644 --- a/SRC/dlasd4.f +++ b/SRC/dlasd4.f @@ -1,7 +1,8 @@ SUBROUTINE DLASD4( N, I, D, Z, DELTA, RHO, SIGMA, WORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlasd5.f b/SRC/dlasd5.f index acb15fbe..77244511 100644 --- a/SRC/dlasd5.f +++ b/SRC/dlasd5.f @@ -1,7 +1,8 @@ SUBROUTINE DLASD5( I, D, Z, DELTA, RHO, DSIGMA, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlasd6.f b/SRC/dlasd6.f index 776868b3..13c0aa88 100644 --- a/SRC/dlasd6.f +++ b/SRC/dlasd6.f @@ -4,7 +4,8 @@ $ IWORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlasd7.f b/SRC/dlasd7.f index 34ec10a1..45e4e4f8 100644 --- a/SRC/dlasd7.f +++ b/SRC/dlasd7.f @@ -4,7 +4,8 @@ $ C, S, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlasd8.f b/SRC/dlasd8.f index 710c0bf9..b28a4f03 100644 --- a/SRC/dlasd8.f +++ b/SRC/dlasd8.f @@ -2,7 +2,8 @@ $ DSIGMA, WORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * October 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlasda.f b/SRC/dlasda.f index 4061808b..9ae2b6a2 100644 --- a/SRC/dlasda.f +++ b/SRC/dlasda.f @@ -3,7 +3,8 @@ $ PERM, GIVNUM, C, S, WORK, IWORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlasdq.f b/SRC/dlasdq.f index 62774e42..4bd85263 100644 --- a/SRC/dlasdq.f +++ b/SRC/dlasdq.f @@ -2,7 +2,8 @@ $ U, LDU, C, LDC, WORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlasdt.f b/SRC/dlasdt.f index 9033fa49..38aa6dad 100644 --- a/SRC/dlasdt.f +++ b/SRC/dlasdt.f @@ -1,7 +1,8 @@ SUBROUTINE DLASDT( N, LVL, ND, INODE, NDIML, NDIMR, MSUB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaset.f b/SRC/dlaset.f index 662cca3b..9648dd00 100644 --- a/SRC/dlaset.f +++ b/SRC/dlaset.f @@ -1,7 +1,8 @@ SUBROUTINE DLASET( UPLO, M, N, ALPHA, BETA, A, LDA ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlasr.f b/SRC/dlasr.f index ac434acf..4c0d868b 100644 --- a/SRC/dlasr.f +++ b/SRC/dlasr.f @@ -1,7 +1,8 @@ SUBROUTINE DLASR( SIDE, PIVOT, DIRECT, M, N, C, S, A, LDA ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlasrt.f b/SRC/dlasrt.f index 32caf895..90eda0cd 100644 --- a/SRC/dlasrt.f +++ b/SRC/dlasrt.f @@ -1,7 +1,8 @@ SUBROUTINE DLASRT( ID, N, D, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlassq.f b/SRC/dlassq.f index 976f638c..51cce918 100644 --- a/SRC/dlassq.f +++ b/SRC/dlassq.f @@ -1,7 +1,8 @@ SUBROUTINE DLASSQ( N, X, INCX, SCALE, SUMSQ ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlasv2.f b/SRC/dlasv2.f index ec9e27cc..ca725340 100644 --- a/SRC/dlasv2.f +++ b/SRC/dlasv2.f @@ -1,7 +1,8 @@ SUBROUTINE DLASV2( F, G, H, SSMIN, SSMAX, SNR, CSR, SNL, CSL ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlaswp.f b/SRC/dlaswp.f index 524a9171..5239ba1f 100644 --- a/SRC/dlaswp.f +++ b/SRC/dlaswp.f @@ -1,7 +1,8 @@ SUBROUTINE DLASWP( N, A, LDA, K1, K2, IPIV, INCX ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlasy2.f b/SRC/dlasy2.f index 1d59e8f2..db53ca4a 100644 --- a/SRC/dlasy2.f +++ b/SRC/dlasy2.f @@ -2,7 +2,8 @@ $ LDTR, B, LDB, SCALE, X, LDX, XNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlasyf.f b/SRC/dlasyf.f index a9997be8..0e817cbf 100644 --- a/SRC/dlasyf.f +++ b/SRC/dlasyf.f @@ -1,7 +1,8 @@ SUBROUTINE DLASYF( UPLO, N, NB, KB, A, LDA, IPIV, W, LDW, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlat2s.f b/SRC/dlat2s.f index e5bc1328..887b370d 100644 --- a/SRC/dlat2s.f +++ b/SRC/dlat2s.f @@ -1,7 +1,8 @@ SUBROUTINE DLAT2S( UPLO, N, A, LDA, SA, LDSA, INFO ) * * -- LAPACK PROTOTYPE auxiliary routine (version 3.1.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * May 2007 * * .. Scalar Arguments .. diff --git a/SRC/dlatbs.f b/SRC/dlatbs.f index 5fcaf80b..ded346ee 100644 --- a/SRC/dlatbs.f +++ b/SRC/dlatbs.f @@ -2,7 +2,8 @@ $ SCALE, CNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlatdf.f b/SRC/dlatdf.f index 49494c7b..0a3b4a9d 100644 --- a/SRC/dlatdf.f +++ b/SRC/dlatdf.f @@ -2,7 +2,8 @@ $ JPIV ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlatps.f b/SRC/dlatps.f index f33b0cf1..02671dc6 100644 --- a/SRC/dlatps.f +++ b/SRC/dlatps.f @@ -2,7 +2,8 @@ $ CNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlatrd.f b/SRC/dlatrd.f index 96b8048b..1b5b603a 100644 --- a/SRC/dlatrd.f +++ b/SRC/dlatrd.f @@ -1,7 +1,8 @@ SUBROUTINE DLATRD( UPLO, N, NB, A, LDA, E, TAU, W, LDW ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlatrs.f b/SRC/dlatrs.f index b530b32d..de70c1f5 100644 --- a/SRC/dlatrs.f +++ b/SRC/dlatrs.f @@ -2,7 +2,8 @@ $ CNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlatrz.f b/SRC/dlatrz.f index 09f9a517..ca749356 100644 --- a/SRC/dlatrz.f +++ b/SRC/dlatrz.f @@ -1,7 +1,8 @@ SUBROUTINE DLATRZ( M, N, L, A, LDA, TAU, WORK ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlatzm.f b/SRC/dlatzm.f index 78cc44a3..2d735fe3 100644 --- a/SRC/dlatzm.f +++ b/SRC/dlatzm.f @@ -1,7 +1,8 @@ SUBROUTINE DLATZM( SIDE, M, N, V, INCV, TAU, C1, C2, LDC, WORK ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlauu2.f b/SRC/dlauu2.f index e800acb2..77bda092 100644 --- a/SRC/dlauu2.f +++ b/SRC/dlauu2.f @@ -1,7 +1,8 @@ SUBROUTINE DLAUU2( UPLO, N, A, LDA, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dlauum.f b/SRC/dlauum.f index ea93f9a2..21734b79 100644 --- a/SRC/dlauum.f +++ b/SRC/dlauum.f @@ -1,7 +1,8 @@ SUBROUTINE DLAUUM( UPLO, N, A, LDA, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dopgtr.f b/SRC/dopgtr.f index 237cdb6f..7d7aaf80 100644 --- a/SRC/dopgtr.f +++ b/SRC/dopgtr.f @@ -1,7 +1,8 @@ SUBROUTINE DOPGTR( UPLO, N, AP, TAU, Q, LDQ, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dopmtr.f b/SRC/dopmtr.f index bf59dee2..715d9f00 100644 --- a/SRC/dopmtr.f +++ b/SRC/dopmtr.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dorg2l.f b/SRC/dorg2l.f index 441b83b1..9d9eb97a 100644 --- a/SRC/dorg2l.f +++ b/SRC/dorg2l.f @@ -1,7 +1,8 @@ SUBROUTINE DORG2L( M, N, K, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dorg2r.f b/SRC/dorg2r.f index 3dd4005b..14a543ef 100644 --- a/SRC/dorg2r.f +++ b/SRC/dorg2r.f @@ -1,7 +1,8 @@ SUBROUTINE DORG2R( M, N, K, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dorgbr.f b/SRC/dorgbr.f index 46fc5090..0e7e884f 100644 --- a/SRC/dorgbr.f +++ b/SRC/dorgbr.f @@ -1,7 +1,8 @@ SUBROUTINE DORGBR( VECT, M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dorghr.f b/SRC/dorghr.f index 41c11280..8676f965 100644 --- a/SRC/dorghr.f +++ b/SRC/dorghr.f @@ -1,7 +1,8 @@ SUBROUTINE DORGHR( N, ILO, IHI, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dorgl2.f b/SRC/dorgl2.f index e98dc765..eac97a3e 100644 --- a/SRC/dorgl2.f +++ b/SRC/dorgl2.f @@ -1,7 +1,8 @@ SUBROUTINE DORGL2( M, N, K, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dorglq.f b/SRC/dorglq.f index da703729..abe409c3 100644 --- a/SRC/dorglq.f +++ b/SRC/dorglq.f @@ -1,7 +1,8 @@ SUBROUTINE DORGLQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dorgql.f b/SRC/dorgql.f index ad729c64..92e0c413 100644 --- a/SRC/dorgql.f +++ b/SRC/dorgql.f @@ -1,7 +1,8 @@ SUBROUTINE DORGQL( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dorgqr.f b/SRC/dorgqr.f index 7da3a54b..a080f0dc 100644 --- a/SRC/dorgqr.f +++ b/SRC/dorgqr.f @@ -1,7 +1,8 @@ SUBROUTINE DORGQR( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dorgr2.f b/SRC/dorgr2.f index ce84d440..76b48f66 100644 --- a/SRC/dorgr2.f +++ b/SRC/dorgr2.f @@ -1,7 +1,8 @@ SUBROUTINE DORGR2( M, N, K, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dorgrq.f b/SRC/dorgrq.f index af5b9b90..c2e0a916 100644 --- a/SRC/dorgrq.f +++ b/SRC/dorgrq.f @@ -1,7 +1,8 @@ SUBROUTINE DORGRQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dorgtr.f b/SRC/dorgtr.f index 2ecebc80..827ed494 100644 --- a/SRC/dorgtr.f +++ b/SRC/dorgtr.f @@ -1,7 +1,8 @@ SUBROUTINE DORGTR( UPLO, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dorm2l.f b/SRC/dorm2l.f index 37927850..27489cbe 100644 --- a/SRC/dorm2l.f +++ b/SRC/dorm2l.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dorm2r.f b/SRC/dorm2r.f index be599498..9959c330 100644 --- a/SRC/dorm2r.f +++ b/SRC/dorm2r.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dormbr.f b/SRC/dormbr.f index 4be3e831..aefc2f92 100644 --- a/SRC/dormbr.f +++ b/SRC/dormbr.f @@ -2,7 +2,8 @@ $ LDC, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dormhr.f b/SRC/dormhr.f index d0557e73..c649d6ad 100644 --- a/SRC/dormhr.f +++ b/SRC/dormhr.f @@ -2,7 +2,8 @@ $ LDC, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dorml2.f b/SRC/dorml2.f index 9079ed73..dca1bc8f 100644 --- a/SRC/dorml2.f +++ b/SRC/dorml2.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dormlq.f b/SRC/dormlq.f index c14d816c..aa1b8391 100644 --- a/SRC/dormlq.f +++ b/SRC/dormlq.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dormql.f b/SRC/dormql.f index bf5841fd..29affb67 100644 --- a/SRC/dormql.f +++ b/SRC/dormql.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dormqr.f b/SRC/dormqr.f index 57c2f0ef..1cf67e12 100644 --- a/SRC/dormqr.f +++ b/SRC/dormqr.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dormr2.f b/SRC/dormr2.f index 8e859f9a..9a8ce03d 100644 --- a/SRC/dormr2.f +++ b/SRC/dormr2.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dormr3.f b/SRC/dormr3.f index 14234d9b..94b960fa 100644 --- a/SRC/dormr3.f +++ b/SRC/dormr3.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dormrq.f b/SRC/dormrq.f index f82fd82a..097a1a02 100644 --- a/SRC/dormrq.f +++ b/SRC/dormrq.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dormrz.f b/SRC/dormrz.f index 5a049f09..b9f775ac 100644 --- a/SRC/dormrz.f +++ b/SRC/dormrz.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2007 * * .. Scalar Arguments .. diff --git a/SRC/dormtr.f b/SRC/dormtr.f index fde51fb3..54f85990 100644 --- a/SRC/dormtr.f +++ b/SRC/dormtr.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpbcon.f b/SRC/dpbcon.f index f99d38b3..e474b6a9 100644 --- a/SRC/dpbcon.f +++ b/SRC/dpbcon.f @@ -2,7 +2,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dpbequ.f b/SRC/dpbequ.f index b58d451e..437cc08b 100644 --- a/SRC/dpbequ.f +++ b/SRC/dpbequ.f @@ -1,7 +1,8 @@ SUBROUTINE DPBEQU( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpbrfs.f b/SRC/dpbrfs.f index 7ef3905f..f0eaa42e 100644 --- a/SRC/dpbrfs.f +++ b/SRC/dpbrfs.f @@ -2,7 +2,8 @@ $ LDB, X, LDX, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dpbstf.f b/SRC/dpbstf.f index 5e1d588a..af19cf66 100644 --- a/SRC/dpbstf.f +++ b/SRC/dpbstf.f @@ -1,7 +1,8 @@ SUBROUTINE DPBSTF( UPLO, N, KD, AB, LDAB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpbsv.f b/SRC/dpbsv.f index 3ec138a2..0095f564 100644 --- a/SRC/dpbsv.f +++ b/SRC/dpbsv.f @@ -1,7 +1,8 @@ SUBROUTINE DPBSV( UPLO, N, KD, NRHS, AB, LDAB, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpbsvx.f b/SRC/dpbsvx.f index 75820864..6469b1e8 100644 --- a/SRC/dpbsvx.f +++ b/SRC/dpbsvx.f @@ -3,7 +3,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpbtf2.f b/SRC/dpbtf2.f index 8d18b6b5..1b6b1bf1 100644 --- a/SRC/dpbtf2.f +++ b/SRC/dpbtf2.f @@ -1,7 +1,8 @@ SUBROUTINE DPBTF2( UPLO, N, KD, AB, LDAB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpbtrf.f b/SRC/dpbtrf.f index e9ea5927..8ca9a597 100644 --- a/SRC/dpbtrf.f +++ b/SRC/dpbtrf.f @@ -1,7 +1,8 @@ SUBROUTINE DPBTRF( UPLO, N, KD, AB, LDAB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpbtrs.f b/SRC/dpbtrs.f index 4d633760..951df583 100644 --- a/SRC/dpbtrs.f +++ b/SRC/dpbtrs.f @@ -1,7 +1,8 @@ SUBROUTINE DPBTRS( UPLO, N, KD, NRHS, AB, LDAB, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpftrf.f b/SRC/dpftrf.f index d70c9aa5..94499917 100644 --- a/SRC/dpftrf.f +++ b/SRC/dpftrf.f @@ -1,9 +1,9 @@ SUBROUTINE DPFTRF( TRANSR, UPLO, N, A, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/dpftri.f b/SRC/dpftri.f index 16a3f5b5..1b1f8e5a 100644 --- a/SRC/dpftri.f +++ b/SRC/dpftri.f @@ -1,9 +1,9 @@ SUBROUTINE DPFTRI( TRANSR, UPLO, N, A, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/dpftrs.f b/SRC/dpftrs.f index ee18027d..b1c2b0ea 100644 --- a/SRC/dpftrs.f +++ b/SRC/dpftrs.f @@ -1,9 +1,9 @@ SUBROUTINE DPFTRS( TRANSR, UPLO, N, NRHS, A, B, LDB, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/dpocon.f b/SRC/dpocon.f index ba41cdcc..6456e600 100644 --- a/SRC/dpocon.f +++ b/SRC/dpocon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dpoequ.f b/SRC/dpoequ.f index 4ee9fded..b6d20307 100644 --- a/SRC/dpoequ.f +++ b/SRC/dpoequ.f @@ -1,7 +1,8 @@ SUBROUTINE DPOEQU( N, A, LDA, S, SCOND, AMAX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dporfs.f b/SRC/dporfs.f index e4e68fd5..cf2cb7e5 100644 --- a/SRC/dporfs.f +++ b/SRC/dporfs.f @@ -2,7 +2,8 @@ $ LDX, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dporfsx.f b/SRC/dporfsx.f index a1469d81..919cffe1 100644 --- a/SRC/dporfsx.f +++ b/SRC/dporfsx.f @@ -3,10 +3,10 @@ $ ERR_BNDS_NORM, ERR_BNDS_COMP, NPARAMS, PARAMS, $ WORK, IWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dposv.f b/SRC/dposv.f index c2343e17..57a4682a 100644 --- a/SRC/dposv.f +++ b/SRC/dposv.f @@ -1,7 +1,8 @@ SUBROUTINE DPOSV( UPLO, N, NRHS, A, LDA, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dposvx.f b/SRC/dposvx.f index 58099dec..c2744f7d 100644 --- a/SRC/dposvx.f +++ b/SRC/dposvx.f @@ -3,7 +3,8 @@ $ IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpotf2.f b/SRC/dpotf2.f index 5c148895..feaa553a 100644 --- a/SRC/dpotf2.f +++ b/SRC/dpotf2.f @@ -1,7 +1,8 @@ SUBROUTINE DPOTF2( UPLO, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpotrf.f b/SRC/dpotrf.f index d9fd2524..271e929c 100644 --- a/SRC/dpotrf.f +++ b/SRC/dpotrf.f @@ -1,7 +1,8 @@ SUBROUTINE DPOTRF( UPLO, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpotri.f b/SRC/dpotri.f index 4c2f3e80..b3d0eb44 100644 --- a/SRC/dpotri.f +++ b/SRC/dpotri.f @@ -1,7 +1,8 @@ SUBROUTINE DPOTRI( UPLO, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpotrs.f b/SRC/dpotrs.f index 111bb694..7b199d0e 100644 --- a/SRC/dpotrs.f +++ b/SRC/dpotrs.f @@ -1,7 +1,8 @@ SUBROUTINE DPOTRS( UPLO, N, NRHS, A, LDA, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dppcon.f b/SRC/dppcon.f index f7ac0adf..c0040aff 100644 --- a/SRC/dppcon.f +++ b/SRC/dppcon.f @@ -1,7 +1,8 @@ SUBROUTINE DPPCON( UPLO, N, AP, ANORM, RCOND, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dppequ.f b/SRC/dppequ.f index 3c37c3be..1ed3862e 100644 --- a/SRC/dppequ.f +++ b/SRC/dppequ.f @@ -1,7 +1,8 @@ SUBROUTINE DPPEQU( UPLO, N, AP, S, SCOND, AMAX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpprfs.f b/SRC/dpprfs.f index b5232384..26fbabc3 100644 --- a/SRC/dpprfs.f +++ b/SRC/dpprfs.f @@ -2,7 +2,8 @@ $ BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dppsv.f b/SRC/dppsv.f index 635bb2ca..6eb40e21 100644 --- a/SRC/dppsv.f +++ b/SRC/dppsv.f @@ -1,7 +1,8 @@ SUBROUTINE DPPSV( UPLO, N, NRHS, AP, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dppsvx.f b/SRC/dppsvx.f index d0c71f0e..cb0cf4e7 100644 --- a/SRC/dppsvx.f +++ b/SRC/dppsvx.f @@ -2,7 +2,8 @@ $ X, LDX, RCOND, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpptrf.f b/SRC/dpptrf.f index 27eaeebc..8efaa34a 100644 --- a/SRC/dpptrf.f +++ b/SRC/dpptrf.f @@ -1,7 +1,8 @@ SUBROUTINE DPPTRF( UPLO, N, AP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpptri.f b/SRC/dpptri.f index 06f76e36..80a33f39 100644 --- a/SRC/dpptri.f +++ b/SRC/dpptri.f @@ -1,7 +1,8 @@ SUBROUTINE DPPTRI( UPLO, N, AP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpptrs.f b/SRC/dpptrs.f index 64cb2840..d3e93a05 100644 --- a/SRC/dpptrs.f +++ b/SRC/dpptrs.f @@ -1,7 +1,8 @@ SUBROUTINE DPPTRS( UPLO, N, NRHS, AP, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dptcon.f b/SRC/dptcon.f index a6d640ec..2b9979cf 100644 --- a/SRC/dptcon.f +++ b/SRC/dptcon.f @@ -1,7 +1,8 @@ SUBROUTINE DPTCON( N, D, E, ANORM, RCOND, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpteqr.f b/SRC/dpteqr.f index 308cedb0..99f31b00 100644 --- a/SRC/dpteqr.f +++ b/SRC/dpteqr.f @@ -1,7 +1,8 @@ SUBROUTINE DPTEQR( COMPZ, N, D, E, Z, LDZ, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dptrfs.f b/SRC/dptrfs.f index 99f882b8..a1d822db 100644 --- a/SRC/dptrfs.f +++ b/SRC/dptrfs.f @@ -2,7 +2,8 @@ $ BERR, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dptsv.f b/SRC/dptsv.f index f67c9959..a7e0a282 100644 --- a/SRC/dptsv.f +++ b/SRC/dptsv.f @@ -1,7 +1,8 @@ SUBROUTINE DPTSV( N, NRHS, D, E, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dptsvx.f b/SRC/dptsvx.f index 2d649f2b..6717ea51 100644 --- a/SRC/dptsvx.f +++ b/SRC/dptsvx.f @@ -2,7 +2,8 @@ $ RCOND, FERR, BERR, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpttrf.f b/SRC/dpttrf.f index 29de1a1e..dae49d23 100644 --- a/SRC/dpttrf.f +++ b/SRC/dpttrf.f @@ -1,7 +1,8 @@ SUBROUTINE DPTTRF( N, D, E, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dpttrs.f b/SRC/dpttrs.f index 31dd0566..b12a905c 100644 --- a/SRC/dpttrs.f +++ b/SRC/dpttrs.f @@ -1,7 +1,8 @@ SUBROUTINE DPTTRS( N, NRHS, D, E, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dptts2.f b/SRC/dptts2.f index 5e4ad7a9..17abc096 100644 --- a/SRC/dptts2.f +++ b/SRC/dptts2.f @@ -1,7 +1,8 @@ SUBROUTINE DPTTS2( N, NRHS, D, E, B, LDB ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/drscl.f b/SRC/drscl.f index 23c9e7be..5a9ed008 100644 --- a/SRC/drscl.f +++ b/SRC/drscl.f @@ -1,7 +1,8 @@ SUBROUTINE DRSCL( N, SA, SX, INCX ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsbev.f b/SRC/dsbev.f index e48c0882..5375149b 100644 --- a/SRC/dsbev.f +++ b/SRC/dsbev.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsbevd.f b/SRC/dsbevd.f index f51f77b0..009d3ffb 100644 --- a/SRC/dsbevd.f +++ b/SRC/dsbevd.f @@ -2,7 +2,8 @@ $ LWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsbevx.f b/SRC/dsbevx.f index 6dca6773..baac8ab0 100644 --- a/SRC/dsbevx.f +++ b/SRC/dsbevx.f @@ -3,7 +3,8 @@ $ IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsbgst.f b/SRC/dsbgst.f index f16d3e75..235b6b5e 100644 --- a/SRC/dsbgst.f +++ b/SRC/dsbgst.f @@ -2,7 +2,8 @@ $ LDX, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsbgv.f b/SRC/dsbgv.f index 62246ef9..01c97e81 100644 --- a/SRC/dsbgv.f +++ b/SRC/dsbgv.f @@ -2,7 +2,8 @@ $ LDZ, WORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsbgvd.f b/SRC/dsbgvd.f index 874c33fc..8b7cb00b 100644 --- a/SRC/dsbgvd.f +++ b/SRC/dsbgvd.f @@ -2,7 +2,8 @@ $ Z, LDZ, WORK, LWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsbgvx.f b/SRC/dsbgvx.f index 9e05a19d..07b3f745 100644 --- a/SRC/dsbgvx.f +++ b/SRC/dsbgvx.f @@ -3,7 +3,8 @@ $ LDZ, WORK, IWORK, IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsbtrd.f b/SRC/dsbtrd.f index a735afe2..e7a3a53d 100644 --- a/SRC/dsbtrd.f +++ b/SRC/dsbtrd.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsgesv.f b/SRC/dsgesv.f index 1bf5a8df..4b50f7e6 100644 --- a/SRC/dsgesv.f +++ b/SRC/dsgesv.f @@ -2,7 +2,8 @@ + SWORK, ITER, INFO ) * * -- LAPACK PROTOTYPE driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * February 2007 * * .. diff --git a/SRC/dspcon.f b/SRC/dspcon.f index 7b18c74b..3e122f52 100644 --- a/SRC/dspcon.f +++ b/SRC/dspcon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dspev.f b/SRC/dspev.f index 8a59bba2..00c7e4b1 100644 --- a/SRC/dspev.f +++ b/SRC/dspev.f @@ -1,7 +1,8 @@ SUBROUTINE DSPEV( JOBZ, UPLO, N, AP, W, Z, LDZ, WORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dspevd.f b/SRC/dspevd.f index bca62b0e..af7bfc9f 100644 --- a/SRC/dspevd.f +++ b/SRC/dspevd.f @@ -2,7 +2,8 @@ $ IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dspevx.f b/SRC/dspevx.f index b2cc5047..fce77a02 100644 --- a/SRC/dspevx.f +++ b/SRC/dspevx.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dspgst.f b/SRC/dspgst.f index 1aebc299..d806c5d4 100644 --- a/SRC/dspgst.f +++ b/SRC/dspgst.f @@ -1,7 +1,8 @@ SUBROUTINE DSPGST( ITYPE, UPLO, N, AP, BP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dspgv.f b/SRC/dspgv.f index f074a1e9..918d7efa 100644 --- a/SRC/dspgv.f +++ b/SRC/dspgv.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dspgvd.f b/SRC/dspgvd.f index f3f6eace..63ffad0c 100644 --- a/SRC/dspgvd.f +++ b/SRC/dspgvd.f @@ -2,7 +2,8 @@ $ LWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dspgvx.f b/SRC/dspgvx.f index da9d7da4..0747ff8a 100644 --- a/SRC/dspgvx.f +++ b/SRC/dspgvx.f @@ -3,7 +3,8 @@ $ IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsprfs.f b/SRC/dsprfs.f index 0814eca4..8918f2c1 100644 --- a/SRC/dsprfs.f +++ b/SRC/dsprfs.f @@ -2,7 +2,8 @@ $ FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dspsv.f b/SRC/dspsv.f index 42d975d1..3c04c48e 100644 --- a/SRC/dspsv.f +++ b/SRC/dspsv.f @@ -1,7 +1,8 @@ SUBROUTINE DSPSV( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dspsvx.f b/SRC/dspsvx.f index fcc64971..aa038943 100644 --- a/SRC/dspsvx.f +++ b/SRC/dspsvx.f @@ -2,7 +2,8 @@ $ LDX, RCOND, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsptrd.f b/SRC/dsptrd.f index f060dbcd..f91adbdc 100644 --- a/SRC/dsptrd.f +++ b/SRC/dsptrd.f @@ -1,7 +1,8 @@ SUBROUTINE DSPTRD( UPLO, N, AP, D, E, TAU, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsptrf.f b/SRC/dsptrf.f index 2b97ce2d..24700908 100644 --- a/SRC/dsptrf.f +++ b/SRC/dsptrf.f @@ -1,7 +1,8 @@ SUBROUTINE DSPTRF( UPLO, N, AP, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsptri.f b/SRC/dsptri.f index b8e406d6..bc69a179 100644 --- a/SRC/dsptri.f +++ b/SRC/dsptri.f @@ -1,7 +1,8 @@ SUBROUTINE DSPTRI( UPLO, N, AP, IPIV, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsptrs.f b/SRC/dsptrs.f index bc7ff108..1fd67b5e 100644 --- a/SRC/dsptrs.f +++ b/SRC/dsptrs.f @@ -1,7 +1,8 @@ SUBROUTINE DSPTRS( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dstebz.f b/SRC/dstebz.f index 900880e1..0e0e24bf 100644 --- a/SRC/dstebz.f +++ b/SRC/dstebz.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * 8-18-00: Increase FUDGE factor for T3E (eca) * diff --git a/SRC/dstedc.f b/SRC/dstedc.f index 4256dd9b..977bb4cf 100644 --- a/SRC/dstedc.f +++ b/SRC/dstedc.f @@ -2,7 +2,8 @@ $ LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dstegr.f b/SRC/dstegr.f index 404bad6c..c5173971 100644 --- a/SRC/dstegr.f +++ b/SRC/dstegr.f @@ -6,7 +6,8 @@ * * * -- LAPACK computational routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dstein.f b/SRC/dstein.f index 04c50271..d342f66f 100644 --- a/SRC/dstein.f +++ b/SRC/dstein.f @@ -2,7 +2,8 @@ $ IWORK, IFAIL, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dstemr.f b/SRC/dstemr.f index 73dacd75..295bca0e 100644 --- a/SRC/dstemr.f +++ b/SRC/dstemr.f @@ -3,9 +3,10 @@ $ IWORK, LIWORK, INFO ) IMPLICIT NONE * -* -- LAPACK computational routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK computational routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. CHARACTER JOBZ, RANGE diff --git a/SRC/dsteqr.f b/SRC/dsteqr.f index 11650a73..a0ec5cdb 100644 --- a/SRC/dsteqr.f +++ b/SRC/dsteqr.f @@ -1,7 +1,8 @@ SUBROUTINE DSTEQR( COMPZ, N, D, E, Z, LDZ, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsterf.f b/SRC/dsterf.f index 3e8b4281..4f2a9bcf 100644 --- a/SRC/dsterf.f +++ b/SRC/dsterf.f @@ -1,7 +1,8 @@ SUBROUTINE DSTERF( N, D, E, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dstev.f b/SRC/dstev.f index f4f2496d..3354167a 100644 --- a/SRC/dstev.f +++ b/SRC/dstev.f @@ -1,7 +1,8 @@ SUBROUTINE DSTEV( JOBZ, N, D, E, Z, LDZ, WORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dstevd.f b/SRC/dstevd.f index 9fe592d4..b90f7383 100644 --- a/SRC/dstevd.f +++ b/SRC/dstevd.f @@ -2,7 +2,8 @@ $ LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dstevr.f b/SRC/dstevr.f index fcf72ab7..5459bb4e 100644 --- a/SRC/dstevr.f +++ b/SRC/dstevr.f @@ -3,7 +3,8 @@ $ LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dstevx.f b/SRC/dstevx.f index fcc8b9d8..a7e5a3dd 100644 --- a/SRC/dstevx.f +++ b/SRC/dstevx.f @@ -2,7 +2,8 @@ $ M, W, Z, LDZ, WORK, IWORK, IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsycon.f b/SRC/dsycon.f index 50f23d7f..fa023397 100644 --- a/SRC/dsycon.f +++ b/SRC/dsycon.f @@ -2,7 +2,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dsyev.f b/SRC/dsyev.f index 58e4030b..da208fb2 100644 --- a/SRC/dsyev.f +++ b/SRC/dsyev.f @@ -1,7 +1,8 @@ SUBROUTINE DSYEV( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsyevd.f b/SRC/dsyevd.f index 9711efe4..02f0ac7d 100644 --- a/SRC/dsyevd.f +++ b/SRC/dsyevd.f @@ -2,7 +2,8 @@ $ LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsyevr.f b/SRC/dsyevr.f index 71c9accd..b958ff45 100644 --- a/SRC/dsyevr.f +++ b/SRC/dsyevr.f @@ -3,7 +3,8 @@ $ IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsyevx.f b/SRC/dsyevx.f index 849e6e38..b0ab461e 100644 --- a/SRC/dsyevx.f +++ b/SRC/dsyevx.f @@ -3,7 +3,8 @@ $ IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsygs2.f b/SRC/dsygs2.f index 9b12ddd5..7d0f87ca 100644 --- a/SRC/dsygs2.f +++ b/SRC/dsygs2.f @@ -1,7 +1,8 @@ SUBROUTINE DSYGS2( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsygst.f b/SRC/dsygst.f index 7e0cca39..c1b2a955 100644 --- a/SRC/dsygst.f +++ b/SRC/dsygst.f @@ -1,7 +1,8 @@ SUBROUTINE DSYGST( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsygv.f b/SRC/dsygv.f index d8f97f34..43607d36 100644 --- a/SRC/dsygv.f +++ b/SRC/dsygv.f @@ -2,7 +2,8 @@ $ LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsygvd.f b/SRC/dsygvd.f index 3ce19544..f123fa84 100644 --- a/SRC/dsygvd.f +++ b/SRC/dsygvd.f @@ -2,7 +2,8 @@ $ LWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsygvx.f b/SRC/dsygvx.f index 349f6966..c4d86a8e 100644 --- a/SRC/dsygvx.f +++ b/SRC/dsygvx.f @@ -3,7 +3,8 @@ $ LWORK, IWORK, IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsyrfs.f b/SRC/dsyrfs.f index 57883dc4..915c85ab 100644 --- a/SRC/dsyrfs.f +++ b/SRC/dsyrfs.f @@ -2,7 +2,8 @@ $ X, LDX, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dsyrfsx.f b/SRC/dsyrfsx.f index 9024c022..ee06f4a8 100644 --- a/SRC/dsyrfsx.f +++ b/SRC/dsyrfsx.f @@ -3,10 +3,10 @@ $ ERR_BNDS_NORM, ERR_BNDS_COMP, NPARAMS, PARAMS, $ WORK, IWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dsysv.f b/SRC/dsysv.f index 0f117025..3abe723e 100644 --- a/SRC/dsysv.f +++ b/SRC/dsysv.f @@ -2,7 +2,8 @@ $ LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsysvx.f b/SRC/dsysvx.f index e3596253..89ae68fe 100644 --- a/SRC/dsysvx.f +++ b/SRC/dsysvx.f @@ -3,7 +3,8 @@ $ IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsysvxx.f b/SRC/dsysvxx.f index 022ecc8a..943559d5 100644 --- a/SRC/dsysvxx.f +++ b/SRC/dsysvxx.f @@ -3,10 +3,10 @@ $ N_ERR_BNDS, ERR_BNDS_NORM, ERR_BNDS_COMP, $ NPARAMS, PARAMS, WORK, IWORK, INFO ) * -* -- LAPACK driver routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/dsytd2.f b/SRC/dsytd2.f index 8f1cd712..f3e6f0a9 100644 --- a/SRC/dsytd2.f +++ b/SRC/dsytd2.f @@ -1,7 +1,8 @@ SUBROUTINE DSYTD2( UPLO, N, A, LDA, D, E, TAU, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsytf2.f b/SRC/dsytf2.f index 96dfc331..261651fe 100644 --- a/SRC/dsytf2.f +++ b/SRC/dsytf2.f @@ -1,7 +1,8 @@ SUBROUTINE DSYTF2( UPLO, N, A, LDA, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsytrd.f b/SRC/dsytrd.f index 5ec55ff3..befbee31 100644 --- a/SRC/dsytrd.f +++ b/SRC/dsytrd.f @@ -1,7 +1,8 @@ SUBROUTINE DSYTRD( UPLO, N, A, LDA, D, E, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsytrf.f b/SRC/dsytrf.f index 652c1528..e0a1b191 100644 --- a/SRC/dsytrf.f +++ b/SRC/dsytrf.f @@ -1,7 +1,8 @@ SUBROUTINE DSYTRF( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsytri.f b/SRC/dsytri.f index c42bc63d..4cbc40ec 100644 --- a/SRC/dsytri.f +++ b/SRC/dsytri.f @@ -1,7 +1,8 @@ SUBROUTINE DSYTRI( UPLO, N, A, LDA, IPIV, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dsytrs.f b/SRC/dsytrs.f index 41c71000..65cc7296 100644 --- a/SRC/dsytrs.f +++ b/SRC/dsytrs.f @@ -1,7 +1,8 @@ SUBROUTINE DSYTRS( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtbcon.f b/SRC/dtbcon.f index b26bd363..dfa3cb7a 100644 --- a/SRC/dtbcon.f +++ b/SRC/dtbcon.f @@ -2,7 +2,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dtbrfs.f b/SRC/dtbrfs.f index 2845202f..c15bf9ce 100644 --- a/SRC/dtbrfs.f +++ b/SRC/dtbrfs.f @@ -2,7 +2,8 @@ $ LDB, X, LDX, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dtbtrs.f b/SRC/dtbtrs.f index a20448cb..78f312e6 100644 --- a/SRC/dtbtrs.f +++ b/SRC/dtbtrs.f @@ -2,7 +2,8 @@ $ LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtfsm.f b/SRC/dtfsm.f index 3f0fd16b..668b3e8d 100644 --- a/SRC/dtfsm.f +++ b/SRC/dtfsm.f @@ -1,10 +1,10 @@ SUBROUTINE DTFSM( TRANSR, SIDE, UPLO, TRANS, DIAG, M, N, ALPHA, A, + B, LDB ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/dtftri.f b/SRC/dtftri.f index 29f77567..09cb6c52 100644 --- a/SRC/dtftri.f +++ b/SRC/dtftri.f @@ -1,9 +1,9 @@ SUBROUTINE DTFTRI( TRANSR, UPLO, DIAG, N, A, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/dtfttp.f b/SRC/dtfttp.f index be797c5b..47164de7 100644 --- a/SRC/dtfttp.f +++ b/SRC/dtfttp.f @@ -1,9 +1,9 @@ SUBROUTINE DTFTTP( TRANSR, UPLO, N, ARF, AP, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/dtfttr.f b/SRC/dtfttr.f index d752a490..abcff913 100644 --- a/SRC/dtfttr.f +++ b/SRC/dtfttr.f @@ -1,9 +1,9 @@ SUBROUTINE DTFTTR( TRANSR, UPLO, N, ARF, A, LDA, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/dtgevc.f b/SRC/dtgevc.f index b41153e0..44d0120a 100644 --- a/SRC/dtgevc.f +++ b/SRC/dtgevc.f @@ -2,7 +2,8 @@ $ LDVL, VR, LDVR, MM, M, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtgex2.f b/SRC/dtgex2.f index 8bdbf10f..e8cafc7b 100644 --- a/SRC/dtgex2.f +++ b/SRC/dtgex2.f @@ -2,7 +2,8 @@ $ LDZ, J1, N1, N2, WORK, LWORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtgexc.f b/SRC/dtgexc.f index 3c92d953..b0cf8da7 100644 --- a/SRC/dtgexc.f +++ b/SRC/dtgexc.f @@ -2,7 +2,8 @@ $ LDZ, IFST, ILST, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtgsen.f b/SRC/dtgsen.f index 48b129ab..03a9e35b 100644 --- a/SRC/dtgsen.f +++ b/SRC/dtgsen.f @@ -3,7 +3,8 @@ $ PR, DIF, WORK, LWORK, IWORK, LIWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2007 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dtgsja.f b/SRC/dtgsja.f index 1fae9c82..cd011e81 100644 --- a/SRC/dtgsja.f +++ b/SRC/dtgsja.f @@ -2,9 +2,10 @@ $ LDB, TOLA, TOLB, ALPHA, BETA, U, LDU, V, LDV, $ Q, LDQ, WORK, NCYCLE, INFO ) * -* -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. CHARACTER JOBQ, JOBU, JOBV diff --git a/SRC/dtgsna.f b/SRC/dtgsna.f index 2e1aac95..2b2c4fea 100644 --- a/SRC/dtgsna.f +++ b/SRC/dtgsna.f @@ -3,7 +3,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtgsy2.f b/SRC/dtgsy2.f index d5193360..49edccee 100644 --- a/SRC/dtgsy2.f +++ b/SRC/dtgsy2.f @@ -3,7 +3,8 @@ $ IWORK, PQ, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2007 * * .. Scalar Arguments .. diff --git a/SRC/dtgsyl.f b/SRC/dtgsyl.f index 17b30e97..3712c07f 100644 --- a/SRC/dtgsyl.f +++ b/SRC/dtgsyl.f @@ -3,7 +3,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtpcon.f b/SRC/dtpcon.f index f2f8b17a..f20d1839 100644 --- a/SRC/dtpcon.f +++ b/SRC/dtpcon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dtprfs.f b/SRC/dtprfs.f index 97219dce..c5d1ee82 100644 --- a/SRC/dtprfs.f +++ b/SRC/dtprfs.f @@ -2,7 +2,8 @@ $ FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dtptri.f b/SRC/dtptri.f index 5bf0a108..091d61c1 100644 --- a/SRC/dtptri.f +++ b/SRC/dtptri.f @@ -1,7 +1,8 @@ SUBROUTINE DTPTRI( UPLO, DIAG, N, AP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtptrs.f b/SRC/dtptrs.f index 16731106..a5575dc5 100644 --- a/SRC/dtptrs.f +++ b/SRC/dtptrs.f @@ -1,7 +1,8 @@ SUBROUTINE DTPTRS( UPLO, TRANS, DIAG, N, NRHS, AP, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtpttf.f b/SRC/dtpttf.f index 89b911f2..1e598bda 100644 --- a/SRC/dtpttf.f +++ b/SRC/dtpttf.f @@ -1,9 +1,9 @@ SUBROUTINE DTPTTF( TRANSR, UPLO, N, AP, ARF, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/dtrcon.f b/SRC/dtrcon.f index 5339a630..7bb35b6e 100644 --- a/SRC/dtrcon.f +++ b/SRC/dtrcon.f @@ -2,7 +2,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dtrevc.f b/SRC/dtrevc.f index 8570e9cb..bbb2d456 100644 --- a/SRC/dtrevc.f +++ b/SRC/dtrevc.f @@ -2,7 +2,8 @@ $ LDVR, MM, M, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtrexc.f b/SRC/dtrexc.f index fac1ce74..6a7c0bf4 100644 --- a/SRC/dtrexc.f +++ b/SRC/dtrexc.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtrrfs.f b/SRC/dtrrfs.f index 85950976..4ecf6fa1 100644 --- a/SRC/dtrrfs.f +++ b/SRC/dtrrfs.f @@ -2,7 +2,8 @@ $ LDX, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dtrsen.f b/SRC/dtrsen.f index d6287783..28e62c62 100644 --- a/SRC/dtrsen.f +++ b/SRC/dtrsen.f @@ -2,7 +2,8 @@ $ M, S, SEP, WORK, LWORK, IWORK, LIWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtrsna.f b/SRC/dtrsna.f index d032d962..33e1d995 100644 --- a/SRC/dtrsna.f +++ b/SRC/dtrsna.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call DLACN2 in place of DLACON, 5 Feb 03, SJH. diff --git a/SRC/dtrsyl.f b/SRC/dtrsyl.f index 0612b197..ec3e23d7 100644 --- a/SRC/dtrsyl.f +++ b/SRC/dtrsyl.f @@ -2,7 +2,8 @@ $ LDC, SCALE, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtrti2.f b/SRC/dtrti2.f index 2672be9e..2091b693 100644 --- a/SRC/dtrti2.f +++ b/SRC/dtrti2.f @@ -1,7 +1,8 @@ SUBROUTINE DTRTI2( UPLO, DIAG, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtrtri.f b/SRC/dtrtri.f index b3b68cd1..6a04cdf1 100644 --- a/SRC/dtrtri.f +++ b/SRC/dtrtri.f @@ -1,7 +1,8 @@ SUBROUTINE DTRTRI( UPLO, DIAG, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtrtrs.f b/SRC/dtrtrs.f index 0b083a33..448e27fc 100644 --- a/SRC/dtrtrs.f +++ b/SRC/dtrtrs.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtrttf.f b/SRC/dtrttf.f index 42a050f7..53af81e7 100644 --- a/SRC/dtrttf.f +++ b/SRC/dtrttf.f @@ -1,9 +1,9 @@ SUBROUTINE DTRTTF( TRANSR, UPLO, N, A, LDA, ARF, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/dtzrqf.f b/SRC/dtzrqf.f index 4395ba68..9777036f 100644 --- a/SRC/dtzrqf.f +++ b/SRC/dtzrqf.f @@ -1,7 +1,8 @@ SUBROUTINE DTZRQF( M, N, A, LDA, TAU, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dtzrzf.f b/SRC/dtzrzf.f index 759dc375..785f9062 100644 --- a/SRC/dtzrzf.f +++ b/SRC/dtzrzf.f @@ -1,7 +1,8 @@ SUBROUTINE DTZRZF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/dzsum1.f b/SRC/dzsum1.f index f6e8ca7b..5acaca8c 100644 --- a/SRC/dzsum1.f +++ b/SRC/dzsum1.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION DZSUM1( N, CX, INCX ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/icmax1.f b/SRC/icmax1.f index 3eb6b8ad..a4b99c26 100644 --- a/SRC/icmax1.f +++ b/SRC/icmax1.f @@ -1,7 +1,8 @@ INTEGER FUNCTION ICMAX1( N, CX, INCX ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ieeeck.f b/SRC/ieeeck.f index 3b48899b..b2c1d490 100644 --- a/SRC/ieeeck.f +++ b/SRC/ieeeck.f @@ -1,7 +1,8 @@ INTEGER FUNCTION IEEECK( ISPEC, ZERO, ONE ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ilaclc.f b/SRC/ilaclc.f index 0b488da9..577d5282 100644 --- a/SRC/ilaclc.f +++ b/SRC/ilaclc.f @@ -1,9 +1,12 @@ INTEGER FUNCTION ILACLC(M, N, A, LDA) IMPLICIT NONE * -* -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* December 2007 +* -- LAPACK auxiliary routine (version 3.2.1) -- +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * * .. Scalar Arguments .. INTEGER M, N, LDA diff --git a/SRC/ilaclr.f b/SRC/ilaclr.f index fed0653c..61682191 100644 --- a/SRC/ilaclr.f +++ b/SRC/ilaclr.f @@ -1,9 +1,12 @@ INTEGER FUNCTION ILACLR(M, N, A, LDA) IMPLICIT NONE * -* -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* December 2007 +* -- LAPACK auxiliary routine (version 3.2.1) -- +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * * .. Scalar Arguments .. INTEGER M, N, LDA diff --git a/SRC/iladiag.f b/SRC/iladiag.f index b71b32ab..43c52807 100644 --- a/SRC/iladiag.f +++ b/SRC/iladiag.f @@ -1,8 +1,12 @@ INTEGER FUNCTION ILADIAG( DIAG ) * -* -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* October 2008 +* -- LAPACK routine (version 3.2.1) -- +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* * .. Scalar Arguments .. CHARACTER DIAG * .. diff --git a/SRC/iladlc.f b/SRC/iladlc.f index 0e5a0a8c..66b141ee 100644 --- a/SRC/iladlc.f +++ b/SRC/iladlc.f @@ -1,9 +1,12 @@ INTEGER FUNCTION ILADLC(M, N, A, LDA) IMPLICIT NONE * -* -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* December 2007 +* -- LAPACK auxiliary routine (version 3.2.1) -- +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * * .. Scalar Arguments .. INTEGER M, N, LDA diff --git a/SRC/iladlr.f b/SRC/iladlr.f index 7b07956d..8b12984b 100644 --- a/SRC/iladlr.f +++ b/SRC/iladlr.f @@ -1,9 +1,12 @@ INTEGER FUNCTION ILADLR(M, N, A, LDA) IMPLICIT NONE * -* -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* December 2007 +* -- LAPACK auxiliary routine (version 3.2.1) -- +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * * .. Scalar Arguments .. INTEGER M, N, LDA diff --git a/SRC/ilaenv.f b/SRC/ilaenv.f index 5e89f306..8ed8aed6 100644 --- a/SRC/ilaenv.f +++ b/SRC/ilaenv.f @@ -1,8 +1,11 @@ INTEGER FUNCTION ILAENV( ISPEC, NAME, OPTS, N1, N2, N3, N4 ) * -* -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* January 2007 +* -- LAPACK auxiliary routine (version 3.2.1) -- +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * * .. Scalar Arguments .. CHARACTER*( * ) NAME, OPTS diff --git a/SRC/ilaprec.f b/SRC/ilaprec.f index 0166282e..0e8c1040 100644 --- a/SRC/ilaprec.f +++ b/SRC/ilaprec.f @@ -1,8 +1,12 @@ INTEGER FUNCTION ILAPREC( PREC ) * -* -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* October 2008 +* -- LAPACK routine (version 3.2.1) -- +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* * .. Scalar Arguments .. CHARACTER PREC * .. diff --git a/SRC/ilaslc.f b/SRC/ilaslc.f index 12c8a294..b7f77e8d 100644 --- a/SRC/ilaslc.f +++ b/SRC/ilaslc.f @@ -1,9 +1,12 @@ INTEGER FUNCTION ILASLC(M, N, A, LDA) IMPLICIT NONE * -* -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* December 2007 +* -- LAPACK auxiliary routine (version 3.2.1) -- +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * * .. Scalar Arguments .. INTEGER M, N, LDA diff --git a/SRC/ilaslr.f b/SRC/ilaslr.f index 8b2cba48..a5bda159 100644 --- a/SRC/ilaslr.f +++ b/SRC/ilaslr.f @@ -1,9 +1,12 @@ INTEGER FUNCTION ILASLR(M, N, A, LDA) IMPLICIT NONE * -* -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* December 2007 +* -- LAPACK auxiliary routine (version 3.2.1) -- +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * * .. Scalar Arguments .. INTEGER M, N, LDA diff --git a/SRC/ilatrans.f b/SRC/ilatrans.f index 3e6b4c8d..625c08a9 100644 --- a/SRC/ilatrans.f +++ b/SRC/ilatrans.f @@ -1,8 +1,12 @@ INTEGER FUNCTION ILATRANS( TRANS ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* October 2008 +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* * .. Scalar Arguments .. CHARACTER TRANS * .. diff --git a/SRC/ilauplo.f b/SRC/ilauplo.f index 6085c927..c6eff92d 100644 --- a/SRC/ilauplo.f +++ b/SRC/ilauplo.f @@ -1,8 +1,12 @@ INTEGER FUNCTION ILAUPLO( UPLO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* October 2008 +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* * .. Scalar Arguments .. CHARACTER UPLO * .. diff --git a/SRC/ilaver.f b/SRC/ilaver.f index f00313d9..17b79247 100644 --- a/SRC/ilaver.f +++ b/SRC/ilaver.f @@ -1,14 +1,17 @@ SUBROUTINE ILAVER( VERS_MAJOR, VERS_MINOR, VERS_PATCH ) * -* -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* January 2007 +* -- LAPACK routine (version 3.2.1) -- +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * .. * * Purpose * ======= * -* This subroutine return the Lapack version +* This subroutine return the Lapack version. * * Arguments * ========= @@ -24,7 +27,7 @@ * ===================================================================== VERS_MAJOR = 3 VERS_MINOR = 2 - VERS_PATCH = 0 + VERS_PATCH = 1 * ===================================================================== * RETURN diff --git a/SRC/ilazlc.f b/SRC/ilazlc.f index 4c8bc7a3..229e0997 100644 --- a/SRC/ilazlc.f +++ b/SRC/ilazlc.f @@ -1,9 +1,12 @@ INTEGER FUNCTION ILAZLC(M, N, A, LDA) IMPLICIT NONE * -* -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* December 2007 +* -- LAPACK auxiliary routine (version 3.2.1) -- +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * * .. Scalar Arguments .. INTEGER M, N, LDA diff --git a/SRC/ilazlr.f b/SRC/ilazlr.f index c3e415e9..1113fd2f 100644 --- a/SRC/ilazlr.f +++ b/SRC/ilazlr.f @@ -1,9 +1,12 @@ INTEGER FUNCTION ILAZLR(M, N, A, LDA) IMPLICIT NONE * -* -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* December 2007 +* -- LAPACK auxiliary routine (version 3.2.1) -- +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * * .. Scalar Arguments .. INTEGER M, N, LDA diff --git a/SRC/iparmq.f b/SRC/iparmq.f index cad272cc..9a76099b 100644 --- a/SRC/iparmq.f +++ b/SRC/iparmq.f @@ -1,7 +1,8 @@ INTEGER FUNCTION IPARMQ( ISPEC, NAME, OPTS, N, ILO, IHI, LWORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/izmax1.f b/SRC/izmax1.f index 6088046a..22bb8b12 100644 --- a/SRC/izmax1.f +++ b/SRC/izmax1.f @@ -1,7 +1,8 @@ INTEGER FUNCTION IZMAX1( N, CX, INCX ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/lsamen.f b/SRC/lsamen.f index a2710524..ab41c4d6 100644 --- a/SRC/lsamen.f +++ b/SRC/lsamen.f @@ -1,7 +1,8 @@ LOGICAL FUNCTION LSAMEN( N, CA, CB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sbdsdc.f b/SRC/sbdsdc.f index 672d084e..6f11e245 100644 --- a/SRC/sbdsdc.f +++ b/SRC/sbdsdc.f @@ -2,7 +2,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sbdsqr.f b/SRC/sbdsqr.f index 8f2637c7..e3148433 100644 --- a/SRC/sbdsqr.f +++ b/SRC/sbdsqr.f @@ -2,7 +2,8 @@ $ LDU, C, LDC, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2007 * * .. Scalar Arguments .. diff --git a/SRC/scsum1.f b/SRC/scsum1.f index c7dd9395..bc7207ac 100644 --- a/SRC/scsum1.f +++ b/SRC/scsum1.f @@ -1,7 +1,8 @@ REAL FUNCTION SCSUM1( N, CX, INCX ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sdisna.f b/SRC/sdisna.f index 102ed8b8..639c9fb8 100644 --- a/SRC/sdisna.f +++ b/SRC/sdisna.f @@ -1,7 +1,8 @@ SUBROUTINE SDISNA( JOB, M, N, D, SEP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgbbrd.f b/SRC/sgbbrd.f index 0d3cd919..ccf61e0c 100644 --- a/SRC/sgbbrd.f +++ b/SRC/sgbbrd.f @@ -2,7 +2,8 @@ $ LDQ, PT, LDPT, C, LDC, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgbcon.f b/SRC/sgbcon.f index c64ad741..b4b3c689 100644 --- a/SRC/sgbcon.f +++ b/SRC/sgbcon.f @@ -2,7 +2,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/sgbequ.f b/SRC/sgbequ.f index 7f13b724..43c71c1f 100644 --- a/SRC/sgbequ.f +++ b/SRC/sgbequ.f @@ -2,7 +2,8 @@ $ AMAX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgbrfs.f b/SRC/sgbrfs.f index 81dcfc14..18d4c6a3 100644 --- a/SRC/sgbrfs.f +++ b/SRC/sgbrfs.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/sgbrfsx.f b/SRC/sgbrfsx.f index c0926b4d..29801922 100644 --- a/SRC/sgbrfsx.f +++ b/SRC/sgbrfsx.f @@ -4,10 +4,10 @@ $ ERR_BNDS_COMP, NPARAMS, PARAMS, WORK, IWORK, $ INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sgbsv.f b/SRC/sgbsv.f index b4ef802f..4bda55b5 100644 --- a/SRC/sgbsv.f +++ b/SRC/sgbsv.f @@ -1,7 +1,8 @@ SUBROUTINE SGBSV( N, KL, KU, NRHS, AB, LDAB, IPIV, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgbsvx.f b/SRC/sgbsvx.f index e05f45dd..af5da5bc 100644 --- a/SRC/sgbsvx.f +++ b/SRC/sgbsvx.f @@ -3,7 +3,8 @@ $ RCOND, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgbtf2.f b/SRC/sgbtf2.f index 632c9904..79b0d963 100644 --- a/SRC/sgbtf2.f +++ b/SRC/sgbtf2.f @@ -1,7 +1,8 @@ SUBROUTINE SGBTF2( M, N, KL, KU, AB, LDAB, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgbtrf.f b/SRC/sgbtrf.f index da3cb358..e675f50c 100644 --- a/SRC/sgbtrf.f +++ b/SRC/sgbtrf.f @@ -1,7 +1,8 @@ SUBROUTINE SGBTRF( M, N, KL, KU, AB, LDAB, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgbtrs.f b/SRC/sgbtrs.f index c39c91c2..8e3ecee3 100644 --- a/SRC/sgbtrs.f +++ b/SRC/sgbtrs.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgebak.f b/SRC/sgebak.f index 59a0e516..9c9592da 100644 --- a/SRC/sgebak.f +++ b/SRC/sgebak.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgebal.f b/SRC/sgebal.f index ede96d7b..d4df3c67 100644 --- a/SRC/sgebal.f +++ b/SRC/sgebal.f @@ -1,7 +1,8 @@ SUBROUTINE SGEBAL( JOB, N, A, LDA, ILO, IHI, SCALE, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgebd2.f b/SRC/sgebd2.f index 0b32dcfc..86875f0c 100644 --- a/SRC/sgebd2.f +++ b/SRC/sgebd2.f @@ -1,7 +1,8 @@ SUBROUTINE SGEBD2( M, N, A, LDA, D, E, TAUQ, TAUP, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgebrd.f b/SRC/sgebrd.f index eebb121d..47eb1e1d 100644 --- a/SRC/sgebrd.f +++ b/SRC/sgebrd.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgecon.f b/SRC/sgecon.f index 5d8d5b70..a2a11126 100644 --- a/SRC/sgecon.f +++ b/SRC/sgecon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/sgeequ.f b/SRC/sgeequ.f index 3033a0a8..8a57a45b 100644 --- a/SRC/sgeequ.f +++ b/SRC/sgeequ.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgees.f b/SRC/sgees.f index a64a4f65..e65022a0 100644 --- a/SRC/sgees.f +++ b/SRC/sgees.f @@ -2,7 +2,8 @@ $ VS, LDVS, WORK, LWORK, BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgeesx.f b/SRC/sgeesx.f index 15a5e3bf..16933a78 100644 --- a/SRC/sgeesx.f +++ b/SRC/sgeesx.f @@ -3,7 +3,8 @@ $ IWORK, LIWORK, BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgeev.f b/SRC/sgeev.f index 8023e5ea..d74fe71e 100644 --- a/SRC/sgeev.f +++ b/SRC/sgeev.f @@ -2,7 +2,8 @@ $ LDVR, WORK, LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgeevx.f b/SRC/sgeevx.f index 460419ff..b3124a79 100644 --- a/SRC/sgeevx.f +++ b/SRC/sgeevx.f @@ -3,7 +3,8 @@ $ RCONDE, RCONDV, WORK, LWORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgegs.f b/SRC/sgegs.f index b9e911fa..85519cb3 100644 --- a/SRC/sgegs.f +++ b/SRC/sgegs.f @@ -3,7 +3,8 @@ $ LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgegv.f b/SRC/sgegv.f index 6cce7a76..479abc48 100644 --- a/SRC/sgegv.f +++ b/SRC/sgegv.f @@ -2,7 +2,8 @@ $ BETA, VL, LDVL, VR, LDVR, WORK, LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgehd2.f b/SRC/sgehd2.f index 8db57cde..f8419d27 100644 --- a/SRC/sgehd2.f +++ b/SRC/sgehd2.f @@ -1,7 +1,8 @@ SUBROUTINE SGEHD2( N, ILO, IHI, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgehrd.f b/SRC/sgehrd.f index 152bfb40..1a76c891 100644 --- a/SRC/sgehrd.f +++ b/SRC/sgehrd.f @@ -1,8 +1,9 @@ SUBROUTINE SGEHRD( N, ILO, IHI, A, LDA, TAU, WORK, LWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. INTEGER IHI, ILO, INFO, LDA, LWORK, N diff --git a/SRC/sgejsv.f b/SRC/sgejsv.f index d85b9c05..840f2e1a 100644 --- a/SRC/sgejsv.f +++ b/SRC/sgejsv.f @@ -2,11 +2,11 @@ & M, N, A, LDA, SVA, U, LDU, V, LDV, & WORK, LWORK, IWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Zlatko Drmac of the University of Zagreb and -- * -- Kresimir Veselic of the Fernuniversitaet Hagen -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/sgelq2.f b/SRC/sgelq2.f index a6245a72..16db9bb9 100644 --- a/SRC/sgelq2.f +++ b/SRC/sgelq2.f @@ -1,7 +1,8 @@ SUBROUTINE SGELQ2( M, N, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgelqf.f b/SRC/sgelqf.f index b765bb04..8eac3023 100644 --- a/SRC/sgelqf.f +++ b/SRC/sgelqf.f @@ -1,7 +1,8 @@ SUBROUTINE SGELQF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgels.f b/SRC/sgels.f index 52b0d263..0c34a0e5 100644 --- a/SRC/sgels.f +++ b/SRC/sgels.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgelsd.f b/SRC/sgelsd.f index ead2236c..4c166ee0 100644 --- a/SRC/sgelsd.f +++ b/SRC/sgelsd.f @@ -2,7 +2,8 @@ $ RANK, WORK, LWORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgelss.f b/SRC/sgelss.f index 5cef5e10..4a753cf5 100644 --- a/SRC/sgelss.f +++ b/SRC/sgelss.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgelsx.f b/SRC/sgelsx.f index 2bb36c39..409ba1a9 100644 --- a/SRC/sgelsx.f +++ b/SRC/sgelsx.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgelsy.f b/SRC/sgelsy.f index a2025cfe..3a7b84c8 100644 --- a/SRC/sgelsy.f +++ b/SRC/sgelsy.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgeql2.f b/SRC/sgeql2.f index c1460fcb..6d3bb751 100644 --- a/SRC/sgeql2.f +++ b/SRC/sgeql2.f @@ -1,7 +1,8 @@ SUBROUTINE SGEQL2( M, N, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgeqlf.f b/SRC/sgeqlf.f index d72acac3..79914c29 100644 --- a/SRC/sgeqlf.f +++ b/SRC/sgeqlf.f @@ -1,7 +1,8 @@ SUBROUTINE SGEQLF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgeqp3.f b/SRC/sgeqp3.f index bb28dc3d..fdd9170e 100644 --- a/SRC/sgeqp3.f +++ b/SRC/sgeqp3.f @@ -1,7 +1,8 @@ SUBROUTINE SGEQP3( M, N, A, LDA, JPVT, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgeqpf.f b/SRC/sgeqpf.f index 90002af4..def2886c 100644 --- a/SRC/sgeqpf.f +++ b/SRC/sgeqpf.f @@ -1,7 +1,8 @@ SUBROUTINE SGEQPF( M, N, A, LDA, JPVT, TAU, WORK, INFO ) * * -- LAPACK deprecated driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgeqr2.f b/SRC/sgeqr2.f index 1910c8f7..4353cd63 100644 --- a/SRC/sgeqr2.f +++ b/SRC/sgeqr2.f @@ -1,7 +1,8 @@ SUBROUTINE SGEQR2( M, N, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgeqrf.f b/SRC/sgeqrf.f index a2331c62..203e7fb2 100644 --- a/SRC/sgeqrf.f +++ b/SRC/sgeqrf.f @@ -1,7 +1,8 @@ SUBROUTINE SGEQRF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgerfs.f b/SRC/sgerfs.f index fbccf782..22df41b3 100644 --- a/SRC/sgerfs.f +++ b/SRC/sgerfs.f @@ -2,7 +2,8 @@ $ X, LDX, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/sgerfsx.f b/SRC/sgerfsx.f index e21daf23..264bd6fe 100644 --- a/SRC/sgerfsx.f +++ b/SRC/sgerfsx.f @@ -3,10 +3,10 @@ $ ERR_BNDS_NORM, ERR_BNDS_COMP, NPARAMS, PARAMS, $ WORK, IWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sgerq2.f b/SRC/sgerq2.f index ed96b3ca..e5279094 100644 --- a/SRC/sgerq2.f +++ b/SRC/sgerq2.f @@ -1,7 +1,8 @@ SUBROUTINE SGERQ2( M, N, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgerqf.f b/SRC/sgerqf.f index bb5c0c27..8f4a2686 100644 --- a/SRC/sgerqf.f +++ b/SRC/sgerqf.f @@ -1,7 +1,8 @@ SUBROUTINE SGERQF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgesc2.f b/SRC/sgesc2.f index 50a71f66..d0a7cd94 100644 --- a/SRC/sgesc2.f +++ b/SRC/sgesc2.f @@ -1,7 +1,8 @@ SUBROUTINE SGESC2( N, A, LDA, RHS, IPIV, JPIV, SCALE ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgesdd.f b/SRC/sgesdd.f index ee38b901..74b20c36 100644 --- a/SRC/sgesdd.f +++ b/SRC/sgesdd.f @@ -1,8 +1,9 @@ SUBROUTINE SGESDD( JOBZ, M, N, A, LDA, S, U, LDU, VT, LDVT, WORK, $ LWORK, IWORK, INFO ) * -* -- LAPACK driver routine (version 3.2.1) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK driver routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * March 2009 * * .. Scalar Arguments .. diff --git a/SRC/sgesv.f b/SRC/sgesv.f index 5dc32bf2..c2c01a86 100644 --- a/SRC/sgesv.f +++ b/SRC/sgesv.f @@ -1,7 +1,8 @@ SUBROUTINE SGESV( N, NRHS, A, LDA, IPIV, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgesvd.f b/SRC/sgesvd.f index 68a8aa0f..4deb5ce1 100644 --- a/SRC/sgesvd.f +++ b/SRC/sgesvd.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgesvj.f b/SRC/sgesvj.f index 197c4038..40cd859b 100644 --- a/SRC/sgesvj.f +++ b/SRC/sgesvj.f @@ -1,11 +1,11 @@ SUBROUTINE SGESVJ( JOBA, JOBU, JOBV, M, N, A, LDA, SVA, MV, V, + LDV, WORK, LWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Zlatko Drmac of the University of Zagreb and -- * -- Kresimir Veselic of the Fernuniversitaet Hagen -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/sgesvx.f b/SRC/sgesvx.f index 25094bdb..a94a6dd0 100644 --- a/SRC/sgesvx.f +++ b/SRC/sgesvx.f @@ -3,7 +3,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgesvxx.f b/SRC/sgesvxx.f index 7280fe2d..7bd0e626 100644 --- a/SRC/sgesvxx.f +++ b/SRC/sgesvxx.f @@ -4,10 +4,10 @@ $ ERR_BNDS_COMP, NPARAMS, PARAMS, WORK, IWORK, $ INFO ) * -* -- LAPACK driver routine (version 3.2) -- +* -- LAPACK driver routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sgetc2.f b/SRC/sgetc2.f index a090ea0b..740bad4f 100644 --- a/SRC/sgetc2.f +++ b/SRC/sgetc2.f @@ -1,7 +1,8 @@ SUBROUTINE SGETC2( N, A, LDA, IPIV, JPIV, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgetf2.f b/SRC/sgetf2.f index 02d196d8..5cf4def3 100644 --- a/SRC/sgetf2.f +++ b/SRC/sgetf2.f @@ -1,7 +1,8 @@ SUBROUTINE SGETF2( M, N, A, LDA, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgetrf.f b/SRC/sgetrf.f index 34e16bb8..414c6d90 100644 --- a/SRC/sgetrf.f +++ b/SRC/sgetrf.f @@ -1,7 +1,8 @@ SUBROUTINE SGETRF( M, N, A, LDA, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgetri.f b/SRC/sgetri.f index bd73dae7..04a5b196 100644 --- a/SRC/sgetri.f +++ b/SRC/sgetri.f @@ -1,7 +1,8 @@ SUBROUTINE SGETRI( N, A, LDA, IPIV, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgetrs.f b/SRC/sgetrs.f index 839d70d8..558e6e80 100644 --- a/SRC/sgetrs.f +++ b/SRC/sgetrs.f @@ -1,7 +1,8 @@ SUBROUTINE SGETRS( TRANS, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sggbak.f b/SRC/sggbak.f index 58cf2168..b7064211 100644 --- a/SRC/sggbak.f +++ b/SRC/sggbak.f @@ -2,7 +2,8 @@ $ LDV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sggbal.f b/SRC/sggbal.f index 41602982..fd0feeb7 100644 --- a/SRC/sggbal.f +++ b/SRC/sggbal.f @@ -2,7 +2,8 @@ $ RSCALE, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgges.f b/SRC/sgges.f index 61c764c5..4d70f465 100644 --- a/SRC/sgges.f +++ b/SRC/sgges.f @@ -3,7 +3,8 @@ $ LDVSR, WORK, LWORK, BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sggesx.f b/SRC/sggesx.f index ebc26688..74a0201e 100644 --- a/SRC/sggesx.f +++ b/SRC/sggesx.f @@ -3,9 +3,10 @@ $ VSR, LDVSR, RCONDE, RCONDV, WORK, LWORK, IWORK, $ LIWORK, BWORK, INFO ) * -* -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK driver routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. CHARACTER JOBVSL, JOBVSR, SENSE, SORT diff --git a/SRC/sggev.f b/SRC/sggev.f index 63d1ad11..6dcf8d0a 100644 --- a/SRC/sggev.f +++ b/SRC/sggev.f @@ -2,7 +2,8 @@ $ BETA, VL, LDVL, VR, LDVR, WORK, LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sggevx.f b/SRC/sggevx.f index 5b641cc8..56379a18 100644 --- a/SRC/sggevx.f +++ b/SRC/sggevx.f @@ -4,7 +4,8 @@ $ RCONDV, WORK, LWORK, IWORK, BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sggglm.f b/SRC/sggglm.f index aebabd0d..a2b107d5 100644 --- a/SRC/sggglm.f +++ b/SRC/sggglm.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgghrd.f b/SRC/sgghrd.f index 86b72c24..765aa3ab 100644 --- a/SRC/sgghrd.f +++ b/SRC/sgghrd.f @@ -2,7 +2,8 @@ $ LDQ, Z, LDZ, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgglse.f b/SRC/sgglse.f index 950fc836..e8e3b760 100644 --- a/SRC/sgglse.f +++ b/SRC/sgglse.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sggqrf.f b/SRC/sggqrf.f index 806028b5..6f76c508 100644 --- a/SRC/sggqrf.f +++ b/SRC/sggqrf.f @@ -2,7 +2,8 @@ $ LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sggrqf.f b/SRC/sggrqf.f index fac2680b..c752c7b0 100644 --- a/SRC/sggrqf.f +++ b/SRC/sggrqf.f @@ -2,7 +2,8 @@ $ LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sggsvd.f b/SRC/sggsvd.f index 2d60c695..65b0e7f9 100644 --- a/SRC/sggsvd.f +++ b/SRC/sggsvd.f @@ -3,7 +3,8 @@ $ IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sggsvp.f b/SRC/sggsvp.f index 48b929b1..a62fbea5 100644 --- a/SRC/sggsvp.f +++ b/SRC/sggsvp.f @@ -3,7 +3,8 @@ $ IWORK, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgsvj0.f b/SRC/sgsvj0.f index bf293aad..1adcf299 100644 --- a/SRC/sgsvj0.f +++ b/SRC/sgsvj0.f @@ -1,11 +1,11 @@ SUBROUTINE SGSVJ0( JOBV, M, N, A, LDA, D, SVA, MV, V, LDV, EPS, + SFMIN, TOL, NSWEEP, WORK, LWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Zlatko Drmac of the University of Zagreb and -- * -- Kresimir Veselic of the Fernuniversitaet Hagen -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/sgsvj1.f b/SRC/sgsvj1.f index a3a077aa..e8707ff4 100644 --- a/SRC/sgsvj1.f +++ b/SRC/sgsvj1.f @@ -1,11 +1,11 @@ SUBROUTINE SGSVJ1( JOBV, M, N, N1, A, LDA, D, SVA, MV, V, LDV, + EPS, SFMIN, TOL, NSWEEP, WORK, LWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Zlatko Drmac of the University of Zagreb and -- * -- Kresimir Veselic of the Fernuniversitaet Hagen -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/sgtcon.f b/SRC/sgtcon.f index 793608af..3d453942 100644 --- a/SRC/sgtcon.f +++ b/SRC/sgtcon.f @@ -2,7 +2,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/sgtrfs.f b/SRC/sgtrfs.f index f2fac7b6..d56dc518 100644 --- a/SRC/sgtrfs.f +++ b/SRC/sgtrfs.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/sgtsv.f b/SRC/sgtsv.f index c9877895..a8d77383 100644 --- a/SRC/sgtsv.f +++ b/SRC/sgtsv.f @@ -1,7 +1,8 @@ SUBROUTINE SGTSV( N, NRHS, DL, D, DU, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgtsvx.f b/SRC/sgtsvx.f index a3615665..7187474e 100644 --- a/SRC/sgtsvx.f +++ b/SRC/sgtsvx.f @@ -3,7 +3,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgttrf.f b/SRC/sgttrf.f index 2ff3e656..be994532 100644 --- a/SRC/sgttrf.f +++ b/SRC/sgttrf.f @@ -1,7 +1,8 @@ SUBROUTINE SGTTRF( N, DL, D, DU, DU2, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgttrs.f b/SRC/sgttrs.f index 07a2e64b..239aa01a 100644 --- a/SRC/sgttrs.f +++ b/SRC/sgttrs.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sgtts2.f b/SRC/sgtts2.f index 06ce5461..67245e07 100644 --- a/SRC/sgtts2.f +++ b/SRC/sgtts2.f @@ -1,7 +1,8 @@ SUBROUTINE SGTTS2( ITRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/shgeqz.f b/SRC/shgeqz.f index 8c57ca59..ecce7be2 100644 --- a/SRC/shgeqz.f +++ b/SRC/shgeqz.f @@ -2,9 +2,10 @@ $ ALPHAR, ALPHAI, BETA, Q, LDQ, Z, LDZ, WORK, $ LWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. CHARACTER COMPQ, COMPZ, JOB diff --git a/SRC/shsein.f b/SRC/shsein.f index b6d26add..11aabdc8 100644 --- a/SRC/shsein.f +++ b/SRC/shsein.f @@ -3,7 +3,8 @@ $ IFAILR, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sisnan.f b/SRC/sisnan.f index d08b5696..3d05d2ba 100644 --- a/SRC/sisnan.f +++ b/SRC/sisnan.f @@ -1,7 +1,8 @@ LOGICAL FUNCTION SISNAN(SIN) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sla_gbamv.f b/SRC/sla_gbamv.f index cbbfdd87..d004243f 100644 --- a/SRC/sla_gbamv.f +++ b/SRC/sla_gbamv.f @@ -4,7 +4,7 @@ * -- LAPACK routine (version 3.2) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sla_gbrcond.f b/SRC/sla_gbrcond.f index 77ffcdfd..8d83fd65 100644 --- a/SRC/sla_gbrcond.f +++ b/SRC/sla_gbrcond.f @@ -4,7 +4,7 @@ * -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sla_gbrfsx_extended.f b/SRC/sla_gbrfsx_extended.f index f5bfe3fc..e9fb28d6 100644 --- a/SRC/sla_gbrfsx_extended.f +++ b/SRC/sla_gbrfsx_extended.f @@ -6,10 +6,10 @@ $ Y_TAIL, RCOND, ITHRESH, RTHRESH, $ DZ_UB, IGNORE_CWISE, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sla_gbrpvgrw.f b/SRC/sla_gbrpvgrw.f index 33339eb1..98b389d6 100644 --- a/SRC/sla_gbrpvgrw.f +++ b/SRC/sla_gbrpvgrw.f @@ -1,10 +1,10 @@ REAL FUNCTION SLA_GBRPVGRW( N, KL, KU, NCOLS, AB, LDAB, AFB, $ LDAFB ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sla_geamv.f b/SRC/sla_geamv.f index cb513c39..cf2ab0e1 100644 --- a/SRC/sla_geamv.f +++ b/SRC/sla_geamv.f @@ -1,10 +1,10 @@ SUBROUTINE SLA_GEAMV ( TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, $ Y, INCY ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sla_gercond.f b/SRC/sla_gercond.f index 47bb58e1..ab1e7f3c 100644 --- a/SRC/sla_gercond.f +++ b/SRC/sla_gercond.f @@ -1,10 +1,10 @@ REAL FUNCTION SLA_GERCOND ( TRANS, N, A, LDA, AF, LDAF, IPIV, $ CMODE, C, INFO, WORK, IWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sla_gerfsx_extended.f b/SRC/sla_gerfsx_extended.f index c3a4478e..23c49ec6 100644 --- a/SRC/sla_gerfsx_extended.f +++ b/SRC/sla_gerfsx_extended.f @@ -6,10 +6,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sla_lin_berr.f b/SRC/sla_lin_berr.f index 7a92d17a..7a67e5f8 100644 --- a/SRC/sla_lin_berr.f +++ b/SRC/sla_lin_berr.f @@ -1,9 +1,9 @@ SUBROUTINE SLA_LIN_BERR ( N, NZ, NRHS, RES, AYB, BERR ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sla_porcond.f b/SRC/sla_porcond.f index c64a2cb1..ad538253 100644 --- a/SRC/sla_porcond.f +++ b/SRC/sla_porcond.f @@ -1,10 +1,10 @@ REAL FUNCTION SLA_PORCOND( UPLO, N, A, LDA, AF, LDAF, CMODE, C, $ INFO, WORK, IWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sla_porfsx_extended.f b/SRC/sla_porfsx_extended.f index e314098e..929f65ec 100644 --- a/SRC/sla_porfsx_extended.f +++ b/SRC/sla_porfsx_extended.f @@ -6,10 +6,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sla_porpvgrw.f b/SRC/sla_porpvgrw.f index aba969a0..5ea9578c 100644 --- a/SRC/sla_porpvgrw.f +++ b/SRC/sla_porpvgrw.f @@ -1,9 +1,9 @@ REAL FUNCTION SLA_PORPVGRW( UPLO, NCOLS, A, LDA, AF, LDAF, WORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sla_rpvgrw.f b/SRC/sla_rpvgrw.f index ecd0369f..327e3527 100644 --- a/SRC/sla_rpvgrw.f +++ b/SRC/sla_rpvgrw.f @@ -1,9 +1,9 @@ REAL FUNCTION SLA_RPVGRW( N, NCOLS, A, LDA, AF, LDAF ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sla_syamv.f b/SRC/sla_syamv.f index 2c608d41..f6a659b1 100644 --- a/SRC/sla_syamv.f +++ b/SRC/sla_syamv.f @@ -1,10 +1,10 @@ SUBROUTINE SLA_SYAMV( UPLO, N, ALPHA, A, LDA, X, INCX, BETA, Y, $ INCY ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sla_syrcond.f b/SRC/sla_syrcond.f index 514e79fe..0b3833be 100644 --- a/SRC/sla_syrcond.f +++ b/SRC/sla_syrcond.f @@ -1,10 +1,10 @@ REAL FUNCTION SLA_SYRCOND( UPLO, N, A, LDA, AF, LDAF, IPIV, CMODE, $ C, INFO, WORK, IWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sla_syrfsx_extended.f b/SRC/sla_syrfsx_extended.f index ae2b2793..1bae71d3 100644 --- a/SRC/sla_syrfsx_extended.f +++ b/SRC/sla_syrfsx_extended.f @@ -6,10 +6,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sla_syrpvgrw.f b/SRC/sla_syrpvgrw.f index 7d435d65..16c1714a 100644 --- a/SRC/sla_syrpvgrw.f +++ b/SRC/sla_syrpvgrw.f @@ -1,10 +1,10 @@ REAL FUNCTION SLA_SYRPVGRW( UPLO, N, INFO, A, LDA, AF, LDAF, IPIV, $ WORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/sla_wwaddw.f b/SRC/sla_wwaddw.f index 6312b134..88152557 100644 --- a/SRC/sla_wwaddw.f +++ b/SRC/sla_wwaddw.f @@ -1,9 +1,9 @@ SUBROUTINE SLA_WWADDW( N, X, Y, W ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/slabad.f b/SRC/slabad.f index 4b6157f0..2904e787 100644 --- a/SRC/slabad.f +++ b/SRC/slabad.f @@ -1,7 +1,8 @@ SUBROUTINE SLABAD( SMALL, LARGE ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slabrd.f b/SRC/slabrd.f index 7688cbc5..5a1b2225 100644 --- a/SRC/slabrd.f +++ b/SRC/slabrd.f @@ -2,7 +2,8 @@ $ LDY ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slacn2.f b/SRC/slacn2.f index 6ddcf114..6c47c1ed 100644 --- a/SRC/slacn2.f +++ b/SRC/slacn2.f @@ -1,7 +1,8 @@ SUBROUTINE SLACN2( N, V, X, ISGN, EST, KASE, ISAVE ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slacon.f b/SRC/slacon.f index bcb9e059..0d149b07 100644 --- a/SRC/slacon.f +++ b/SRC/slacon.f @@ -1,7 +1,8 @@ SUBROUTINE SLACON( N, V, X, ISGN, EST, KASE ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slacpy.f b/SRC/slacpy.f index 8066dbfa..e77a59c7 100644 --- a/SRC/slacpy.f +++ b/SRC/slacpy.f @@ -1,7 +1,8 @@ SUBROUTINE SLACPY( UPLO, M, N, A, LDA, B, LDB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sladiv.f b/SRC/sladiv.f index 3f501f6b..a2817f31 100644 --- a/SRC/sladiv.f +++ b/SRC/sladiv.f @@ -1,7 +1,8 @@ SUBROUTINE SLADIV( A, B, C, D, P, Q ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slae2.f b/SRC/slae2.f index 17e8abc0..2415af51 100644 --- a/SRC/slae2.f +++ b/SRC/slae2.f @@ -1,7 +1,8 @@ SUBROUTINE SLAE2( A, B, C, RT1, RT2 ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaebz.f b/SRC/slaebz.f index f8b442ac..596b7b17 100644 --- a/SRC/slaebz.f +++ b/SRC/slaebz.f @@ -3,7 +3,8 @@ $ NAB, WORK, IWORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaed0.f b/SRC/slaed0.f index 62a98420..a2aa6006 100644 --- a/SRC/slaed0.f +++ b/SRC/slaed0.f @@ -2,7 +2,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaed1.f b/SRC/slaed1.f index d40cfd40..58758d36 100644 --- a/SRC/slaed1.f +++ b/SRC/slaed1.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaed2.f b/SRC/slaed2.f index 9263f12f..4ff11833 100644 --- a/SRC/slaed2.f +++ b/SRC/slaed2.f @@ -2,7 +2,8 @@ $ Q2, INDX, INDXC, INDXP, COLTYP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaed3.f b/SRC/slaed3.f index 1a9a507f..f77cff92 100644 --- a/SRC/slaed3.f +++ b/SRC/slaed3.f @@ -2,7 +2,8 @@ $ CTOT, W, S, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaed4.f b/SRC/slaed4.f index 55a089f0..fd8636c2 100644 --- a/SRC/slaed4.f +++ b/SRC/slaed4.f @@ -1,7 +1,8 @@ SUBROUTINE SLAED4( N, I, D, Z, DELTA, RHO, DLAM, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaed5.f b/SRC/slaed5.f index 23b37359..b08ef1fd 100644 --- a/SRC/slaed5.f +++ b/SRC/slaed5.f @@ -1,7 +1,8 @@ SUBROUTINE SLAED5( I, D, Z, DELTA, RHO, DLAM ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaed6.f b/SRC/slaed6.f index 5e1465c8..2f0c043c 100644 --- a/SRC/slaed6.f +++ b/SRC/slaed6.f @@ -1,7 +1,8 @@ SUBROUTINE SLAED6( KNITER, ORGATI, RHO, D, Z, FINIT, TAU, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * February 2007 * * .. Scalar Arguments .. diff --git a/SRC/slaed7.f b/SRC/slaed7.f index 645da421..98ca6813 100644 --- a/SRC/slaed7.f +++ b/SRC/slaed7.f @@ -4,7 +4,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaed8.f b/SRC/slaed8.f index 8ba4f268..93e55b47 100644 --- a/SRC/slaed8.f +++ b/SRC/slaed8.f @@ -3,7 +3,8 @@ $ GIVCOL, GIVNUM, INDXP, INDX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaed9.f b/SRC/slaed9.f index 5af58de2..c10b5e9f 100644 --- a/SRC/slaed9.f +++ b/SRC/slaed9.f @@ -2,7 +2,8 @@ $ S, LDS, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaeda.f b/SRC/slaeda.f index 0290e5cc..79b87982 100644 --- a/SRC/slaeda.f +++ b/SRC/slaeda.f @@ -2,7 +2,8 @@ $ GIVCOL, GIVNUM, Q, QPTR, Z, ZTEMP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaein.f b/SRC/slaein.f index 08bd2aed..b43fed4f 100644 --- a/SRC/slaein.f +++ b/SRC/slaein.f @@ -2,7 +2,8 @@ $ LDB, WORK, EPS3, SMLNUM, BIGNUM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaev2.f b/SRC/slaev2.f index f69572d3..f2263950 100644 --- a/SRC/slaev2.f +++ b/SRC/slaev2.f @@ -1,7 +1,8 @@ SUBROUTINE SLAEV2( A, B, C, RT1, RT2, CS1, SN1 ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaexc.f b/SRC/slaexc.f index d07e55a9..380f40cf 100644 --- a/SRC/slaexc.f +++ b/SRC/slaexc.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slag2.f b/SRC/slag2.f index 7da1d1fa..751cdb54 100644 --- a/SRC/slag2.f +++ b/SRC/slag2.f @@ -2,7 +2,8 @@ $ WR2, WI ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slag2d.f b/SRC/slag2d.f index b43699c2..39b09d6e 100644 --- a/SRC/slag2d.f +++ b/SRC/slag2d.f @@ -1,7 +1,8 @@ SUBROUTINE SLAG2D( M, N, SA, LDSA, A, LDA, INFO ) * * -- LAPACK PROTOTYPE auxiliary routine (version 3.1.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * August 2007 * * .. diff --git a/SRC/slags2.f b/SRC/slags2.f index 8a3505f0..da34ecc6 100644 --- a/SRC/slags2.f +++ b/SRC/slags2.f @@ -2,7 +2,8 @@ $ SNV, CSQ, SNQ ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slagtf.f b/SRC/slagtf.f index 4f933e84..b9468b22 100644 --- a/SRC/slagtf.f +++ b/SRC/slagtf.f @@ -1,7 +1,8 @@ SUBROUTINE SLAGTF( N, A, LAMBDA, B, C, TOL, D, IN, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slagtm.f b/SRC/slagtm.f index 5ec5db07..a91fbdd8 100644 --- a/SRC/slagtm.f +++ b/SRC/slagtm.f @@ -2,7 +2,8 @@ $ B, LDB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slagts.f b/SRC/slagts.f index c3b51a71..619a4e2c 100644 --- a/SRC/slagts.f +++ b/SRC/slagts.f @@ -1,7 +1,8 @@ SUBROUTINE SLAGTS( JOB, N, A, B, C, D, IN, Y, TOL, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slagv2.f b/SRC/slagv2.f index 1f52c73e..792e5559 100644 --- a/SRC/slagv2.f +++ b/SRC/slagv2.f @@ -2,7 +2,8 @@ $ CSR, SNR ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slahr2.f b/SRC/slahr2.f index fa83c760..2a9d2641 100644 --- a/SRC/slahr2.f +++ b/SRC/slahr2.f @@ -1,8 +1,9 @@ SUBROUTINE SLAHR2( N, K, NB, A, LDA, TAU, T, LDT, Y, LDY ) * -* -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK auxiliary routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. INTEGER K, LDA, LDT, LDY, N, NB diff --git a/SRC/slahrd.f b/SRC/slahrd.f index 8d04e21a..fc6d5a18 100644 --- a/SRC/slahrd.f +++ b/SRC/slahrd.f @@ -1,7 +1,8 @@ SUBROUTINE SLAHRD( N, K, NB, A, LDA, TAU, T, LDT, Y, LDY ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaic1.f b/SRC/slaic1.f index 3cf62d17..fb3a94e9 100644 --- a/SRC/slaic1.f +++ b/SRC/slaic1.f @@ -1,7 +1,8 @@ SUBROUTINE SLAIC1( JOB, J, X, SEST, W, GAMMA, SESTPR, S, C ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaisnan.f b/SRC/slaisnan.f index ef87fbdc..cc8cf4f3 100644 --- a/SRC/slaisnan.f +++ b/SRC/slaisnan.f @@ -1,7 +1,8 @@ LOGICAL FUNCTION SLAISNAN(SIN1,SIN2) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaln2.f b/SRC/slaln2.f index 5cd7c84c..b3417441 100644 --- a/SRC/slaln2.f +++ b/SRC/slaln2.f @@ -2,7 +2,8 @@ $ LDB, WR, WI, X, LDX, SCALE, XNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slals0.f b/SRC/slals0.f index bb0ab39e..4eff0947 100644 --- a/SRC/slals0.f +++ b/SRC/slals0.f @@ -3,7 +3,8 @@ $ POLES, DIFL, DIFR, Z, K, C, S, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slalsa.f b/SRC/slalsa.f index 9ef0860f..f94c60ec 100644 --- a/SRC/slalsa.f +++ b/SRC/slalsa.f @@ -4,7 +4,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slalsd.f b/SRC/slalsd.f index e52dcb19..c19271a9 100644 --- a/SRC/slalsd.f +++ b/SRC/slalsd.f @@ -2,7 +2,8 @@ $ RANK, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slamrg.f b/SRC/slamrg.f index fc8c337a..4d17a366 100644 --- a/SRC/slamrg.f +++ b/SRC/slamrg.f @@ -1,7 +1,8 @@ SUBROUTINE SLAMRG( N1, N2, A, STRD1, STRD2, INDEX ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaneg.f b/SRC/slaneg.f index 6c262c25..f1e8aa88 100644 --- a/SRC/slaneg.f +++ b/SRC/slaneg.f @@ -3,7 +3,8 @@ INTEGER SLANEG * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slangb.f b/SRC/slangb.f index ecea0a72..0dc80e51 100644 --- a/SRC/slangb.f +++ b/SRC/slangb.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slange.f b/SRC/slange.f index a3c895f3..b7248fb7 100644 --- a/SRC/slange.f +++ b/SRC/slange.f @@ -1,7 +1,8 @@ REAL FUNCTION SLANGE( NORM, M, N, A, LDA, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slangt.f b/SRC/slangt.f index dc56c605..9515201d 100644 --- a/SRC/slangt.f +++ b/SRC/slangt.f @@ -1,7 +1,8 @@ REAL FUNCTION SLANGT( NORM, N, DL, D, DU ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slanhs.f b/SRC/slanhs.f index b61f2f9c..5cf4c83c 100644 --- a/SRC/slanhs.f +++ b/SRC/slanhs.f @@ -1,7 +1,8 @@ REAL FUNCTION SLANHS( NORM, N, A, LDA, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slansb.f b/SRC/slansb.f index d9fef615..46955c98 100644 --- a/SRC/slansb.f +++ b/SRC/slansb.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slansf.f b/SRC/slansf.f index 84955504..e929aa10 100644 --- a/SRC/slansf.f +++ b/SRC/slansf.f @@ -1,9 +1,9 @@ REAL FUNCTION SLANSF( NORM, TRANSR, UPLO, N, A, WORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/slansp.f b/SRC/slansp.f index 1ac43874..22f72a36 100644 --- a/SRC/slansp.f +++ b/SRC/slansp.f @@ -1,7 +1,8 @@ REAL FUNCTION SLANSP( NORM, UPLO, N, AP, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slanst.f b/SRC/slanst.f index 1e1503cc..d4eb851a 100644 --- a/SRC/slanst.f +++ b/SRC/slanst.f @@ -1,7 +1,8 @@ REAL FUNCTION SLANST( NORM, N, D, E ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slansy.f b/SRC/slansy.f index 417f67fc..d4758060 100644 --- a/SRC/slansy.f +++ b/SRC/slansy.f @@ -1,7 +1,8 @@ REAL FUNCTION SLANSY( NORM, UPLO, N, A, LDA, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slantb.f b/SRC/slantb.f index 2d9c9f90..52ea7c72 100644 --- a/SRC/slantb.f +++ b/SRC/slantb.f @@ -2,7 +2,8 @@ $ LDAB, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slantp.f b/SRC/slantp.f index 6c32fb63..e5a48ca4 100644 --- a/SRC/slantp.f +++ b/SRC/slantp.f @@ -1,7 +1,8 @@ REAL FUNCTION SLANTP( NORM, UPLO, DIAG, N, AP, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slantr.f b/SRC/slantr.f index ba667daa..6c233ca1 100644 --- a/SRC/slantr.f +++ b/SRC/slantr.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slanv2.f b/SRC/slanv2.f index b0ca1173..275288e8 100644 --- a/SRC/slanv2.f +++ b/SRC/slanv2.f @@ -1,7 +1,8 @@ SUBROUTINE SLANV2( A, B, C, D, RT1R, RT1I, RT2R, RT2I, CS, SN ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slapll.f b/SRC/slapll.f index 95f7febf..bd435e53 100644 --- a/SRC/slapll.f +++ b/SRC/slapll.f @@ -1,7 +1,8 @@ SUBROUTINE SLAPLL( N, X, INCX, Y, INCY, SSMIN ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slapmt.f b/SRC/slapmt.f index e7d7aec9..6f328b2a 100644 --- a/SRC/slapmt.f +++ b/SRC/slapmt.f @@ -1,7 +1,8 @@ SUBROUTINE SLAPMT( FORWRD, M, N, X, LDX, K ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slapy2.f b/SRC/slapy2.f index a5f66222..916460c2 100644 --- a/SRC/slapy2.f +++ b/SRC/slapy2.f @@ -1,7 +1,8 @@ REAL FUNCTION SLAPY2( X, Y ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slapy3.f b/SRC/slapy3.f index 309fdb7d..4f7a22b3 100644 --- a/SRC/slapy3.f +++ b/SRC/slapy3.f @@ -1,7 +1,8 @@ REAL FUNCTION SLAPY3( X, Y, Z ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaqgb.f b/SRC/slaqgb.f index adba83f4..e25ddac9 100644 --- a/SRC/slaqgb.f +++ b/SRC/slaqgb.f @@ -2,7 +2,8 @@ $ AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaqge.f b/SRC/slaqge.f index d9df9ec6..1e521bb0 100644 --- a/SRC/slaqge.f +++ b/SRC/slaqge.f @@ -2,7 +2,8 @@ $ EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaqp2.f b/SRC/slaqp2.f index 16d2252f..2f51ecde 100644 --- a/SRC/slaqp2.f +++ b/SRC/slaqp2.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaqps.f b/SRC/slaqps.f index 1f83fb1a..3ff36978 100644 --- a/SRC/slaqps.f +++ b/SRC/slaqps.f @@ -2,7 +2,8 @@ $ VN2, AUXV, F, LDF ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaqr2.f b/SRC/slaqr2.f index c1335ac8..3c01c3e7 100644 --- a/SRC/slaqr2.f +++ b/SRC/slaqr2.f @@ -2,9 +2,9 @@ $ IHIZ, Z, LDZ, NS, ND, SR, SI, V, LDV, NH, T, $ LDT, NV, WV, LDWV, WORK, LWORK ) * -* -- LAPACK auxiliary routine (version 3.2) -- +* -- LAPACK auxiliary routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd.. -* November 2006 +* -- April 2009 -- * * .. Scalar Arguments .. INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV, diff --git a/SRC/slaqr3.f b/SRC/slaqr3.f index a7c6eb0e..5b9f010e 100644 --- a/SRC/slaqr3.f +++ b/SRC/slaqr3.f @@ -2,9 +2,9 @@ $ IHIZ, Z, LDZ, NS, ND, SR, SI, V, LDV, NH, T, $ LDT, NV, WV, LDWV, WORK, LWORK ) * -* -- LAPACK auxiliary routine (version 3.2) -- +* -- LAPACK auxiliary routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd.. -* November 2006 +* -- April 2009 -- * * .. Scalar Arguments .. INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV, diff --git a/SRC/slaqr5.f b/SRC/slaqr5.f index 55ebbbfa..83a2b2fc 100644 --- a/SRC/slaqr5.f +++ b/SRC/slaqr5.f @@ -3,7 +3,8 @@ $ LDU, NV, WV, LDWV, NH, WH, LDWH ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaqsb.f b/SRC/slaqsb.f index 6c0fdcf9..14647a7b 100644 --- a/SRC/slaqsb.f +++ b/SRC/slaqsb.f @@ -1,7 +1,8 @@ SUBROUTINE SLAQSB( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaqsp.f b/SRC/slaqsp.f index 50b128ea..e4c95350 100644 --- a/SRC/slaqsp.f +++ b/SRC/slaqsp.f @@ -1,7 +1,8 @@ SUBROUTINE SLAQSP( UPLO, N, AP, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaqsy.f b/SRC/slaqsy.f index ede3388e..e05e0406 100644 --- a/SRC/slaqsy.f +++ b/SRC/slaqsy.f @@ -1,7 +1,8 @@ SUBROUTINE SLAQSY( UPLO, N, A, LDA, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaqtr.f b/SRC/slaqtr.f index cce27e58..52a40270 100644 --- a/SRC/slaqtr.f +++ b/SRC/slaqtr.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slar1v.f b/SRC/slar1v.f index 474a1230..19287c6d 100644 --- a/SRC/slar1v.f +++ b/SRC/slar1v.f @@ -3,7 +3,8 @@ $ R, ISUPPZ, NRMINV, RESID, RQCORR, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slar2v.f b/SRC/slar2v.f index 5af94609..0df0e749 100644 --- a/SRC/slar2v.f +++ b/SRC/slar2v.f @@ -1,7 +1,8 @@ SUBROUTINE SLAR2V( N, X, Y, Z, INCX, C, S, INCC ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarf.f b/SRC/slarf.f index 04866d55..b1e1539b 100644 --- a/SRC/slarf.f +++ b/SRC/slarf.f @@ -2,7 +2,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarfb.f b/SRC/slarfb.f index 5299dfe8..234ba229 100644 --- a/SRC/slarfb.f +++ b/SRC/slarfb.f @@ -3,7 +3,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarfg.f b/SRC/slarfg.f index b5f905cb..9da24ab3 100644 --- a/SRC/slarfg.f +++ b/SRC/slarfg.f @@ -1,7 +1,8 @@ SUBROUTINE SLARFG( N, ALPHA, X, INCX, TAU ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarfp.f b/SRC/slarfp.f index af6ab63a..710352e4 100644 --- a/SRC/slarfp.f +++ b/SRC/slarfp.f @@ -1,7 +1,8 @@ SUBROUTINE SLARFP( N, ALPHA, X, INCX, TAU ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarft.f b/SRC/slarft.f index 87798777..f4eaab07 100644 --- a/SRC/slarft.f +++ b/SRC/slarft.f @@ -2,7 +2,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarfx.f b/SRC/slarfx.f index bf8028d9..e2279897 100644 --- a/SRC/slarfx.f +++ b/SRC/slarfx.f @@ -1,7 +1,8 @@ SUBROUTINE SLARFX( SIDE, M, N, V, TAU, C, LDC, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slargv.f b/SRC/slargv.f index d9f479b7..e1b86413 100644 --- a/SRC/slargv.f +++ b/SRC/slargv.f @@ -1,7 +1,8 @@ SUBROUTINE SLARGV( N, X, INCX, Y, INCY, C, INCC ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarnv.f b/SRC/slarnv.f index 4b018a2c..30e946a1 100644 --- a/SRC/slarnv.f +++ b/SRC/slarnv.f @@ -1,7 +1,8 @@ SUBROUTINE SLARNV( IDIST, ISEED, N, X ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarra.f b/SRC/slarra.f index 660aca18..969b23cd 100644 --- a/SRC/slarra.f +++ b/SRC/slarra.f @@ -3,7 +3,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarrb.f b/SRC/slarrb.f index b0314935..3a4c1d10 100644 --- a/SRC/slarrb.f +++ b/SRC/slarrb.f @@ -3,7 +3,8 @@ $ PIVMIN, SPDIAM, TWIST, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarrc.f b/SRC/slarrc.f index a4b109f0..0b7569d1 100644 --- a/SRC/slarrc.f +++ b/SRC/slarrc.f @@ -2,7 +2,8 @@ $ EIGCNT, LCNT, RCNT, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarrd.f b/SRC/slarrd.f index 1c63a2d9..3f421a9f 100644 --- a/SRC/slarrd.f +++ b/SRC/slarrd.f @@ -3,9 +3,10 @@ $ M, W, WERR, WL, WU, IBLOCK, INDEXW, $ WORK, IWORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK auxiliary routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. CHARACTER ORDER, RANGE diff --git a/SRC/slarre.f b/SRC/slarre.f index f3773023..02e2633f 100644 --- a/SRC/slarre.f +++ b/SRC/slarre.f @@ -5,7 +5,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarrf.f b/SRC/slarrf.f index f84f771e..a8d8e174 100644 --- a/SRC/slarrf.f +++ b/SRC/slarrf.f @@ -4,7 +4,8 @@ $ DPLUS, LPLUS, WORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 ** * .. Scalar Arguments .. diff --git a/SRC/slarrj.f b/SRC/slarrj.f index 69054bd7..b7df87dc 100644 --- a/SRC/slarrj.f +++ b/SRC/slarrj.f @@ -3,7 +3,8 @@ $ PIVMIN, SPDIAM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarrk.f b/SRC/slarrk.f index 550b3e11..f0533138 100644 --- a/SRC/slarrk.f +++ b/SRC/slarrk.f @@ -3,7 +3,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarrr.f b/SRC/slarrr.f index 54dbaa2d..f3498782 100644 --- a/SRC/slarrr.f +++ b/SRC/slarrr.f @@ -1,7 +1,8 @@ SUBROUTINE SLARRR( N, D, E, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarrv.f b/SRC/slarrv.f index 838f86c6..8327417e 100644 --- a/SRC/slarrv.f +++ b/SRC/slarrv.f @@ -5,7 +5,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarscl2.f b/SRC/slarscl2.f index db524fca..77ead2cc 100644 --- a/SRC/slarscl2.f +++ b/SRC/slarscl2.f @@ -1,9 +1,9 @@ SUBROUTINE SLARSCL2 ( M, N, D, X, LDX ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/slartg.f b/SRC/slartg.f index 87dfa312..4a7aae19 100644 --- a/SRC/slartg.f +++ b/SRC/slartg.f @@ -1,7 +1,8 @@ SUBROUTINE SLARTG( F, G, CS, SN, R ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slartv.f b/SRC/slartv.f index 03d71564..27eba6a3 100644 --- a/SRC/slartv.f +++ b/SRC/slartv.f @@ -1,7 +1,8 @@ SUBROUTINE SLARTV( N, X, INCX, Y, INCY, C, S, INCC ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaruv.f b/SRC/slaruv.f index 936b9aed..de6cc1fb 100644 --- a/SRC/slaruv.f +++ b/SRC/slaruv.f @@ -1,7 +1,8 @@ SUBROUTINE SLARUV( ISEED, N, X ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarz.f b/SRC/slarz.f index 005e64f1..22ab06f9 100644 --- a/SRC/slarz.f +++ b/SRC/slarz.f @@ -1,7 +1,8 @@ SUBROUTINE SLARZ( SIDE, M, N, L, V, INCV, TAU, C, LDC, WORK ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarzb.f b/SRC/slarzb.f index cc1a8515..fcd26c86 100644 --- a/SRC/slarzb.f +++ b/SRC/slarzb.f @@ -2,7 +2,8 @@ $ LDV, T, LDT, C, LDC, WORK, LDWORK ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slarzt.f b/SRC/slarzt.f index e81ed162..a30ecb1b 100644 --- a/SRC/slarzt.f +++ b/SRC/slarzt.f @@ -1,7 +1,8 @@ SUBROUTINE SLARZT( DIRECT, STOREV, N, K, V, LDV, TAU, T, LDT ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slas2.f b/SRC/slas2.f index b850a4bb..8adf0359 100644 --- a/SRC/slas2.f +++ b/SRC/slas2.f @@ -1,7 +1,8 @@ SUBROUTINE SLAS2( F, G, H, SSMIN, SSMAX ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slascl.f b/SRC/slascl.f index d6bb376c..847948d3 100644 --- a/SRC/slascl.f +++ b/SRC/slascl.f @@ -1,7 +1,8 @@ SUBROUTINE SLASCL( TYPE, KL, KU, CFROM, CTO, M, N, A, LDA, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slascl2.f b/SRC/slascl2.f index b2802299..7633b36a 100644 --- a/SRC/slascl2.f +++ b/SRC/slascl2.f @@ -1,9 +1,9 @@ SUBROUTINE SLASCL2 ( M, N, D, X, LDX ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/slasd0.f b/SRC/slasd0.f index e95178c0..edd3701b 100644 --- a/SRC/slasd0.f +++ b/SRC/slasd0.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slasd1.f b/SRC/slasd1.f index a016ee1c..d22e51d4 100644 --- a/SRC/slasd1.f +++ b/SRC/slasd1.f @@ -2,7 +2,8 @@ $ IDXQ, IWORK, WORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slasd2.f b/SRC/slasd2.f index 0fb13afe..64c84c6a 100644 --- a/SRC/slasd2.f +++ b/SRC/slasd2.f @@ -3,7 +3,8 @@ $ IDXC, IDXQ, COLTYP, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slasd3.f b/SRC/slasd3.f index 470552e4..d84f6a71 100644 --- a/SRC/slasd3.f +++ b/SRC/slasd3.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slasd4.f b/SRC/slasd4.f index 82320665..d9763277 100644 --- a/SRC/slasd4.f +++ b/SRC/slasd4.f @@ -1,7 +1,8 @@ SUBROUTINE SLASD4( N, I, D, Z, DELTA, RHO, SIGMA, WORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slasd5.f b/SRC/slasd5.f index 7ce52aae..d1b52b42 100644 --- a/SRC/slasd5.f +++ b/SRC/slasd5.f @@ -1,7 +1,8 @@ SUBROUTINE SLASD5( I, D, Z, DELTA, RHO, DSIGMA, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slasd6.f b/SRC/slasd6.f index 22356208..ad889772 100644 --- a/SRC/slasd6.f +++ b/SRC/slasd6.f @@ -4,7 +4,8 @@ $ IWORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slasd7.f b/SRC/slasd7.f index 6b9b2693..eccb842b 100644 --- a/SRC/slasd7.f +++ b/SRC/slasd7.f @@ -4,7 +4,8 @@ $ C, S, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slasd8.f b/SRC/slasd8.f index 3b6838b6..3b9b9e24 100644 --- a/SRC/slasd8.f +++ b/SRC/slasd8.f @@ -2,7 +2,8 @@ $ DSIGMA, WORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * October 2006 * * .. Scalar Arguments .. diff --git a/SRC/slasda.f b/SRC/slasda.f index e29a6a0c..23a25037 100644 --- a/SRC/slasda.f +++ b/SRC/slasda.f @@ -3,7 +3,8 @@ $ PERM, GIVNUM, C, S, WORK, IWORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slasdq.f b/SRC/slasdq.f index 2fe6f83e..84f74fe7 100644 --- a/SRC/slasdq.f +++ b/SRC/slasdq.f @@ -2,7 +2,8 @@ $ U, LDU, C, LDC, WORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slasdt.f b/SRC/slasdt.f index e3328c8f..fbff52d9 100644 --- a/SRC/slasdt.f +++ b/SRC/slasdt.f @@ -1,7 +1,8 @@ SUBROUTINE SLASDT( N, LVL, ND, INODE, NDIML, NDIMR, MSUB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaset.f b/SRC/slaset.f index 65d5fe37..8b1ba77e 100644 --- a/SRC/slaset.f +++ b/SRC/slaset.f @@ -1,7 +1,8 @@ SUBROUTINE SLASET( UPLO, M, N, ALPHA, BETA, A, LDA ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slasr.f b/SRC/slasr.f index 4dafc8a6..a419de28 100644 --- a/SRC/slasr.f +++ b/SRC/slasr.f @@ -1,7 +1,8 @@ SUBROUTINE SLASR( SIDE, PIVOT, DIRECT, M, N, C, S, A, LDA ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slasrt.f b/SRC/slasrt.f index 1ee51e01..f3f8ba89 100644 --- a/SRC/slasrt.f +++ b/SRC/slasrt.f @@ -1,7 +1,8 @@ SUBROUTINE SLASRT( ID, N, D, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slassq.f b/SRC/slassq.f index 22d2604e..0b58a972 100644 --- a/SRC/slassq.f +++ b/SRC/slassq.f @@ -1,7 +1,8 @@ SUBROUTINE SLASSQ( N, X, INCX, SCALE, SUMSQ ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slasv2.f b/SRC/slasv2.f index c5e97957..4e92517a 100644 --- a/SRC/slasv2.f +++ b/SRC/slasv2.f @@ -1,7 +1,8 @@ SUBROUTINE SLASV2( F, G, H, SSMIN, SSMAX, SNR, CSR, SNL, CSL ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slaswp.f b/SRC/slaswp.f index 50a94104..e6c9cc92 100644 --- a/SRC/slaswp.f +++ b/SRC/slaswp.f @@ -1,7 +1,8 @@ SUBROUTINE SLASWP( N, A, LDA, K1, K2, IPIV, INCX ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slasy2.f b/SRC/slasy2.f index 25ff25f7..860966e6 100644 --- a/SRC/slasy2.f +++ b/SRC/slasy2.f @@ -2,7 +2,8 @@ $ LDTR, B, LDB, SCALE, X, LDX, XNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slasyf.f b/SRC/slasyf.f index 1fcfcf71..71d7ab04 100644 --- a/SRC/slasyf.f +++ b/SRC/slasyf.f @@ -1,7 +1,8 @@ SUBROUTINE SLASYF( UPLO, N, NB, KB, A, LDA, IPIV, W, LDW, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slatbs.f b/SRC/slatbs.f index a6a8fb73..0d862347 100644 --- a/SRC/slatbs.f +++ b/SRC/slatbs.f @@ -2,7 +2,8 @@ $ SCALE, CNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slatdf.f b/SRC/slatdf.f index 23cc6968..1f9c0448 100644 --- a/SRC/slatdf.f +++ b/SRC/slatdf.f @@ -2,7 +2,8 @@ $ JPIV ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slatps.f b/SRC/slatps.f index 91ebb97c..d5f3c0f5 100644 --- a/SRC/slatps.f +++ b/SRC/slatps.f @@ -2,7 +2,8 @@ $ CNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slatrd.f b/SRC/slatrd.f index e455151b..9672401a 100644 --- a/SRC/slatrd.f +++ b/SRC/slatrd.f @@ -1,7 +1,8 @@ SUBROUTINE SLATRD( UPLO, N, NB, A, LDA, E, TAU, W, LDW ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slatrs.f b/SRC/slatrs.f index 5b3f6894..ed0338b7 100644 --- a/SRC/slatrs.f +++ b/SRC/slatrs.f @@ -2,7 +2,8 @@ $ CNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slatrz.f b/SRC/slatrz.f index 2b8f8d8d..3b0893a2 100644 --- a/SRC/slatrz.f +++ b/SRC/slatrz.f @@ -1,7 +1,8 @@ SUBROUTINE SLATRZ( M, N, L, A, LDA, TAU, WORK ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slatzm.f b/SRC/slatzm.f index 6b915da9..54574f32 100644 --- a/SRC/slatzm.f +++ b/SRC/slatzm.f @@ -1,7 +1,8 @@ SUBROUTINE SLATZM( SIDE, M, N, V, INCV, TAU, C1, C2, LDC, WORK ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slauu2.f b/SRC/slauu2.f index 323c0f50..25e9c82d 100644 --- a/SRC/slauu2.f +++ b/SRC/slauu2.f @@ -1,7 +1,8 @@ SUBROUTINE SLAUU2( UPLO, N, A, LDA, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/slauum.f b/SRC/slauum.f index 44dd2aaa..581767d8 100644 --- a/SRC/slauum.f +++ b/SRC/slauum.f @@ -1,7 +1,8 @@ SUBROUTINE SLAUUM( UPLO, N, A, LDA, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sopgtr.f b/SRC/sopgtr.f index 9d1ad9e3..3a29ef78 100644 --- a/SRC/sopgtr.f +++ b/SRC/sopgtr.f @@ -1,7 +1,8 @@ SUBROUTINE SOPGTR( UPLO, N, AP, TAU, Q, LDQ, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sopmtr.f b/SRC/sopmtr.f index 6ef5d99c..9f211782 100644 --- a/SRC/sopmtr.f +++ b/SRC/sopmtr.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sorg2l.f b/SRC/sorg2l.f index 8879195b..b01942b3 100644 --- a/SRC/sorg2l.f +++ b/SRC/sorg2l.f @@ -1,7 +1,8 @@ SUBROUTINE SORG2L( M, N, K, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sorg2r.f b/SRC/sorg2r.f index 89aaa615..4fad636a 100644 --- a/SRC/sorg2r.f +++ b/SRC/sorg2r.f @@ -1,7 +1,8 @@ SUBROUTINE SORG2R( M, N, K, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sorgbr.f b/SRC/sorgbr.f index 5da0f795..f8460c46 100644 --- a/SRC/sorgbr.f +++ b/SRC/sorgbr.f @@ -1,7 +1,8 @@ SUBROUTINE SORGBR( VECT, M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sorghr.f b/SRC/sorghr.f index 7cdbe457..6de59d0d 100644 --- a/SRC/sorghr.f +++ b/SRC/sorghr.f @@ -1,7 +1,8 @@ SUBROUTINE SORGHR( N, ILO, IHI, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sorgl2.f b/SRC/sorgl2.f index 89236986..a17a315c 100644 --- a/SRC/sorgl2.f +++ b/SRC/sorgl2.f @@ -1,7 +1,8 @@ SUBROUTINE SORGL2( M, N, K, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sorglq.f b/SRC/sorglq.f index 49e7e8ce..d284670d 100644 --- a/SRC/sorglq.f +++ b/SRC/sorglq.f @@ -1,7 +1,8 @@ SUBROUTINE SORGLQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sorgql.f b/SRC/sorgql.f index 2667a5e9..ab1b64cf 100644 --- a/SRC/sorgql.f +++ b/SRC/sorgql.f @@ -1,7 +1,8 @@ SUBROUTINE SORGQL( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sorgqr.f b/SRC/sorgqr.f index c550e834..e3d35367 100644 --- a/SRC/sorgqr.f +++ b/SRC/sorgqr.f @@ -1,7 +1,8 @@ SUBROUTINE SORGQR( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sorgr2.f b/SRC/sorgr2.f index acc87d36..fed29431 100644 --- a/SRC/sorgr2.f +++ b/SRC/sorgr2.f @@ -1,7 +1,8 @@ SUBROUTINE SORGR2( M, N, K, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sorgrq.f b/SRC/sorgrq.f index dde6a094..75777395 100644 --- a/SRC/sorgrq.f +++ b/SRC/sorgrq.f @@ -1,7 +1,8 @@ SUBROUTINE SORGRQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sorgtr.f b/SRC/sorgtr.f index 37848840..e3641843 100644 --- a/SRC/sorgtr.f +++ b/SRC/sorgtr.f @@ -1,7 +1,8 @@ SUBROUTINE SORGTR( UPLO, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sorm2l.f b/SRC/sorm2l.f index 8ad9978a..a261a782 100644 --- a/SRC/sorm2l.f +++ b/SRC/sorm2l.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sorm2r.f b/SRC/sorm2r.f index ff248b3f..fb907dd3 100644 --- a/SRC/sorm2r.f +++ b/SRC/sorm2r.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sormbr.f b/SRC/sormbr.f index ba72abf4..4aeb9694 100644 --- a/SRC/sormbr.f +++ b/SRC/sormbr.f @@ -2,7 +2,8 @@ $ LDC, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sormhr.f b/SRC/sormhr.f index 89a0c835..b0ca3f64 100644 --- a/SRC/sormhr.f +++ b/SRC/sormhr.f @@ -2,7 +2,8 @@ $ LDC, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sorml2.f b/SRC/sorml2.f index 34d0327f..78f5d762 100644 --- a/SRC/sorml2.f +++ b/SRC/sorml2.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sormlq.f b/SRC/sormlq.f index c09779a6..54142f90 100644 --- a/SRC/sormlq.f +++ b/SRC/sormlq.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sormql.f b/SRC/sormql.f index e87798a4..37a2bac2 100644 --- a/SRC/sormql.f +++ b/SRC/sormql.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sormqr.f b/SRC/sormqr.f index c9270691..1193cf10 100644 --- a/SRC/sormqr.f +++ b/SRC/sormqr.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sormr2.f b/SRC/sormr2.f index 4c42aadf..966f76ab 100644 --- a/SRC/sormr2.f +++ b/SRC/sormr2.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sormr3.f b/SRC/sormr3.f index a0d0c578..9bc3430a 100644 --- a/SRC/sormr3.f +++ b/SRC/sormr3.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sormrq.f b/SRC/sormrq.f index 744dd290..042de568 100644 --- a/SRC/sormrq.f +++ b/SRC/sormrq.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sormrz.f b/SRC/sormrz.f index 60d788a6..149eb6c2 100644 --- a/SRC/sormrz.f +++ b/SRC/sormrz.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2007 * * .. Scalar Arguments .. diff --git a/SRC/sormtr.f b/SRC/sormtr.f index f9ee68ae..1ddcd013 100644 --- a/SRC/sormtr.f +++ b/SRC/sormtr.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spbcon.f b/SRC/spbcon.f index db45a467..76a98295 100644 --- a/SRC/spbcon.f +++ b/SRC/spbcon.f @@ -2,7 +2,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/spbequ.f b/SRC/spbequ.f index 9d828268..d1de95c4 100644 --- a/SRC/spbequ.f +++ b/SRC/spbequ.f @@ -1,7 +1,8 @@ SUBROUTINE SPBEQU( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spbrfs.f b/SRC/spbrfs.f index e5840bd0..b321102f 100644 --- a/SRC/spbrfs.f +++ b/SRC/spbrfs.f @@ -2,7 +2,8 @@ $ LDB, X, LDX, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/spbstf.f b/SRC/spbstf.f index f3492e08..a7cce421 100644 --- a/SRC/spbstf.f +++ b/SRC/spbstf.f @@ -1,7 +1,8 @@ SUBROUTINE SPBSTF( UPLO, N, KD, AB, LDAB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spbsv.f b/SRC/spbsv.f index 3094e88c..a2abc6fb 100644 --- a/SRC/spbsv.f +++ b/SRC/spbsv.f @@ -1,7 +1,8 @@ SUBROUTINE SPBSV( UPLO, N, KD, NRHS, AB, LDAB, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spbsvx.f b/SRC/spbsvx.f index d0295c14..4c4d5f34 100644 --- a/SRC/spbsvx.f +++ b/SRC/spbsvx.f @@ -3,7 +3,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spbtf2.f b/SRC/spbtf2.f index 3ff3703d..f20207af 100644 --- a/SRC/spbtf2.f +++ b/SRC/spbtf2.f @@ -1,7 +1,8 @@ SUBROUTINE SPBTF2( UPLO, N, KD, AB, LDAB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spbtrf.f b/SRC/spbtrf.f index 90cb0aac..70317413 100644 --- a/SRC/spbtrf.f +++ b/SRC/spbtrf.f @@ -1,7 +1,8 @@ SUBROUTINE SPBTRF( UPLO, N, KD, AB, LDAB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spbtrs.f b/SRC/spbtrs.f index f1de80eb..00733dac 100644 --- a/SRC/spbtrs.f +++ b/SRC/spbtrs.f @@ -1,7 +1,8 @@ SUBROUTINE SPBTRS( UPLO, N, KD, NRHS, AB, LDAB, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spftrf.f b/SRC/spftrf.f index 5ae38200..04f74abc 100644 --- a/SRC/spftrf.f +++ b/SRC/spftrf.f @@ -1,9 +1,9 @@ SUBROUTINE SPFTRF( TRANSR, UPLO, N, A, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/spftri.f b/SRC/spftri.f index d95ea6ca..899819c9 100644 --- a/SRC/spftri.f +++ b/SRC/spftri.f @@ -1,9 +1,9 @@ SUBROUTINE SPFTRI( TRANSR, UPLO, N, A, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/spftrs.f b/SRC/spftrs.f index ec33add8..bdcb4149 100644 --- a/SRC/spftrs.f +++ b/SRC/spftrs.f @@ -1,9 +1,9 @@ SUBROUTINE SPFTRS( TRANSR, UPLO, N, NRHS, A, B, LDB, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/spocon.f b/SRC/spocon.f index c5aaec39..2880cd73 100644 --- a/SRC/spocon.f +++ b/SRC/spocon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/spoequ.f b/SRC/spoequ.f index f5410aac..4e378301 100644 --- a/SRC/spoequ.f +++ b/SRC/spoequ.f @@ -1,7 +1,8 @@ SUBROUTINE SPOEQU( N, A, LDA, S, SCOND, AMAX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sporfs.f b/SRC/sporfs.f index 4b8630d3..6c492348 100644 --- a/SRC/sporfs.f +++ b/SRC/sporfs.f @@ -2,7 +2,8 @@ $ LDX, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/sporfsx.f b/SRC/sporfsx.f index e6d548c7..1c2197e3 100644 --- a/SRC/sporfsx.f +++ b/SRC/sporfsx.f @@ -3,13 +3,13 @@ $ ERR_BNDS_NORM, ERR_BNDS_COMP, NPARAMS, PARAMS, $ WORK, IWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- -* -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- -* -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- LAPACK routine (version 3.2.1) -- +* -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- +* -- Jason Riedy of Univ. of California Berkeley. -- +* -- April 2009 -- * -* -- LAPACK is a software package provided by Univ. of Tennessee, -- -* -- Univ. of California Berkeley and NAG Ltd. -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * IMPLICIT NONE * .. diff --git a/SRC/sposv.f b/SRC/sposv.f index 0e030990..f88006ef 100644 --- a/SRC/sposv.f +++ b/SRC/sposv.f @@ -1,7 +1,8 @@ SUBROUTINE SPOSV( UPLO, N, NRHS, A, LDA, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sposvx.f b/SRC/sposvx.f index e916916a..fa1c1166 100644 --- a/SRC/sposvx.f +++ b/SRC/sposvx.f @@ -3,7 +3,8 @@ $ IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spotf2.f b/SRC/spotf2.f index da48261b..fd8d1899 100644 --- a/SRC/spotf2.f +++ b/SRC/spotf2.f @@ -1,7 +1,8 @@ SUBROUTINE SPOTF2( UPLO, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spotrf.f b/SRC/spotrf.f index 6da443fa..0af0c91a 100644 --- a/SRC/spotrf.f +++ b/SRC/spotrf.f @@ -1,7 +1,8 @@ SUBROUTINE SPOTRF( UPLO, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spotri.f b/SRC/spotri.f index ce217072..59c21cc5 100644 --- a/SRC/spotri.f +++ b/SRC/spotri.f @@ -1,7 +1,8 @@ SUBROUTINE SPOTRI( UPLO, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spotrs.f b/SRC/spotrs.f index bcc99e6b..6c2c7cbb 100644 --- a/SRC/spotrs.f +++ b/SRC/spotrs.f @@ -1,7 +1,8 @@ SUBROUTINE SPOTRS( UPLO, N, NRHS, A, LDA, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sppcon.f b/SRC/sppcon.f index f9f55a1c..ddc9ec9c 100644 --- a/SRC/sppcon.f +++ b/SRC/sppcon.f @@ -1,7 +1,8 @@ SUBROUTINE SPPCON( UPLO, N, AP, ANORM, RCOND, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/sppequ.f b/SRC/sppequ.f index 7b9c6190..0fea6abe 100644 --- a/SRC/sppequ.f +++ b/SRC/sppequ.f @@ -1,7 +1,8 @@ SUBROUTINE SPPEQU( UPLO, N, AP, S, SCOND, AMAX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spprfs.f b/SRC/spprfs.f index 6d59328c..197595b4 100644 --- a/SRC/spprfs.f +++ b/SRC/spprfs.f @@ -2,7 +2,8 @@ $ BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/sppsv.f b/SRC/sppsv.f index 04761648..2b71a068 100644 --- a/SRC/sppsv.f +++ b/SRC/sppsv.f @@ -1,7 +1,8 @@ SUBROUTINE SPPSV( UPLO, N, NRHS, AP, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sppsvx.f b/SRC/sppsvx.f index ba114c41..578785b4 100644 --- a/SRC/sppsvx.f +++ b/SRC/sppsvx.f @@ -2,7 +2,8 @@ $ X, LDX, RCOND, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spptrf.f b/SRC/spptrf.f index 5035df9f..1ec242ff 100644 --- a/SRC/spptrf.f +++ b/SRC/spptrf.f @@ -1,7 +1,8 @@ SUBROUTINE SPPTRF( UPLO, N, AP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spptri.f b/SRC/spptri.f index 7b5bd68b..ff4e8507 100644 --- a/SRC/spptri.f +++ b/SRC/spptri.f @@ -1,7 +1,8 @@ SUBROUTINE SPPTRI( UPLO, N, AP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spptrs.f b/SRC/spptrs.f index 118410c6..d729ed13 100644 --- a/SRC/spptrs.f +++ b/SRC/spptrs.f @@ -1,7 +1,8 @@ SUBROUTINE SPPTRS( UPLO, N, NRHS, AP, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sptcon.f b/SRC/sptcon.f index 4314684e..b556e8db 100644 --- a/SRC/sptcon.f +++ b/SRC/sptcon.f @@ -1,7 +1,8 @@ SUBROUTINE SPTCON( N, D, E, ANORM, RCOND, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spteqr.f b/SRC/spteqr.f index 8deeec39..3407e44d 100644 --- a/SRC/spteqr.f +++ b/SRC/spteqr.f @@ -1,7 +1,8 @@ SUBROUTINE SPTEQR( COMPZ, N, D, E, Z, LDZ, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sptrfs.f b/SRC/sptrfs.f index f3554131..865205cd 100644 --- a/SRC/sptrfs.f +++ b/SRC/sptrfs.f @@ -2,7 +2,8 @@ $ BERR, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sptsv.f b/SRC/sptsv.f index 7cea762e..f46a9b25 100644 --- a/SRC/sptsv.f +++ b/SRC/sptsv.f @@ -1,7 +1,8 @@ SUBROUTINE SPTSV( N, NRHS, D, E, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sptsvx.f b/SRC/sptsvx.f index 8f166db4..4ceb9239 100644 --- a/SRC/sptsvx.f +++ b/SRC/sptsvx.f @@ -2,7 +2,8 @@ $ RCOND, FERR, BERR, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spttrf.f b/SRC/spttrf.f index c806495e..1cc6a927 100644 --- a/SRC/spttrf.f +++ b/SRC/spttrf.f @@ -1,7 +1,8 @@ SUBROUTINE SPTTRF( N, D, E, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/spttrs.f b/SRC/spttrs.f index 0079d4df..35216666 100644 --- a/SRC/spttrs.f +++ b/SRC/spttrs.f @@ -1,7 +1,8 @@ SUBROUTINE SPTTRS( N, NRHS, D, E, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sptts2.f b/SRC/sptts2.f index 9701bff0..fdc56996 100644 --- a/SRC/sptts2.f +++ b/SRC/sptts2.f @@ -1,7 +1,8 @@ SUBROUTINE SPTTS2( N, NRHS, D, E, B, LDB ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/srscl.f b/SRC/srscl.f index a293f4ab..272a5614 100644 --- a/SRC/srscl.f +++ b/SRC/srscl.f @@ -1,7 +1,8 @@ SUBROUTINE SRSCL( N, SA, SX, INCX ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssbev.f b/SRC/ssbev.f index 3c0c3c34..3fea8fb1 100644 --- a/SRC/ssbev.f +++ b/SRC/ssbev.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssbevd.f b/SRC/ssbevd.f index 68254f0b..0be71686 100644 --- a/SRC/ssbevd.f +++ b/SRC/ssbevd.f @@ -2,7 +2,8 @@ $ LWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssbevx.f b/SRC/ssbevx.f index 237b5c37..b4cdc613 100644 --- a/SRC/ssbevx.f +++ b/SRC/ssbevx.f @@ -3,7 +3,8 @@ $ IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssbgst.f b/SRC/ssbgst.f index 4851b2d8..b33522e3 100644 --- a/SRC/ssbgst.f +++ b/SRC/ssbgst.f @@ -2,7 +2,8 @@ $ LDX, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssbgv.f b/SRC/ssbgv.f index 43e3b005..a2af0398 100644 --- a/SRC/ssbgv.f +++ b/SRC/ssbgv.f @@ -2,7 +2,8 @@ $ LDZ, WORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssbgvd.f b/SRC/ssbgvd.f index f1417b54..e0d83be2 100644 --- a/SRC/ssbgvd.f +++ b/SRC/ssbgvd.f @@ -2,7 +2,8 @@ $ Z, LDZ, WORK, LWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssbgvx.f b/SRC/ssbgvx.f index cdad14bb..6faaf8e8 100644 --- a/SRC/ssbgvx.f +++ b/SRC/ssbgvx.f @@ -3,7 +3,8 @@ $ LDZ, WORK, IWORK, IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssbtrd.f b/SRC/ssbtrd.f index 5bbe8708..7afccb98 100644 --- a/SRC/ssbtrd.f +++ b/SRC/ssbtrd.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sspcon.f b/SRC/sspcon.f index ddda639b..9afbaeaf 100644 --- a/SRC/sspcon.f +++ b/SRC/sspcon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 5 Feb 03, SJH. diff --git a/SRC/sspev.f b/SRC/sspev.f index 8f19fc77..9179cf25 100644 --- a/SRC/sspev.f +++ b/SRC/sspev.f @@ -1,7 +1,8 @@ SUBROUTINE SSPEV( JOBZ, UPLO, N, AP, W, Z, LDZ, WORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sspevd.f b/SRC/sspevd.f index 0d8ea132..fd8ec1a9 100644 --- a/SRC/sspevd.f +++ b/SRC/sspevd.f @@ -2,7 +2,8 @@ $ IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sspevx.f b/SRC/sspevx.f index 6577200e..e73d11a7 100644 --- a/SRC/sspevx.f +++ b/SRC/sspevx.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sspgst.f b/SRC/sspgst.f index 8bca8000..b8a0ca9f 100644 --- a/SRC/sspgst.f +++ b/SRC/sspgst.f @@ -1,7 +1,8 @@ SUBROUTINE SSPGST( ITYPE, UPLO, N, AP, BP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sspgv.f b/SRC/sspgv.f index d7e75398..269a53d7 100644 --- a/SRC/sspgv.f +++ b/SRC/sspgv.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sspgvd.f b/SRC/sspgvd.f index 39e14298..682a4852 100644 --- a/SRC/sspgvd.f +++ b/SRC/sspgvd.f @@ -2,7 +2,8 @@ $ LWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sspgvx.f b/SRC/sspgvx.f index 33be97ba..f8717c8a 100644 --- a/SRC/sspgvx.f +++ b/SRC/sspgvx.f @@ -3,7 +3,8 @@ $ IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssprfs.f b/SRC/ssprfs.f index 6d6e8bae..656ebfab 100644 --- a/SRC/ssprfs.f +++ b/SRC/ssprfs.f @@ -2,7 +2,8 @@ $ FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 5 Feb 03, SJH. diff --git a/SRC/sspsv.f b/SRC/sspsv.f index 956ecd40..de14e872 100644 --- a/SRC/sspsv.f +++ b/SRC/sspsv.f @@ -1,7 +1,8 @@ SUBROUTINE SSPSV( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sspsvx.f b/SRC/sspsvx.f index 69d3f77f..364a7707 100644 --- a/SRC/sspsvx.f +++ b/SRC/sspsvx.f @@ -2,7 +2,8 @@ $ LDX, RCOND, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssptrd.f b/SRC/ssptrd.f index 649e61c3..e4eabbf0 100644 --- a/SRC/ssptrd.f +++ b/SRC/ssptrd.f @@ -1,7 +1,8 @@ SUBROUTINE SSPTRD( UPLO, N, AP, D, E, TAU, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssptrf.f b/SRC/ssptrf.f index 3f4b84de..578383d5 100644 --- a/SRC/ssptrf.f +++ b/SRC/ssptrf.f @@ -1,7 +1,8 @@ SUBROUTINE SSPTRF( UPLO, N, AP, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssptri.f b/SRC/ssptri.f index 99ea5fdf..a00872bd 100644 --- a/SRC/ssptri.f +++ b/SRC/ssptri.f @@ -1,7 +1,8 @@ SUBROUTINE SSPTRI( UPLO, N, AP, IPIV, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssptrs.f b/SRC/ssptrs.f index da85425e..80e2e716 100644 --- a/SRC/ssptrs.f +++ b/SRC/ssptrs.f @@ -1,7 +1,8 @@ SUBROUTINE SSPTRS( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sstebz.f b/SRC/sstebz.f index a2180fdc..429de95d 100644 --- a/SRC/sstebz.f +++ b/SRC/sstebz.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * 8-18-00: Increase FUDGE factor for T3E (eca) * diff --git a/SRC/sstedc.f b/SRC/sstedc.f index e093e949..54583c12 100644 --- a/SRC/sstedc.f +++ b/SRC/sstedc.f @@ -2,7 +2,8 @@ $ LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sstegr.f b/SRC/sstegr.f index 022dc071..6ce90f75 100644 --- a/SRC/sstegr.f +++ b/SRC/sstegr.f @@ -6,7 +6,8 @@ * * * -- LAPACK computational routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sstein.f b/SRC/sstein.f index 4460ef79..fa7e8014 100644 --- a/SRC/sstein.f +++ b/SRC/sstein.f @@ -2,7 +2,8 @@ $ IWORK, IFAIL, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sstemr.f b/SRC/sstemr.f index 70fa1431..d0514cb3 100644 --- a/SRC/sstemr.f +++ b/SRC/sstemr.f @@ -3,9 +3,10 @@ $ IWORK, LIWORK, INFO ) IMPLICIT NONE * -* -- LAPACK computational routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK computational routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. CHARACTER JOBZ, RANGE diff --git a/SRC/ssteqr.f b/SRC/ssteqr.f index 26edf4d6..952fb502 100644 --- a/SRC/ssteqr.f +++ b/SRC/ssteqr.f @@ -1,7 +1,8 @@ SUBROUTINE SSTEQR( COMPZ, N, D, E, Z, LDZ, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssterf.f b/SRC/ssterf.f index 5332578e..a51c379d 100644 --- a/SRC/ssterf.f +++ b/SRC/ssterf.f @@ -1,7 +1,8 @@ SUBROUTINE SSTERF( N, D, E, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sstev.f b/SRC/sstev.f index f934c5d8..0da67972 100644 --- a/SRC/sstev.f +++ b/SRC/sstev.f @@ -1,7 +1,8 @@ SUBROUTINE SSTEV( JOBZ, N, D, E, Z, LDZ, WORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sstevd.f b/SRC/sstevd.f index 247a3973..d44efeb7 100644 --- a/SRC/sstevd.f +++ b/SRC/sstevd.f @@ -2,7 +2,8 @@ $ LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sstevr.f b/SRC/sstevr.f index 50b88ba7..94bac8d2 100644 --- a/SRC/sstevr.f +++ b/SRC/sstevr.f @@ -3,7 +3,8 @@ $ LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/sstevx.f b/SRC/sstevx.f index b760daa9..028c5ae6 100644 --- a/SRC/sstevx.f +++ b/SRC/sstevx.f @@ -2,7 +2,8 @@ $ M, W, Z, LDZ, WORK, IWORK, IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssycon.f b/SRC/ssycon.f index 6264522b..377aa804 100644 --- a/SRC/ssycon.f +++ b/SRC/ssycon.f @@ -2,7 +2,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/ssyev.f b/SRC/ssyev.f index 5a314438..dc295318 100644 --- a/SRC/ssyev.f +++ b/SRC/ssyev.f @@ -1,7 +1,8 @@ SUBROUTINE SSYEV( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssyevd.f b/SRC/ssyevd.f index 83f11147..f5285834 100644 --- a/SRC/ssyevd.f +++ b/SRC/ssyevd.f @@ -2,7 +2,8 @@ $ LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssyevr.f b/SRC/ssyevr.f index 2c9cffea..74e0ef20 100644 --- a/SRC/ssyevr.f +++ b/SRC/ssyevr.f @@ -3,7 +3,8 @@ $ IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssyevx.f b/SRC/ssyevx.f index 2bb03993..1bf53a2b 100644 --- a/SRC/ssyevx.f +++ b/SRC/ssyevx.f @@ -3,7 +3,8 @@ $ IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssygs2.f b/SRC/ssygs2.f index d21e92d3..50c73ab8 100644 --- a/SRC/ssygs2.f +++ b/SRC/ssygs2.f @@ -1,7 +1,8 @@ SUBROUTINE SSYGS2( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssygst.f b/SRC/ssygst.f index 5e132bb0..e9fb56d5 100644 --- a/SRC/ssygst.f +++ b/SRC/ssygst.f @@ -1,7 +1,8 @@ SUBROUTINE SSYGST( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssygv.f b/SRC/ssygv.f index 58d55959..e1c623e3 100644 --- a/SRC/ssygv.f +++ b/SRC/ssygv.f @@ -2,7 +2,8 @@ $ LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssygvd.f b/SRC/ssygvd.f index ac2d45d1..432eb1a4 100644 --- a/SRC/ssygvd.f +++ b/SRC/ssygvd.f @@ -2,7 +2,8 @@ $ LWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssygvx.f b/SRC/ssygvx.f index 89760cf6..d8446f2c 100644 --- a/SRC/ssygvx.f +++ b/SRC/ssygvx.f @@ -3,7 +3,8 @@ $ LWORK, IWORK, IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssyrfs.f b/SRC/ssyrfs.f index d817a04d..25ab28d9 100644 --- a/SRC/ssyrfs.f +++ b/SRC/ssyrfs.f @@ -2,7 +2,8 @@ $ X, LDX, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/ssyrfsx.f b/SRC/ssyrfsx.f index 07d3c85b..d4fba620 100644 --- a/SRC/ssyrfsx.f +++ b/SRC/ssyrfsx.f @@ -3,10 +3,10 @@ $ ERR_BNDS_NORM, ERR_BNDS_COMP, NPARAMS, PARAMS, $ WORK, IWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/ssysv.f b/SRC/ssysv.f index d532e7a5..bcefac89 100644 --- a/SRC/ssysv.f +++ b/SRC/ssysv.f @@ -2,7 +2,8 @@ $ LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssysvx.f b/SRC/ssysvx.f index 9f8065ff..4dcc0e12 100644 --- a/SRC/ssysvx.f +++ b/SRC/ssysvx.f @@ -3,7 +3,8 @@ $ IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssysvxx.f b/SRC/ssysvxx.f index d4121db3..db43aa36 100644 --- a/SRC/ssysvxx.f +++ b/SRC/ssysvxx.f @@ -3,10 +3,10 @@ $ N_ERR_BNDS, ERR_BNDS_NORM, ERR_BNDS_COMP, $ NPARAMS, PARAMS, WORK, IWORK, INFO ) * -* -- LAPACK driver routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/ssytd2.f b/SRC/ssytd2.f index 36b2b658..576450d0 100644 --- a/SRC/ssytd2.f +++ b/SRC/ssytd2.f @@ -1,7 +1,8 @@ SUBROUTINE SSYTD2( UPLO, N, A, LDA, D, E, TAU, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssytf2.f b/SRC/ssytf2.f index 8e620b96..c20b4747 100644 --- a/SRC/ssytf2.f +++ b/SRC/ssytf2.f @@ -1,7 +1,8 @@ SUBROUTINE SSYTF2( UPLO, N, A, LDA, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssytrd.f b/SRC/ssytrd.f index 75173f19..3399e5e3 100644 --- a/SRC/ssytrd.f +++ b/SRC/ssytrd.f @@ -1,7 +1,8 @@ SUBROUTINE SSYTRD( UPLO, N, A, LDA, D, E, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssytrf.f b/SRC/ssytrf.f index f9285a2e..46a1af8c 100644 --- a/SRC/ssytrf.f +++ b/SRC/ssytrf.f @@ -1,7 +1,8 @@ SUBROUTINE SSYTRF( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssytri.f b/SRC/ssytri.f index e0f48ffd..0ce0701d 100644 --- a/SRC/ssytri.f +++ b/SRC/ssytri.f @@ -1,7 +1,8 @@ SUBROUTINE SSYTRI( UPLO, N, A, LDA, IPIV, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ssytrs.f b/SRC/ssytrs.f index 138f36c6..9d2c8066 100644 --- a/SRC/ssytrs.f +++ b/SRC/ssytrs.f @@ -1,7 +1,8 @@ SUBROUTINE SSYTRS( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/stbcon.f b/SRC/stbcon.f index a9a2dc77..4e85f814 100644 --- a/SRC/stbcon.f +++ b/SRC/stbcon.f @@ -2,7 +2,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/stbrfs.f b/SRC/stbrfs.f index 4cdb6946..178d3afe 100644 --- a/SRC/stbrfs.f +++ b/SRC/stbrfs.f @@ -2,7 +2,8 @@ $ LDB, X, LDX, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/stbtrs.f b/SRC/stbtrs.f index c77024b3..688aebea 100644 --- a/SRC/stbtrs.f +++ b/SRC/stbtrs.f @@ -2,7 +2,8 @@ $ LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/stfsm.f b/SRC/stfsm.f index 05ca537c..d06c5e92 100644 --- a/SRC/stfsm.f +++ b/SRC/stfsm.f @@ -1,10 +1,10 @@ SUBROUTINE STFSM( TRANSR, SIDE, UPLO, TRANS, DIAG, M, N, ALPHA, A, + B, LDB ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/stftri.f b/SRC/stftri.f index 59af8a9a..bf2f9368 100644 --- a/SRC/stftri.f +++ b/SRC/stftri.f @@ -1,9 +1,9 @@ SUBROUTINE STFTRI( TRANSR, UPLO, DIAG, N, A, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/stfttp.f b/SRC/stfttp.f index 3ccb5881..38c6ed48 100644 --- a/SRC/stfttp.f +++ b/SRC/stfttp.f @@ -1,9 +1,9 @@ SUBROUTINE STFTTP( TRANSR, UPLO, N, ARF, AP, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/stfttr.f b/SRC/stfttr.f index dcadbef5..089fc12e 100644 --- a/SRC/stfttr.f +++ b/SRC/stfttr.f @@ -1,9 +1,9 @@ SUBROUTINE STFTTR( TRANSR, UPLO, N, ARF, A, LDA, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/stgevc.f b/SRC/stgevc.f index 0b580f19..78b6651d 100644 --- a/SRC/stgevc.f +++ b/SRC/stgevc.f @@ -2,7 +2,8 @@ $ LDVL, VR, LDVR, MM, M, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/stgex2.f b/SRC/stgex2.f index 8cb944c4..99599e63 100644 --- a/SRC/stgex2.f +++ b/SRC/stgex2.f @@ -2,7 +2,8 @@ $ LDZ, J1, N1, N2, WORK, LWORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/stgexc.f b/SRC/stgexc.f index fee6f64f..7ff8bd6b 100644 --- a/SRC/stgexc.f +++ b/SRC/stgexc.f @@ -2,7 +2,8 @@ $ LDZ, IFST, ILST, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/stgsen.f b/SRC/stgsen.f index 6de8f49e..58a4ba9a 100644 --- a/SRC/stgsen.f +++ b/SRC/stgsen.f @@ -3,7 +3,8 @@ $ PR, DIF, WORK, LWORK, IWORK, LIWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2007 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/stgsja.f b/SRC/stgsja.f index 5acf5077..d96bad59 100644 --- a/SRC/stgsja.f +++ b/SRC/stgsja.f @@ -2,9 +2,10 @@ $ LDB, TOLA, TOLB, ALPHA, BETA, U, LDU, V, LDV, $ Q, LDQ, WORK, NCYCLE, INFO ) * -* -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. CHARACTER JOBQ, JOBU, JOBV diff --git a/SRC/stgsna.f b/SRC/stgsna.f index 732f4f32..39fb8eea 100644 --- a/SRC/stgsna.f +++ b/SRC/stgsna.f @@ -3,7 +3,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/stgsy2.f b/SRC/stgsy2.f index 2ba3dd70..2f57f3ce 100644 --- a/SRC/stgsy2.f +++ b/SRC/stgsy2.f @@ -3,7 +3,8 @@ $ IWORK, PQ, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2007 * * .. Scalar Arguments .. diff --git a/SRC/stgsyl.f b/SRC/stgsyl.f index 77f68c87..beff0470 100644 --- a/SRC/stgsyl.f +++ b/SRC/stgsyl.f @@ -3,7 +3,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/stpcon.f b/SRC/stpcon.f index 3e357a88..31822b0b 100644 --- a/SRC/stpcon.f +++ b/SRC/stpcon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/stprfs.f b/SRC/stprfs.f index 5e4eb7e0..d73f59ce 100644 --- a/SRC/stprfs.f +++ b/SRC/stprfs.f @@ -2,7 +2,8 @@ $ FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/stptri.f b/SRC/stptri.f index 2e8e8963..d17ea2a8 100644 --- a/SRC/stptri.f +++ b/SRC/stptri.f @@ -1,7 +1,8 @@ SUBROUTINE STPTRI( UPLO, DIAG, N, AP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/stptrs.f b/SRC/stptrs.f index 8d0ea113..65e60d24 100644 --- a/SRC/stptrs.f +++ b/SRC/stptrs.f @@ -1,7 +1,8 @@ SUBROUTINE STPTRS( UPLO, TRANS, DIAG, N, NRHS, AP, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/stpttf.f b/SRC/stpttf.f index 6fe95433..59411c9e 100644 --- a/SRC/stpttf.f +++ b/SRC/stpttf.f @@ -1,9 +1,9 @@ SUBROUTINE STPTTF( TRANSR, UPLO, N, AP, ARF, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/strcon.f b/SRC/strcon.f index fd663ee6..295481e9 100644 --- a/SRC/strcon.f +++ b/SRC/strcon.f @@ -2,7 +2,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/strevc.f b/SRC/strevc.f index 3a57f3f7..1ffb629d 100644 --- a/SRC/strevc.f +++ b/SRC/strevc.f @@ -2,7 +2,8 @@ $ LDVR, MM, M, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/strexc.f b/SRC/strexc.f index 48d8b0ab..a98aca61 100644 --- a/SRC/strexc.f +++ b/SRC/strexc.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/strrfs.f b/SRC/strrfs.f index d737b26c..2a368d98 100644 --- a/SRC/strrfs.f +++ b/SRC/strrfs.f @@ -2,7 +2,8 @@ $ LDX, FERR, BERR, WORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/strsen.f b/SRC/strsen.f index 0800c19b..8054d6c2 100644 --- a/SRC/strsen.f +++ b/SRC/strsen.f @@ -2,7 +2,8 @@ $ M, S, SEP, WORK, LWORK, IWORK, LIWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/strsna.f b/SRC/strsna.f index 570a0172..5324b798 100644 --- a/SRC/strsna.f +++ b/SRC/strsna.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call SLACN2 in place of SLACON, 7 Feb 03, SJH. diff --git a/SRC/strsyl.f b/SRC/strsyl.f index 53d68603..f2246acb 100644 --- a/SRC/strsyl.f +++ b/SRC/strsyl.f @@ -2,7 +2,8 @@ $ LDC, SCALE, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/strti2.f b/SRC/strti2.f index 1085a8e3..27519f71 100644 --- a/SRC/strti2.f +++ b/SRC/strti2.f @@ -1,7 +1,8 @@ SUBROUTINE STRTI2( UPLO, DIAG, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/strtri.f b/SRC/strtri.f index b758043d..e5f183c8 100644 --- a/SRC/strtri.f +++ b/SRC/strtri.f @@ -1,7 +1,8 @@ SUBROUTINE STRTRI( UPLO, DIAG, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/strtrs.f b/SRC/strtrs.f index cbaecad7..8dc42508 100644 --- a/SRC/strtrs.f +++ b/SRC/strtrs.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/strttf.f b/SRC/strttf.f index ec3e9c1b..882194c8 100644 --- a/SRC/strttf.f +++ b/SRC/strttf.f @@ -1,9 +1,9 @@ SUBROUTINE STRTTF( TRANSR, UPLO, N, A, LDA, ARF, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/stzrqf.f b/SRC/stzrqf.f index e8749c0c..30b4e206 100644 --- a/SRC/stzrqf.f +++ b/SRC/stzrqf.f @@ -1,7 +1,8 @@ SUBROUTINE STZRQF( M, N, A, LDA, TAU, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/stzrzf.f b/SRC/stzrzf.f index 14894ee4..b1bdc236 100644 --- a/SRC/stzrzf.f +++ b/SRC/stzrzf.f @@ -1,7 +1,8 @@ SUBROUTINE STZRZF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/xerbla.f b/SRC/xerbla.f index cef5464d..bb860dae 100644 --- a/SRC/xerbla.f +++ b/SRC/xerbla.f @@ -1,7 +1,8 @@ SUBROUTINE XERBLA( SRNAME, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/xerbla_array.f b/SRC/xerbla_array.f index 350b59bc..3e2ccd14 100644 --- a/SRC/xerbla_array.f +++ b/SRC/xerbla_array.f @@ -1,8 +1,11 @@ SUBROUTINE XERBLA_ARRAY(SRNAME_ARRAY, SRNAME_LEN, INFO) * -* -- LAPACK auxiliary routine (version 3.0) -- -* Univ. of Tennessee, Univ. of California Berkeley, NAG Ltd., -* September 19, 2006 +* -- LAPACK auxiliary routine (version 3.2.1) -- +* +* -- April 2009 +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * IMPLICIT NONE * .. Scalar Arguments .. diff --git a/SRC/zbdsqr.f b/SRC/zbdsqr.f index 64be5273..4335fc4f 100644 --- a/SRC/zbdsqr.f +++ b/SRC/zbdsqr.f @@ -2,7 +2,8 @@ $ LDU, C, LDC, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zcgesv.f b/SRC/zcgesv.f index a6e6aa8e..b974de3c 100644 --- a/SRC/zcgesv.f +++ b/SRC/zcgesv.f @@ -2,7 +2,8 @@ + SWORK, RWORK, ITER, INFO ) * * -- LAPACK PROTOTYPE driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2007 * * .. diff --git a/SRC/zcposv.f b/SRC/zcposv.f index 0cb60fcc..8695db0a 100644 --- a/SRC/zcposv.f +++ b/SRC/zcposv.f @@ -1,10 +1,12 @@ SUBROUTINE ZCPOSV( UPLO, N, NRHS, A, LDA, B, LDB, X, LDX, WORK, + SWORK, RWORK, ITER, INFO ) * -* -- LAPACK PROTOTYPE driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd.. -* November 2008 +* -- LAPACK PROTOTYPE driver routine (version 3.2.1) -- * +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * .. * .. Scalar Arguments .. CHARACTER UPLO diff --git a/SRC/zdrscl.f b/SRC/zdrscl.f index dc6faae2..5e241643 100644 --- a/SRC/zdrscl.f +++ b/SRC/zdrscl.f @@ -1,7 +1,8 @@ SUBROUTINE ZDRSCL( N, SA, SX, INCX ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgbbrd.f b/SRC/zgbbrd.f index 8a216850..66e0d5c7 100644 --- a/SRC/zgbbrd.f +++ b/SRC/zgbbrd.f @@ -2,7 +2,8 @@ $ LDQ, PT, LDPT, C, LDC, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgbcon.f b/SRC/zgbcon.f index e6c64605..37138bb5 100644 --- a/SRC/zgbcon.f +++ b/SRC/zgbcon.f @@ -2,7 +2,8 @@ $ WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zgbequ.f b/SRC/zgbequ.f index 9db47bb6..7d6addb0 100644 --- a/SRC/zgbequ.f +++ b/SRC/zgbequ.f @@ -2,7 +2,8 @@ $ AMAX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgbrfs.f b/SRC/zgbrfs.f index f916da70..1e200be4 100644 --- a/SRC/zgbrfs.f +++ b/SRC/zgbrfs.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zgbrfsx.f b/SRC/zgbrfsx.f index c2b59a98..0aa159fc 100644 --- a/SRC/zgbrfsx.f +++ b/SRC/zgbrfsx.f @@ -4,10 +4,10 @@ $ ERR_BNDS_COMP, NPARAMS, PARAMS, WORK, RWORK, $ INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zgbsv.f b/SRC/zgbsv.f index 6ca78af9..be9c9cc1 100644 --- a/SRC/zgbsv.f +++ b/SRC/zgbsv.f @@ -1,7 +1,8 @@ SUBROUTINE ZGBSV( N, KL, KU, NRHS, AB, LDAB, IPIV, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgbsvx.f b/SRC/zgbsvx.f index 7b586859..54d10518 100644 --- a/SRC/zgbsvx.f +++ b/SRC/zgbsvx.f @@ -3,7 +3,8 @@ $ RCOND, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgbtf2.f b/SRC/zgbtf2.f index 5762e610..546814ef 100644 --- a/SRC/zgbtf2.f +++ b/SRC/zgbtf2.f @@ -1,7 +1,8 @@ SUBROUTINE ZGBTF2( M, N, KL, KU, AB, LDAB, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgbtrf.f b/SRC/zgbtrf.f index 2bebc288..a5c8b546 100644 --- a/SRC/zgbtrf.f +++ b/SRC/zgbtrf.f @@ -1,7 +1,8 @@ SUBROUTINE ZGBTRF( M, N, KL, KU, AB, LDAB, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgbtrs.f b/SRC/zgbtrs.f index a5cfb18f..af27ae8e 100644 --- a/SRC/zgbtrs.f +++ b/SRC/zgbtrs.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgebak.f b/SRC/zgebak.f index 75aa9d47..f2553e7d 100644 --- a/SRC/zgebak.f +++ b/SRC/zgebak.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgebal.f b/SRC/zgebal.f index ae1f0e7b..305bb550 100644 --- a/SRC/zgebal.f +++ b/SRC/zgebal.f @@ -1,7 +1,8 @@ SUBROUTINE ZGEBAL( JOB, N, A, LDA, ILO, IHI, SCALE, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgebd2.f b/SRC/zgebd2.f index 457e8c39..5effb30f 100644 --- a/SRC/zgebd2.f +++ b/SRC/zgebd2.f @@ -1,7 +1,8 @@ SUBROUTINE ZGEBD2( M, N, A, LDA, D, E, TAUQ, TAUP, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgebrd.f b/SRC/zgebrd.f index ef05537b..b78bbc71 100644 --- a/SRC/zgebrd.f +++ b/SRC/zgebrd.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgecon.f b/SRC/zgecon.f index 1415b71f..b969b58b 100644 --- a/SRC/zgecon.f +++ b/SRC/zgecon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zgeequ.f b/SRC/zgeequ.f index 727ce450..befad1b6 100644 --- a/SRC/zgeequ.f +++ b/SRC/zgeequ.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgees.f b/SRC/zgees.f index b9b94e3b..d9712c7d 100644 --- a/SRC/zgees.f +++ b/SRC/zgees.f @@ -2,7 +2,8 @@ $ LDVS, WORK, LWORK, RWORK, BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgeesx.f b/SRC/zgeesx.f index 3c643b61..98af9a38 100644 --- a/SRC/zgeesx.f +++ b/SRC/zgeesx.f @@ -3,7 +3,8 @@ $ BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgeev.f b/SRC/zgeev.f index da33f8ab..3047e32f 100644 --- a/SRC/zgeev.f +++ b/SRC/zgeev.f @@ -2,7 +2,8 @@ $ WORK, LWORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgeevx.f b/SRC/zgeevx.f index 9e9d70b1..20fc5799 100644 --- a/SRC/zgeevx.f +++ b/SRC/zgeevx.f @@ -3,7 +3,8 @@ $ RCONDV, WORK, LWORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgegs.f b/SRC/zgegs.f index 1de40fba..fd645ff4 100644 --- a/SRC/zgegs.f +++ b/SRC/zgegs.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgegv.f b/SRC/zgegv.f index 90552dab..48670d79 100644 --- a/SRC/zgegv.f +++ b/SRC/zgegv.f @@ -2,7 +2,8 @@ $ VL, LDVL, VR, LDVR, WORK, LWORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgehd2.f b/SRC/zgehd2.f index f5fbbdf1..59d2fe68 100644 --- a/SRC/zgehd2.f +++ b/SRC/zgehd2.f @@ -1,7 +1,8 @@ SUBROUTINE ZGEHD2( N, ILO, IHI, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgehrd.f b/SRC/zgehrd.f index 51f1b94e..2599aad2 100644 --- a/SRC/zgehrd.f +++ b/SRC/zgehrd.f @@ -1,8 +1,9 @@ SUBROUTINE ZGEHRD( N, ILO, IHI, A, LDA, TAU, WORK, LWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. INTEGER IHI, ILO, INFO, LDA, LWORK, N diff --git a/SRC/zgelq2.f b/SRC/zgelq2.f index 34008f9e..04ad7df5 100644 --- a/SRC/zgelq2.f +++ b/SRC/zgelq2.f @@ -1,7 +1,8 @@ SUBROUTINE ZGELQ2( M, N, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgelqf.f b/SRC/zgelqf.f index 50fda2fb..c4ebe462 100644 --- a/SRC/zgelqf.f +++ b/SRC/zgelqf.f @@ -1,7 +1,8 @@ SUBROUTINE ZGELQF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgels.f b/SRC/zgels.f index b3eda37e..2e52b01b 100644 --- a/SRC/zgels.f +++ b/SRC/zgels.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgelsd.f b/SRC/zgelsd.f index 86ae7553..81cba67f 100644 --- a/SRC/zgelsd.f +++ b/SRC/zgelsd.f @@ -2,7 +2,8 @@ $ WORK, LWORK, RWORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgelss.f b/SRC/zgelss.f index f4acd16b..f59b829f 100644 --- a/SRC/zgelss.f +++ b/SRC/zgelss.f @@ -2,7 +2,8 @@ $ WORK, LWORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgelsx.f b/SRC/zgelsx.f index 11f465c8..73182e70 100644 --- a/SRC/zgelsx.f +++ b/SRC/zgelsx.f @@ -2,7 +2,8 @@ $ WORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgelsy.f b/SRC/zgelsy.f index 7a196956..adacdf60 100644 --- a/SRC/zgelsy.f +++ b/SRC/zgelsy.f @@ -2,7 +2,8 @@ $ WORK, LWORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgeql2.f b/SRC/zgeql2.f index 0542f4e5..b8fb8636 100644 --- a/SRC/zgeql2.f +++ b/SRC/zgeql2.f @@ -1,7 +1,8 @@ SUBROUTINE ZGEQL2( M, N, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgeqlf.f b/SRC/zgeqlf.f index 765ca8b3..8fb64426 100644 --- a/SRC/zgeqlf.f +++ b/SRC/zgeqlf.f @@ -1,7 +1,8 @@ SUBROUTINE ZGEQLF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgeqp3.f b/SRC/zgeqp3.f index aad21e51..870d2734 100644 --- a/SRC/zgeqp3.f +++ b/SRC/zgeqp3.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgeqpf.f b/SRC/zgeqpf.f index e551c0a7..19fe2ad2 100644 --- a/SRC/zgeqpf.f +++ b/SRC/zgeqpf.f @@ -1,7 +1,8 @@ SUBROUTINE ZGEQPF( M, N, A, LDA, JPVT, TAU, WORK, RWORK, INFO ) * * -- LAPACK deprecated driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgeqr2.f b/SRC/zgeqr2.f index 6149187c..2924f8c9 100644 --- a/SRC/zgeqr2.f +++ b/SRC/zgeqr2.f @@ -1,7 +1,8 @@ SUBROUTINE ZGEQR2( M, N, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgeqrf.f b/SRC/zgeqrf.f index 4b2a71e7..e0a2eeb4 100644 --- a/SRC/zgeqrf.f +++ b/SRC/zgeqrf.f @@ -1,7 +1,8 @@ SUBROUTINE ZGEQRF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgerfs.f b/SRC/zgerfs.f index cc1e24de..1e961185 100644 --- a/SRC/zgerfs.f +++ b/SRC/zgerfs.f @@ -2,7 +2,8 @@ $ X, LDX, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zgerfsx.f b/SRC/zgerfsx.f index 386e92d7..7efa6909 100644 --- a/SRC/zgerfsx.f +++ b/SRC/zgerfsx.f @@ -3,10 +3,10 @@ $ ERR_BNDS_NORM, ERR_BNDS_COMP, NPARAMS, PARAMS, $ WORK, RWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zgerq2.f b/SRC/zgerq2.f index 892a58da..7fcccc4e 100644 --- a/SRC/zgerq2.f +++ b/SRC/zgerq2.f @@ -1,7 +1,8 @@ SUBROUTINE ZGERQ2( M, N, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgerqf.f b/SRC/zgerqf.f index 5ad149bd..7a86a18b 100644 --- a/SRC/zgerqf.f +++ b/SRC/zgerqf.f @@ -1,7 +1,8 @@ SUBROUTINE ZGERQF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgesc2.f b/SRC/zgesc2.f index 34a9ca44..3ceddfd2 100644 --- a/SRC/zgesc2.f +++ b/SRC/zgesc2.f @@ -1,7 +1,8 @@ SUBROUTINE ZGESC2( N, A, LDA, RHS, IPIV, JPIV, SCALE ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgesdd.f b/SRC/zgesdd.f index 7bc6d8af..3ad2f0ba 100644 --- a/SRC/zgesdd.f +++ b/SRC/zgesdd.f @@ -2,7 +2,8 @@ $ LWORK, RWORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * 8-15-00: Improve consistency of WS calculations (eca) * diff --git a/SRC/zgesv.f b/SRC/zgesv.f index d04e21f5..6b83e81b 100644 --- a/SRC/zgesv.f +++ b/SRC/zgesv.f @@ -1,7 +1,8 @@ SUBROUTINE ZGESV( N, NRHS, A, LDA, IPIV, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgesvd.f b/SRC/zgesvd.f index e969d60f..abd5f582 100644 --- a/SRC/zgesvd.f +++ b/SRC/zgesvd.f @@ -2,7 +2,8 @@ $ WORK, LWORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgesvx.f b/SRC/zgesvx.f index d4ca0575..42f30853 100644 --- a/SRC/zgesvx.f +++ b/SRC/zgesvx.f @@ -3,7 +3,8 @@ $ WORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgesvxx.f b/SRC/zgesvxx.f index 0a059429..b752a3d5 100644 --- a/SRC/zgesvxx.f +++ b/SRC/zgesvxx.f @@ -4,10 +4,10 @@ $ ERR_BNDS_COMP, NPARAMS, PARAMS, WORK, RWORK, $ INFO ) * -* -- LAPACK driver routine (version 3.2) -- +* -- LAPACK driver routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zgetc2.f b/SRC/zgetc2.f index d84e28d8..b44ed200 100644 --- a/SRC/zgetc2.f +++ b/SRC/zgetc2.f @@ -1,7 +1,8 @@ SUBROUTINE ZGETC2( N, A, LDA, IPIV, JPIV, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgetf2.f b/SRC/zgetf2.f index 6cec496e..79c2170f 100644 --- a/SRC/zgetf2.f +++ b/SRC/zgetf2.f @@ -1,7 +1,8 @@ SUBROUTINE ZGETF2( M, N, A, LDA, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgetrf.f b/SRC/zgetrf.f index e8d06c75..23aabe9c 100644 --- a/SRC/zgetrf.f +++ b/SRC/zgetrf.f @@ -1,7 +1,8 @@ SUBROUTINE ZGETRF( M, N, A, LDA, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgetri.f b/SRC/zgetri.f index 0c130b28..188a3817 100644 --- a/SRC/zgetri.f +++ b/SRC/zgetri.f @@ -1,7 +1,8 @@ SUBROUTINE ZGETRI( N, A, LDA, IPIV, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgetrs.f b/SRC/zgetrs.f index 91398c6f..ce459b55 100644 --- a/SRC/zgetrs.f +++ b/SRC/zgetrs.f @@ -1,7 +1,8 @@ SUBROUTINE ZGETRS( TRANS, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zggbak.f b/SRC/zggbak.f index 69ef2930..d5cb78cc 100644 --- a/SRC/zggbak.f +++ b/SRC/zggbak.f @@ -2,7 +2,8 @@ $ LDV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zggbal.f b/SRC/zggbal.f index 42a0e100..0ac77978 100644 --- a/SRC/zggbal.f +++ b/SRC/zggbal.f @@ -2,7 +2,8 @@ $ RSCALE, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgges.f b/SRC/zgges.f index 3c5fd717..5f41fb61 100644 --- a/SRC/zgges.f +++ b/SRC/zgges.f @@ -3,7 +3,8 @@ $ LWORK, RWORK, BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zggesx.f b/SRC/zggesx.f index 13f980be..66fc5b96 100644 --- a/SRC/zggesx.f +++ b/SRC/zggesx.f @@ -4,7 +4,8 @@ $ IWORK, LIWORK, BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zggev.f b/SRC/zggev.f index ae32b3bd..d460f011 100644 --- a/SRC/zggev.f +++ b/SRC/zggev.f @@ -2,7 +2,8 @@ $ VL, LDVL, VR, LDVR, WORK, LWORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zggevx.f b/SRC/zggevx.f index 16469351..eb621968 100644 --- a/SRC/zggevx.f +++ b/SRC/zggevx.f @@ -4,7 +4,8 @@ $ WORK, LWORK, RWORK, IWORK, BWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zggglm.f b/SRC/zggglm.f index 5f3b03f4..8f3a0352 100644 --- a/SRC/zggglm.f +++ b/SRC/zggglm.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgghrd.f b/SRC/zgghrd.f index fa29e730..a628bc74 100644 --- a/SRC/zgghrd.f +++ b/SRC/zgghrd.f @@ -2,7 +2,8 @@ $ LDQ, Z, LDZ, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgglse.f b/SRC/zgglse.f index 0438218c..853b0aad 100644 --- a/SRC/zgglse.f +++ b/SRC/zgglse.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * February 2007 * * .. Scalar Arguments .. diff --git a/SRC/zggqrf.f b/SRC/zggqrf.f index fd55e622..b04615b9 100644 --- a/SRC/zggqrf.f +++ b/SRC/zggqrf.f @@ -2,7 +2,8 @@ $ LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zggrqf.f b/SRC/zggrqf.f index 3cbc1d79..c112c5f9 100644 --- a/SRC/zggrqf.f +++ b/SRC/zggrqf.f @@ -2,7 +2,8 @@ $ LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zggsvd.f b/SRC/zggsvd.f index 916af6a3..6727531c 100644 --- a/SRC/zggsvd.f +++ b/SRC/zggsvd.f @@ -3,7 +3,8 @@ $ RWORK, IWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zggsvp.f b/SRC/zggsvp.f index 4dba1bc4..8db862fd 100644 --- a/SRC/zggsvp.f +++ b/SRC/zggsvp.f @@ -3,7 +3,8 @@ $ IWORK, RWORK, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgtcon.f b/SRC/zgtcon.f index 97532fe2..1b2e1ff7 100644 --- a/SRC/zgtcon.f +++ b/SRC/zgtcon.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zgtrfs.f b/SRC/zgtrfs.f index 0dbd14e5..b75759a2 100644 --- a/SRC/zgtrfs.f +++ b/SRC/zgtrfs.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zgtsv.f b/SRC/zgtsv.f index c97bc7a3..92cf4153 100644 --- a/SRC/zgtsv.f +++ b/SRC/zgtsv.f @@ -1,7 +1,8 @@ SUBROUTINE ZGTSV( N, NRHS, DL, D, DU, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgtsvx.f b/SRC/zgtsvx.f index ceb4bc94..1524167d 100644 --- a/SRC/zgtsvx.f +++ b/SRC/zgtsvx.f @@ -3,7 +3,8 @@ $ WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgttrf.f b/SRC/zgttrf.f index 24c9b0d7..d410b6f8 100644 --- a/SRC/zgttrf.f +++ b/SRC/zgttrf.f @@ -1,7 +1,8 @@ SUBROUTINE ZGTTRF( N, DL, D, DU, DU2, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgttrs.f b/SRC/zgttrs.f index d07e59a6..afe0657c 100644 --- a/SRC/zgttrs.f +++ b/SRC/zgttrs.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zgtts2.f b/SRC/zgtts2.f index 264b4bc5..d3e57337 100644 --- a/SRC/zgtts2.f +++ b/SRC/zgtts2.f @@ -1,7 +1,8 @@ SUBROUTINE ZGTTS2( ITRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhbev.f b/SRC/zhbev.f index ddaa73e3..adfaed02 100644 --- a/SRC/zhbev.f +++ b/SRC/zhbev.f @@ -2,7 +2,8 @@ $ RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhbevd.f b/SRC/zhbevd.f index d4b59481..d41fb4eb 100644 --- a/SRC/zhbevd.f +++ b/SRC/zhbevd.f @@ -2,7 +2,8 @@ $ LWORK, RWORK, LRWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhbevx.f b/SRC/zhbevx.f index a68b3cb9..b3eea5eb 100644 --- a/SRC/zhbevx.f +++ b/SRC/zhbevx.f @@ -3,7 +3,8 @@ $ IWORK, IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhbgst.f b/SRC/zhbgst.f index 8e9793d0..01a295ec 100644 --- a/SRC/zhbgst.f +++ b/SRC/zhbgst.f @@ -2,7 +2,8 @@ $ LDX, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhbgv.f b/SRC/zhbgv.f index 124fc907..6a53c89e 100644 --- a/SRC/zhbgv.f +++ b/SRC/zhbgv.f @@ -2,7 +2,8 @@ $ LDZ, WORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhbgvd.f b/SRC/zhbgvd.f index 75b66bc5..da22e08d 100644 --- a/SRC/zhbgvd.f +++ b/SRC/zhbgvd.f @@ -3,7 +3,8 @@ $ LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhbgvx.f b/SRC/zhbgvx.f index 8a96a79b..d2a198c5 100644 --- a/SRC/zhbgvx.f +++ b/SRC/zhbgvx.f @@ -3,7 +3,8 @@ $ LDZ, WORK, RWORK, IWORK, IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhbtrd.f b/SRC/zhbtrd.f index 94acc5bf..8b4f4f42 100644 --- a/SRC/zhbtrd.f +++ b/SRC/zhbtrd.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhecon.f b/SRC/zhecon.f index d7e9403c..5b35d75d 100644 --- a/SRC/zhecon.f +++ b/SRC/zhecon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zheev.f b/SRC/zheev.f index d447e03e..4c97b2d9 100644 --- a/SRC/zheev.f +++ b/SRC/zheev.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zheevd.f b/SRC/zheevd.f index 25aefc02..dc650a69 100644 --- a/SRC/zheevd.f +++ b/SRC/zheevd.f @@ -2,7 +2,8 @@ $ LRWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zheevr.f b/SRC/zheevr.f index 187bb3bc..9f83d980 100644 --- a/SRC/zheevr.f +++ b/SRC/zheevr.f @@ -3,7 +3,8 @@ $ RWORK, LRWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zheevx.f b/SRC/zheevx.f index 42485003..a200c31b 100644 --- a/SRC/zheevx.f +++ b/SRC/zheevx.f @@ -3,7 +3,8 @@ $ IWORK, IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhegs2.f b/SRC/zhegs2.f index e86bc36e..05e90b50 100644 --- a/SRC/zhegs2.f +++ b/SRC/zhegs2.f @@ -1,7 +1,8 @@ SUBROUTINE ZHEGS2( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhegst.f b/SRC/zhegst.f index 6deed6f2..74dae9af 100644 --- a/SRC/zhegst.f +++ b/SRC/zhegst.f @@ -1,7 +1,8 @@ SUBROUTINE ZHEGST( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhegv.f b/SRC/zhegv.f index a93eea93..226ae26d 100644 --- a/SRC/zhegv.f +++ b/SRC/zhegv.f @@ -2,7 +2,8 @@ $ LWORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhegvd.f b/SRC/zhegvd.f index 0cc26a9e..786cbe13 100644 --- a/SRC/zhegvd.f +++ b/SRC/zhegvd.f @@ -2,7 +2,8 @@ $ LWORK, RWORK, LRWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhegvx.f b/SRC/zhegvx.f index 8bd07b11..cf11803b 100644 --- a/SRC/zhegvx.f +++ b/SRC/zhegvx.f @@ -3,7 +3,8 @@ $ LWORK, RWORK, IWORK, IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zherfs.f b/SRC/zherfs.f index b4d6626e..c09e044c 100644 --- a/SRC/zherfs.f +++ b/SRC/zherfs.f @@ -2,7 +2,8 @@ $ X, LDX, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zherfsx.f b/SRC/zherfsx.f index 18bed507..caea5469 100644 --- a/SRC/zherfsx.f +++ b/SRC/zherfsx.f @@ -3,10 +3,10 @@ $ ERR_BNDS_NORM, ERR_BNDS_COMP, NPARAMS, PARAMS, $ WORK, RWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zhesv.f b/SRC/zhesv.f index 728d83f1..e457d983 100644 --- a/SRC/zhesv.f +++ b/SRC/zhesv.f @@ -2,7 +2,8 @@ $ LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhesvx.f b/SRC/zhesvx.f index 6a27e6d3..8591af71 100644 --- a/SRC/zhesvx.f +++ b/SRC/zhesvx.f @@ -3,7 +3,8 @@ $ RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhesvxx.f b/SRC/zhesvxx.f index 40d28ab8..b6412cab 100644 --- a/SRC/zhesvxx.f +++ b/SRC/zhesvxx.f @@ -3,10 +3,10 @@ $ N_ERR_BNDS, ERR_BNDS_NORM, ERR_BNDS_COMP, $ NPARAMS, PARAMS, WORK, RWORK, INFO ) * -* -- LAPACK driver routine (version 3.2) -- +* -- LAPACK driver routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zhetd2.f b/SRC/zhetd2.f index 0b2652e4..997e6a02 100644 --- a/SRC/zhetd2.f +++ b/SRC/zhetd2.f @@ -1,7 +1,8 @@ SUBROUTINE ZHETD2( UPLO, N, A, LDA, D, E, TAU, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhetf2.f b/SRC/zhetf2.f index 3ce3f792..78c5cfe5 100644 --- a/SRC/zhetf2.f +++ b/SRC/zhetf2.f @@ -1,7 +1,8 @@ SUBROUTINE ZHETF2( UPLO, N, A, LDA, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhetrd.f b/SRC/zhetrd.f index fcf57d29..e2f2001f 100644 --- a/SRC/zhetrd.f +++ b/SRC/zhetrd.f @@ -1,7 +1,8 @@ SUBROUTINE ZHETRD( UPLO, N, A, LDA, D, E, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhetrf.f b/SRC/zhetrf.f index 717c2a94..21085b14 100644 --- a/SRC/zhetrf.f +++ b/SRC/zhetrf.f @@ -1,7 +1,8 @@ SUBROUTINE ZHETRF( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhetri.f b/SRC/zhetri.f index 55e53d36..afe26502 100644 --- a/SRC/zhetri.f +++ b/SRC/zhetri.f @@ -1,7 +1,8 @@ SUBROUTINE ZHETRI( UPLO, N, A, LDA, IPIV, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhetrs.f b/SRC/zhetrs.f index 0dd05f16..395f7867 100644 --- a/SRC/zhetrs.f +++ b/SRC/zhetrs.f @@ -1,7 +1,8 @@ SUBROUTINE ZHETRS( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhgeqz.f b/SRC/zhgeqz.f index fd40a82b..123146de 100644 --- a/SRC/zhgeqz.f +++ b/SRC/zhgeqz.f @@ -3,7 +3,8 @@ $ RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhpcon.f b/SRC/zhpcon.f index 0df945a8..d87fd6b6 100644 --- a/SRC/zhpcon.f +++ b/SRC/zhpcon.f @@ -1,7 +1,8 @@ SUBROUTINE ZHPCON( UPLO, N, AP, IPIV, ANORM, RCOND, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zhpev.f b/SRC/zhpev.f index 2b363b93..2e080971 100644 --- a/SRC/zhpev.f +++ b/SRC/zhpev.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhpevd.f b/SRC/zhpevd.f index 13394374..12a3b497 100644 --- a/SRC/zhpevd.f +++ b/SRC/zhpevd.f @@ -2,7 +2,8 @@ $ RWORK, LRWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhpevx.f b/SRC/zhpevx.f index ad9a3915..01e53101 100644 --- a/SRC/zhpevx.f +++ b/SRC/zhpevx.f @@ -3,7 +3,8 @@ $ IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhpgst.f b/SRC/zhpgst.f index ad1163f8..3f560ff3 100644 --- a/SRC/zhpgst.f +++ b/SRC/zhpgst.f @@ -1,7 +1,8 @@ SUBROUTINE ZHPGST( ITYPE, UPLO, N, AP, BP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhpgv.f b/SRC/zhpgv.f index 799d21c3..daa50644 100644 --- a/SRC/zhpgv.f +++ b/SRC/zhpgv.f @@ -2,7 +2,8 @@ $ RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhpgvd.f b/SRC/zhpgvd.f index c69a3d6b..bb26e8ee 100644 --- a/SRC/zhpgvd.f +++ b/SRC/zhpgvd.f @@ -2,7 +2,8 @@ $ LWORK, RWORK, LRWORK, IWORK, LIWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhpgvx.f b/SRC/zhpgvx.f index 43fa7244..ea41c03f 100644 --- a/SRC/zhpgvx.f +++ b/SRC/zhpgvx.f @@ -3,7 +3,8 @@ $ IWORK, IFAIL, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhprfs.f b/SRC/zhprfs.f index 58fbf6a9..d8c34a93 100644 --- a/SRC/zhprfs.f +++ b/SRC/zhprfs.f @@ -2,7 +2,8 @@ $ FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zhpsv.f b/SRC/zhpsv.f index 5ba5394d..d6ae4a2b 100644 --- a/SRC/zhpsv.f +++ b/SRC/zhpsv.f @@ -1,7 +1,8 @@ SUBROUTINE ZHPSV( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhpsvx.f b/SRC/zhpsvx.f index 30762a1b..1e464fd7 100644 --- a/SRC/zhpsvx.f +++ b/SRC/zhpsvx.f @@ -2,7 +2,8 @@ $ LDX, RCOND, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhptrd.f b/SRC/zhptrd.f index 565353ef..d59fd0d2 100644 --- a/SRC/zhptrd.f +++ b/SRC/zhptrd.f @@ -1,7 +1,8 @@ SUBROUTINE ZHPTRD( UPLO, N, AP, D, E, TAU, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhptrf.f b/SRC/zhptrf.f index 723c5c3b..8981cb97 100644 --- a/SRC/zhptrf.f +++ b/SRC/zhptrf.f @@ -1,7 +1,8 @@ SUBROUTINE ZHPTRF( UPLO, N, AP, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhptri.f b/SRC/zhptri.f index 59dd6767..eadcd252 100644 --- a/SRC/zhptri.f +++ b/SRC/zhptri.f @@ -1,7 +1,8 @@ SUBROUTINE ZHPTRI( UPLO, N, AP, IPIV, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhptrs.f b/SRC/zhptrs.f index a1fc9745..cad83450 100644 --- a/SRC/zhptrs.f +++ b/SRC/zhptrs.f @@ -1,7 +1,8 @@ SUBROUTINE ZHPTRS( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zhsein.f b/SRC/zhsein.f index 1f4f2c33..b0e12355 100644 --- a/SRC/zhsein.f +++ b/SRC/zhsein.f @@ -3,7 +3,8 @@ $ IFAILR, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zla_gbamv.f b/SRC/zla_gbamv.f index 881b075d..f465ac25 100644 --- a/SRC/zla_gbamv.f +++ b/SRC/zla_gbamv.f @@ -4,7 +4,7 @@ * -- LAPACK routine (version 3.2) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_gbrcond_c.f b/SRC/zla_gbrcond_c.f index 16cc3dd6..70765f39 100644 --- a/SRC/zla_gbrcond_c.f +++ b/SRC/zla_gbrcond_c.f @@ -6,7 +6,7 @@ * -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_gbrcond_x.f b/SRC/zla_gbrcond_x.f index b719a2eb..44cebbc2 100644 --- a/SRC/zla_gbrcond_x.f +++ b/SRC/zla_gbrcond_x.f @@ -5,7 +5,7 @@ * -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_gbrfsx_extended.f b/SRC/zla_gbrfsx_extended.f index abd046cd..efd6145b 100644 --- a/SRC/zla_gbrfsx_extended.f +++ b/SRC/zla_gbrfsx_extended.f @@ -6,10 +6,10 @@ $ Y_TAIL, RCOND, ITHRESH, RTHRESH, $ DZ_UB, IGNORE_CWISE, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_gbrpvgrw.f b/SRC/zla_gbrpvgrw.f index 6ef64db5..d7cd007b 100644 --- a/SRC/zla_gbrpvgrw.f +++ b/SRC/zla_gbrpvgrw.f @@ -1,10 +1,10 @@ DOUBLE PRECISION FUNCTION ZLA_GBRPVGRW( N, KL, KU, NCOLS, AB, $ LDAB, AFB, LDAFB ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_geamv.f b/SRC/zla_geamv.f index a86ae982..953d5c68 100644 --- a/SRC/zla_geamv.f +++ b/SRC/zla_geamv.f @@ -1,10 +1,10 @@ SUBROUTINE ZLA_GEAMV ( TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, $ Y, INCY ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_gercond_c.f b/SRC/zla_gercond_c.f index 9eefdc96..320f1be9 100644 --- a/SRC/zla_gercond_c.f +++ b/SRC/zla_gercond_c.f @@ -2,10 +2,10 @@ $ LDAF, IPIV, C, CAPPLY, $ INFO, WORK, RWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_gercond_x.f b/SRC/zla_gercond_x.f index 988fb428..502e8be9 100644 --- a/SRC/zla_gercond_x.f +++ b/SRC/zla_gercond_x.f @@ -2,10 +2,10 @@ $ LDAF, IPIV, X, INFO, $ WORK, RWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_gerfsx_extended.f b/SRC/zla_gerfsx_extended.f index e2a38d68..abe05375 100644 --- a/SRC/zla_gerfsx_extended.f +++ b/SRC/zla_gerfsx_extended.f @@ -5,10 +5,10 @@ $ Y_TAIL, RCOND, ITHRESH, RTHRESH, $ DZ_UB, IGNORE_CWISE, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_heamv.f b/SRC/zla_heamv.f index fe8b50a4..9aeeb8cc 100644 --- a/SRC/zla_heamv.f +++ b/SRC/zla_heamv.f @@ -1,10 +1,10 @@ SUBROUTINE ZLA_HEAMV( UPLO, N, ALPHA, A, LDA, X, INCX, BETA, Y, $ INCY ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_hercond_c.f b/SRC/zla_hercond_c.f index b893ad3f..632dece1 100644 --- a/SRC/zla_hercond_c.f +++ b/SRC/zla_hercond_c.f @@ -2,10 +2,10 @@ $ LDAF, IPIV, C, CAPPLY, $ INFO, WORK, RWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_hercond_x.f b/SRC/zla_hercond_x.f index 39149234..0b147f79 100644 --- a/SRC/zla_hercond_x.f +++ b/SRC/zla_hercond_x.f @@ -2,10 +2,10 @@ $ LDAF, IPIV, X, INFO, $ WORK, RWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_herfsx_extended.f b/SRC/zla_herfsx_extended.f index f7926300..654acb4e 100644 --- a/SRC/zla_herfsx_extended.f +++ b/SRC/zla_herfsx_extended.f @@ -6,10 +6,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_herpvgrw.f b/SRC/zla_herpvgrw.f index f93c1ad6..8bd30b84 100644 --- a/SRC/zla_herpvgrw.f +++ b/SRC/zla_herpvgrw.f @@ -1,10 +1,10 @@ DOUBLE PRECISION FUNCTION ZLA_HERPVGRW( UPLO, N, INFO, A, LDA, AF, $ LDAF, IPIV, WORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_lin_berr.f b/SRC/zla_lin_berr.f index 7a21e4e9..eda99e6e 100644 --- a/SRC/zla_lin_berr.f +++ b/SRC/zla_lin_berr.f @@ -1,9 +1,9 @@ SUBROUTINE ZLA_LIN_BERR ( N, NZ, NRHS, RES, AYB, BERR ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_porcond_c.f b/SRC/zla_porcond_c.f index 14f54cce..c3dfee1a 100644 --- a/SRC/zla_porcond_c.f +++ b/SRC/zla_porcond_c.f @@ -2,10 +2,10 @@ $ LDAF, C, CAPPLY, INFO, $ WORK, RWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_porcond_x.f b/SRC/zla_porcond_x.f index 93b292e8..9e0c0403 100644 --- a/SRC/zla_porcond_x.f +++ b/SRC/zla_porcond_x.f @@ -2,10 +2,10 @@ $ LDAF, X, INFO, WORK, $ RWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_porfsx_extended.f b/SRC/zla_porfsx_extended.f index 88e4bfb6..314a6d7e 100644 --- a/SRC/zla_porfsx_extended.f +++ b/SRC/zla_porfsx_extended.f @@ -6,10 +6,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_porpvgrw.f b/SRC/zla_porpvgrw.f index 8d9e68c6..6c7b3647 100644 --- a/SRC/zla_porpvgrw.f +++ b/SRC/zla_porpvgrw.f @@ -1,10 +1,10 @@ DOUBLE PRECISION FUNCTION ZLA_PORPVGRW( UPLO, NCOLS, A, LDA, AF, $ LDAF, WORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_rpvgrw.f b/SRC/zla_rpvgrw.f index b448b480..fd9c717e 100644 --- a/SRC/zla_rpvgrw.f +++ b/SRC/zla_rpvgrw.f @@ -1,9 +1,9 @@ DOUBLE PRECISION FUNCTION ZLA_RPVGRW( N, NCOLS, A, LDA, AF, LDAF ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_syamv.f b/SRC/zla_syamv.f index 7b485b6a..53c8b698 100644 --- a/SRC/zla_syamv.f +++ b/SRC/zla_syamv.f @@ -1,10 +1,10 @@ SUBROUTINE ZLA_SYAMV( UPLO, N, ALPHA, A, LDA, X, INCX, BETA, Y, $ INCY ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_syrcond_c.f b/SRC/zla_syrcond_c.f index 4cd0de62..9fc56485 100644 --- a/SRC/zla_syrcond_c.f +++ b/SRC/zla_syrcond_c.f @@ -2,10 +2,10 @@ $ LDAF, IPIV, C, CAPPLY, $ INFO, WORK, RWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_syrcond_x.f b/SRC/zla_syrcond_x.f index bfcebc57..51c24cae 100644 --- a/SRC/zla_syrcond_x.f +++ b/SRC/zla_syrcond_x.f @@ -2,10 +2,10 @@ $ LDAF, IPIV, X, INFO, $ WORK, RWORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_syrfsx_extended.f b/SRC/zla_syrfsx_extended.f index 5b3c439a..8cadd80a 100644 --- a/SRC/zla_syrfsx_extended.f +++ b/SRC/zla_syrfsx_extended.f @@ -6,10 +6,10 @@ $ RTHRESH, DZ_UB, IGNORE_CWISE, $ INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_syrpvgrw.f b/SRC/zla_syrpvgrw.f index 749cf6f6..c0e02134 100644 --- a/SRC/zla_syrpvgrw.f +++ b/SRC/zla_syrpvgrw.f @@ -1,10 +1,10 @@ DOUBLE PRECISION FUNCTION ZLA_SYRPVGRW( UPLO, N, INFO, A, LDA, AF, $ LDAF, IPIV, WORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zla_wwaddw.f b/SRC/zla_wwaddw.f index ff449e5d..244afc07 100644 --- a/SRC/zla_wwaddw.f +++ b/SRC/zla_wwaddw.f @@ -1,9 +1,9 @@ SUBROUTINE ZLA_WWADDW( N, X, Y, W ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zlabrd.f b/SRC/zlabrd.f index dc852f08..b94e7da4 100644 --- a/SRC/zlabrd.f +++ b/SRC/zlabrd.f @@ -2,7 +2,8 @@ $ LDY ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlacgv.f b/SRC/zlacgv.f index c6771500..18eb0a6f 100644 --- a/SRC/zlacgv.f +++ b/SRC/zlacgv.f @@ -1,7 +1,8 @@ SUBROUTINE ZLACGV( N, X, INCX ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlacn2.f b/SRC/zlacn2.f index 90ec8c90..f099e853 100644 --- a/SRC/zlacn2.f +++ b/SRC/zlacn2.f @@ -1,7 +1,8 @@ SUBROUTINE ZLACN2( N, V, X, EST, KASE, ISAVE ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlacon.f b/SRC/zlacon.f index 1d88debd..46bfeb57 100644 --- a/SRC/zlacon.f +++ b/SRC/zlacon.f @@ -1,7 +1,8 @@ SUBROUTINE ZLACON( N, V, X, EST, KASE ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlacp2.f b/SRC/zlacp2.f index fd36defd..78b98eb4 100644 --- a/SRC/zlacp2.f +++ b/SRC/zlacp2.f @@ -1,7 +1,8 @@ SUBROUTINE ZLACP2( UPLO, M, N, A, LDA, B, LDB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlacpy.f b/SRC/zlacpy.f index 71fc6258..9cb25d80 100644 --- a/SRC/zlacpy.f +++ b/SRC/zlacpy.f @@ -1,7 +1,8 @@ SUBROUTINE ZLACPY( UPLO, M, N, A, LDA, B, LDB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlacrm.f b/SRC/zlacrm.f index 4dda56bf..aaa10647 100644 --- a/SRC/zlacrm.f +++ b/SRC/zlacrm.f @@ -1,7 +1,8 @@ SUBROUTINE ZLACRM( M, N, A, LDA, B, LDB, C, LDC, RWORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlacrt.f b/SRC/zlacrt.f index 9f6d9cb0..21bc9ba8 100644 --- a/SRC/zlacrt.f +++ b/SRC/zlacrt.f @@ -1,7 +1,8 @@ SUBROUTINE ZLACRT( N, CX, INCX, CY, INCY, C, S ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zladiv.f b/SRC/zladiv.f index d51bc293..1e68c364 100644 --- a/SRC/zladiv.f +++ b/SRC/zladiv.f @@ -1,7 +1,8 @@ COMPLEX*16 FUNCTION ZLADIV( X, Y ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaed0.f b/SRC/zlaed0.f index e5926f46..a0651a87 100644 --- a/SRC/zlaed0.f +++ b/SRC/zlaed0.f @@ -2,7 +2,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaed7.f b/SRC/zlaed7.f index 24932b13..8dd3aa77 100644 --- a/SRC/zlaed7.f +++ b/SRC/zlaed7.f @@ -4,7 +4,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaed8.f b/SRC/zlaed8.f index 3e2dffbf..801724ef 100644 --- a/SRC/zlaed8.f +++ b/SRC/zlaed8.f @@ -3,7 +3,8 @@ $ GIVCOL, GIVNUM, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaein.f b/SRC/zlaein.f index 711a0d8a..9c31177c 100644 --- a/SRC/zlaein.f +++ b/SRC/zlaein.f @@ -2,7 +2,8 @@ $ EPS3, SMLNUM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaesy.f b/SRC/zlaesy.f index e9e0498d..439dfa0e 100644 --- a/SRC/zlaesy.f +++ b/SRC/zlaesy.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAESY( A, B, C, RT1, RT2, EVSCAL, CS1, SN1 ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaev2.f b/SRC/zlaev2.f index ba6bcf55..6b647070 100644 --- a/SRC/zlaev2.f +++ b/SRC/zlaev2.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAEV2( A, B, C, RT1, RT2, CS1, SN1 ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlag2c.f b/SRC/zlag2c.f index 5850fc62..445c4071 100644 --- a/SRC/zlag2c.f +++ b/SRC/zlag2c.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAG2C( M, N, A, LDA, SA, LDSA, INFO ) * * -- LAPACK PROTOTYPE auxiliary routine (version 3.1.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * August 2007 * * .. diff --git a/SRC/zlags2.f b/SRC/zlags2.f index 762596ae..6727c212 100644 --- a/SRC/zlags2.f +++ b/SRC/zlags2.f @@ -2,7 +2,8 @@ $ SNV, CSQ, SNQ ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlagtm.f b/SRC/zlagtm.f index 7e923a2d..83aff56a 100644 --- a/SRC/zlagtm.f +++ b/SRC/zlagtm.f @@ -2,7 +2,8 @@ $ B, LDB ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlahef.f b/SRC/zlahef.f index 0079897e..860d93a6 100644 --- a/SRC/zlahef.f +++ b/SRC/zlahef.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAHEF( UPLO, N, NB, KB, A, LDA, IPIV, W, LDW, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlahr2.f b/SRC/zlahr2.f index ba56ed77..e6bffc2d 100644 --- a/SRC/zlahr2.f +++ b/SRC/zlahr2.f @@ -1,8 +1,9 @@ SUBROUTINE ZLAHR2( N, K, NB, A, LDA, TAU, T, LDT, Y, LDY ) * -* -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK auxiliary routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. INTEGER K, LDA, LDT, LDY, N, NB diff --git a/SRC/zlahrd.f b/SRC/zlahrd.f index 296a5543..3ad16848 100644 --- a/SRC/zlahrd.f +++ b/SRC/zlahrd.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAHRD( N, K, NB, A, LDA, TAU, T, LDT, Y, LDY ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaic1.f b/SRC/zlaic1.f index 9cc49fac..c5c8ff6d 100644 --- a/SRC/zlaic1.f +++ b/SRC/zlaic1.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAIC1( JOB, J, X, SEST, W, GAMMA, SESTPR, S, C ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlals0.f b/SRC/zlals0.f index a39d4aac..8c72f1cf 100644 --- a/SRC/zlals0.f +++ b/SRC/zlals0.f @@ -3,7 +3,8 @@ $ POLES, DIFL, DIFR, Z, K, C, S, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlalsa.f b/SRC/zlalsa.f index 1ef48839..e41be325 100644 --- a/SRC/zlalsa.f +++ b/SRC/zlalsa.f @@ -4,7 +4,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlalsd.f b/SRC/zlalsd.f index cc358023..b75fe2f0 100644 --- a/SRC/zlalsd.f +++ b/SRC/zlalsd.f @@ -2,7 +2,8 @@ $ RANK, WORK, RWORK, IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlangb.f b/SRC/zlangb.f index ce642754..ce2cf679 100644 --- a/SRC/zlangb.f +++ b/SRC/zlangb.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlange.f b/SRC/zlange.f index ae2c183b..56aa3ecb 100644 --- a/SRC/zlange.f +++ b/SRC/zlange.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION ZLANGE( NORM, M, N, A, LDA, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlangt.f b/SRC/zlangt.f index 12d96c82..a02184e1 100644 --- a/SRC/zlangt.f +++ b/SRC/zlangt.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION ZLANGT( NORM, N, DL, D, DU ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlanhb.f b/SRC/zlanhb.f index 9c2668a1..92fa9e63 100644 --- a/SRC/zlanhb.f +++ b/SRC/zlanhb.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlanhe.f b/SRC/zlanhe.f index dbdf2c65..f3ed0f09 100644 --- a/SRC/zlanhe.f +++ b/SRC/zlanhe.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION ZLANHE( NORM, UPLO, N, A, LDA, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlanhf.f b/SRC/zlanhf.f index 42b5c91e..25cb0020 100644 --- a/SRC/zlanhf.f +++ b/SRC/zlanhf.f @@ -1,9 +1,9 @@ DOUBLE PRECISION FUNCTION ZLANHF( NORM, TRANSR, UPLO, N, A, WORK ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/zlanhp.f b/SRC/zlanhp.f index 7d4e96cb..72b6fcfb 100644 --- a/SRC/zlanhp.f +++ b/SRC/zlanhp.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION ZLANHP( NORM, UPLO, N, AP, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlanhs.f b/SRC/zlanhs.f index bae6b875..f8027289 100644 --- a/SRC/zlanhs.f +++ b/SRC/zlanhs.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION ZLANHS( NORM, N, A, LDA, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlanht.f b/SRC/zlanht.f index 152161b2..24c81098 100644 --- a/SRC/zlanht.f +++ b/SRC/zlanht.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION ZLANHT( NORM, N, D, E ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlansb.f b/SRC/zlansb.f index 829b9a06..e1e90cfa 100644 --- a/SRC/zlansb.f +++ b/SRC/zlansb.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlansp.f b/SRC/zlansp.f index e1edeed1..7e75f428 100644 --- a/SRC/zlansp.f +++ b/SRC/zlansp.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION ZLANSP( NORM, UPLO, N, AP, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlansy.f b/SRC/zlansy.f index 571a60d6..fde698f9 100644 --- a/SRC/zlansy.f +++ b/SRC/zlansy.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION ZLANSY( NORM, UPLO, N, A, LDA, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlantb.f b/SRC/zlantb.f index 77a9b4a4..04e296f1 100644 --- a/SRC/zlantb.f +++ b/SRC/zlantb.f @@ -2,7 +2,8 @@ $ LDAB, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlantp.f b/SRC/zlantp.f index 9558576b..d3723121 100644 --- a/SRC/zlantp.f +++ b/SRC/zlantp.f @@ -1,7 +1,8 @@ DOUBLE PRECISION FUNCTION ZLANTP( NORM, UPLO, DIAG, N, AP, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlantr.f b/SRC/zlantr.f index d9b23763..e2ea5b28 100644 --- a/SRC/zlantr.f +++ b/SRC/zlantr.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlapll.f b/SRC/zlapll.f index 47f3f59c..d91c99fc 100644 --- a/SRC/zlapll.f +++ b/SRC/zlapll.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAPLL( N, X, INCX, Y, INCY, SSMIN ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlapmt.f b/SRC/zlapmt.f index ae0c68eb..b3c07b49 100644 --- a/SRC/zlapmt.f +++ b/SRC/zlapmt.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAPMT( FORWRD, M, N, X, LDX, K ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaqgb.f b/SRC/zlaqgb.f index f2f7e048..7296feae 100644 --- a/SRC/zlaqgb.f +++ b/SRC/zlaqgb.f @@ -2,7 +2,8 @@ $ AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaqge.f b/SRC/zlaqge.f index d2564929..156e57be 100644 --- a/SRC/zlaqge.f +++ b/SRC/zlaqge.f @@ -2,7 +2,8 @@ $ EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaqhb.f b/SRC/zlaqhb.f index 65c90f36..6526162f 100644 --- a/SRC/zlaqhb.f +++ b/SRC/zlaqhb.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAQHB( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaqhe.f b/SRC/zlaqhe.f index 2a1a1b89..3ecdce2d 100644 --- a/SRC/zlaqhe.f +++ b/SRC/zlaqhe.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAQHE( UPLO, N, A, LDA, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaqhp.f b/SRC/zlaqhp.f index 16b70761..09b208b3 100644 --- a/SRC/zlaqhp.f +++ b/SRC/zlaqhp.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAQHP( UPLO, N, AP, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaqp2.f b/SRC/zlaqp2.f index ed4e716c..2354a001 100644 --- a/SRC/zlaqp2.f +++ b/SRC/zlaqp2.f @@ -2,7 +2,8 @@ $ WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaqps.f b/SRC/zlaqps.f index 549f00b1..fdff5f34 100644 --- a/SRC/zlaqps.f +++ b/SRC/zlaqps.f @@ -2,7 +2,8 @@ $ VN2, AUXV, F, LDF ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaqr2.f b/SRC/zlaqr2.f index 7a6fbc05..2b900ab5 100644 --- a/SRC/zlaqr2.f +++ b/SRC/zlaqr2.f @@ -2,9 +2,9 @@ $ IHIZ, Z, LDZ, NS, ND, SH, V, LDV, NH, T, LDT, $ NV, WV, LDWV, WORK, LWORK ) * -* -- LAPACK auxiliary routine (version 3.2) -- +* -- LAPACK auxiliary routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd.. -* November 2006 +* -- April 2009 -- * * .. Scalar Arguments .. INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV, diff --git a/SRC/zlaqr3.f b/SRC/zlaqr3.f index 742894bf..2a10ac9f 100644 --- a/SRC/zlaqr3.f +++ b/SRC/zlaqr3.f @@ -2,9 +2,9 @@ $ IHIZ, Z, LDZ, NS, ND, SH, V, LDV, NH, T, LDT, $ NV, WV, LDWV, WORK, LWORK ) * -* -- LAPACK auxiliary routine (version 3.2) -- +* -- LAPACK auxiliary routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd.. -* November 2006 +* -- April 2009 -- * * .. Scalar Arguments .. INTEGER IHIZ, ILOZ, KBOT, KTOP, LDH, LDT, LDV, LDWV, diff --git a/SRC/zlaqsb.f b/SRC/zlaqsb.f index a5456e1f..666109b7 100644 --- a/SRC/zlaqsb.f +++ b/SRC/zlaqsb.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAQSB( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaqsp.f b/SRC/zlaqsp.f index efef6f36..f6e9d4e1 100644 --- a/SRC/zlaqsp.f +++ b/SRC/zlaqsp.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAQSP( UPLO, N, AP, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaqsy.f b/SRC/zlaqsy.f index 08b94456..cab43382 100644 --- a/SRC/zlaqsy.f +++ b/SRC/zlaqsy.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAQSY( UPLO, N, A, LDA, S, SCOND, AMAX, EQUED ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlar1v.f b/SRC/zlar1v.f index 8a6ae3c5..6183b64a 100644 --- a/SRC/zlar1v.f +++ b/SRC/zlar1v.f @@ -3,7 +3,8 @@ $ R, ISUPPZ, NRMINV, RESID, RQCORR, WORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlar2v.f b/SRC/zlar2v.f index cc8ce5d9..f2df95bd 100644 --- a/SRC/zlar2v.f +++ b/SRC/zlar2v.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAR2V( N, X, Y, Z, INCX, C, S, INCC ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlarcm.f b/SRC/zlarcm.f index f2ef6848..75bb9d9c 100644 --- a/SRC/zlarcm.f +++ b/SRC/zlarcm.f @@ -1,7 +1,8 @@ SUBROUTINE ZLARCM( M, N, A, LDA, B, LDB, C, LDC, RWORK ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlarf.f b/SRC/zlarf.f index 98a46d61..7b05ed3c 100644 --- a/SRC/zlarf.f +++ b/SRC/zlarf.f @@ -2,7 +2,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlarfb.f b/SRC/zlarfb.f index df2b7af4..1af6ae6c 100644 --- a/SRC/zlarfb.f +++ b/SRC/zlarfb.f @@ -3,7 +3,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlarfg.f b/SRC/zlarfg.f index 1df60caf..6d9742fe 100644 --- a/SRC/zlarfg.f +++ b/SRC/zlarfg.f @@ -1,7 +1,8 @@ SUBROUTINE ZLARFG( N, ALPHA, X, INCX, TAU ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlarfp.f b/SRC/zlarfp.f index 13be100f..a410ccd6 100644 --- a/SRC/zlarfp.f +++ b/SRC/zlarfp.f @@ -1,7 +1,8 @@ SUBROUTINE ZLARFP( N, ALPHA, X, INCX, TAU ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlarft.f b/SRC/zlarft.f index 36275283..954f8e24 100644 --- a/SRC/zlarft.f +++ b/SRC/zlarft.f @@ -1,7 +1,8 @@ SUBROUTINE ZLARFT( DIRECT, STOREV, N, K, V, LDV, TAU, T, LDT ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlarfx.f b/SRC/zlarfx.f index e2ef43a0..60354d96 100644 --- a/SRC/zlarfx.f +++ b/SRC/zlarfx.f @@ -2,7 +2,8 @@ IMPLICIT NONE * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlargv.f b/SRC/zlargv.f index 1fde7fd8..ec270bce 100644 --- a/SRC/zlargv.f +++ b/SRC/zlargv.f @@ -1,7 +1,8 @@ SUBROUTINE ZLARGV( N, X, INCX, Y, INCY, C, INCC ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlarnv.f b/SRC/zlarnv.f index 8cd09725..2e14f4a9 100644 --- a/SRC/zlarnv.f +++ b/SRC/zlarnv.f @@ -1,7 +1,8 @@ SUBROUTINE ZLARNV( IDIST, ISEED, N, X ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlarrv.f b/SRC/zlarrv.f index 2cde559c..20fa7659 100644 --- a/SRC/zlarrv.f +++ b/SRC/zlarrv.f @@ -5,7 +5,8 @@ $ WORK, IWORK, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlarscl2.f b/SRC/zlarscl2.f index dc6c0124..39751b71 100644 --- a/SRC/zlarscl2.f +++ b/SRC/zlarscl2.f @@ -1,9 +1,9 @@ SUBROUTINE ZLARSCL2 ( M, N, D, X, LDX ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zlartg.f b/SRC/zlartg.f index fdae7fc5..44376ee2 100644 --- a/SRC/zlartg.f +++ b/SRC/zlartg.f @@ -1,7 +1,8 @@ SUBROUTINE ZLARTG( F, G, CS, SN, R ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlartv.f b/SRC/zlartv.f index 27a50e7e..114a577d 100644 --- a/SRC/zlartv.f +++ b/SRC/zlartv.f @@ -1,7 +1,8 @@ SUBROUTINE ZLARTV( N, X, INCX, Y, INCY, C, S, INCC ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlarz.f b/SRC/zlarz.f index 190a6fa6..d235191f 100644 --- a/SRC/zlarz.f +++ b/SRC/zlarz.f @@ -1,7 +1,8 @@ SUBROUTINE ZLARZ( SIDE, M, N, L, V, INCV, TAU, C, LDC, WORK ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlarzb.f b/SRC/zlarzb.f index fd9a3ee2..bb51f60c 100644 --- a/SRC/zlarzb.f +++ b/SRC/zlarzb.f @@ -2,7 +2,8 @@ $ LDV, T, LDT, C, LDC, WORK, LDWORK ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlarzt.f b/SRC/zlarzt.f index 63a88e0c..e283d572 100644 --- a/SRC/zlarzt.f +++ b/SRC/zlarzt.f @@ -1,7 +1,8 @@ SUBROUTINE ZLARZT( DIRECT, STOREV, N, K, V, LDV, TAU, T, LDT ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlascl.f b/SRC/zlascl.f index e116bba6..d06eaf37 100644 --- a/SRC/zlascl.f +++ b/SRC/zlascl.f @@ -1,7 +1,8 @@ SUBROUTINE ZLASCL( TYPE, KL, KU, CFROM, CTO, M, N, A, LDA, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlascl2.f b/SRC/zlascl2.f index bb176016..c6f10a45 100644 --- a/SRC/zlascl2.f +++ b/SRC/zlascl2.f @@ -1,9 +1,9 @@ SUBROUTINE ZLASCL2 ( M, N, D, X, LDX ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zlaset.f b/SRC/zlaset.f index 79145b24..f832ee88 100644 --- a/SRC/zlaset.f +++ b/SRC/zlaset.f @@ -1,7 +1,8 @@ SUBROUTINE ZLASET( UPLO, M, N, ALPHA, BETA, A, LDA ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlasr.f b/SRC/zlasr.f index 989497da..38ff3970 100644 --- a/SRC/zlasr.f +++ b/SRC/zlasr.f @@ -1,7 +1,8 @@ SUBROUTINE ZLASR( SIDE, PIVOT, DIRECT, M, N, C, S, A, LDA ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlassq.f b/SRC/zlassq.f index a55631ea..faa7b16b 100644 --- a/SRC/zlassq.f +++ b/SRC/zlassq.f @@ -1,7 +1,8 @@ SUBROUTINE ZLASSQ( N, X, INCX, SCALE, SUMSQ ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlaswp.f b/SRC/zlaswp.f index cc1b9ea2..29edd05f 100644 --- a/SRC/zlaswp.f +++ b/SRC/zlaswp.f @@ -1,7 +1,8 @@ SUBROUTINE ZLASWP( N, A, LDA, K1, K2, IPIV, INCX ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlasyf.f b/SRC/zlasyf.f index b3eec57a..1e29fccb 100644 --- a/SRC/zlasyf.f +++ b/SRC/zlasyf.f @@ -1,7 +1,8 @@ SUBROUTINE ZLASYF( UPLO, N, NB, KB, A, LDA, IPIV, W, LDW, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlat2c.f b/SRC/zlat2c.f index a85dcde0..8a7fbcfe 100644 --- a/SRC/zlat2c.f +++ b/SRC/zlat2c.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAT2C( UPLO, N, A, LDA, SA, LDSA, INFO ) * * -- LAPACK PROTOTYPE auxiliary routine (version 3.1.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * May 2007 * * .. Scalar Arguments .. diff --git a/SRC/zlatbs.f b/SRC/zlatbs.f index 3a7d297b..d15295f1 100644 --- a/SRC/zlatbs.f +++ b/SRC/zlatbs.f @@ -2,7 +2,8 @@ $ SCALE, CNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlatdf.f b/SRC/zlatdf.f index 60b0c475..60928957 100644 --- a/SRC/zlatdf.f +++ b/SRC/zlatdf.f @@ -2,7 +2,8 @@ $ JPIV ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlatps.f b/SRC/zlatps.f index bb471a9e..0d70f5a3 100644 --- a/SRC/zlatps.f +++ b/SRC/zlatps.f @@ -2,7 +2,8 @@ $ CNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlatrd.f b/SRC/zlatrd.f index 74a75260..73609eb2 100644 --- a/SRC/zlatrd.f +++ b/SRC/zlatrd.f @@ -1,7 +1,8 @@ SUBROUTINE ZLATRD( UPLO, N, NB, A, LDA, E, TAU, W, LDW ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlatrs.f b/SRC/zlatrs.f index ed19e9fd..26ad436b 100644 --- a/SRC/zlatrs.f +++ b/SRC/zlatrs.f @@ -2,7 +2,8 @@ $ CNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlatrz.f b/SRC/zlatrz.f index 8e3b6a61..b2b837da 100644 --- a/SRC/zlatrz.f +++ b/SRC/zlatrz.f @@ -1,7 +1,8 @@ SUBROUTINE ZLATRZ( M, N, L, A, LDA, TAU, WORK ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlatzm.f b/SRC/zlatzm.f index ebe0b0cf..6e5d887c 100644 --- a/SRC/zlatzm.f +++ b/SRC/zlatzm.f @@ -1,7 +1,8 @@ SUBROUTINE ZLATZM( SIDE, M, N, V, INCV, TAU, C1, C2, LDC, WORK ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlauu2.f b/SRC/zlauu2.f index 6ed0ddac..84010fad 100644 --- a/SRC/zlauu2.f +++ b/SRC/zlauu2.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAUU2( UPLO, N, A, LDA, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zlauum.f b/SRC/zlauum.f index 09d12745..e2aade0e 100644 --- a/SRC/zlauum.f +++ b/SRC/zlauum.f @@ -1,7 +1,8 @@ SUBROUTINE ZLAUUM( UPLO, N, A, LDA, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpbcon.f b/SRC/zpbcon.f index fc5a40d4..b283fbfe 100644 --- a/SRC/zpbcon.f +++ b/SRC/zpbcon.f @@ -2,7 +2,8 @@ $ RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zpbequ.f b/SRC/zpbequ.f index 082faf87..4eb34328 100644 --- a/SRC/zpbequ.f +++ b/SRC/zpbequ.f @@ -1,7 +1,8 @@ SUBROUTINE ZPBEQU( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpbrfs.f b/SRC/zpbrfs.f index eeaf82f9..d1b0cd23 100644 --- a/SRC/zpbrfs.f +++ b/SRC/zpbrfs.f @@ -2,7 +2,8 @@ $ LDB, X, LDX, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zpbstf.f b/SRC/zpbstf.f index 70ff5671..1afad775 100644 --- a/SRC/zpbstf.f +++ b/SRC/zpbstf.f @@ -1,7 +1,8 @@ SUBROUTINE ZPBSTF( UPLO, N, KD, AB, LDAB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpbsv.f b/SRC/zpbsv.f index 971d93fc..dd4ea901 100644 --- a/SRC/zpbsv.f +++ b/SRC/zpbsv.f @@ -1,7 +1,8 @@ SUBROUTINE ZPBSV( UPLO, N, KD, NRHS, AB, LDAB, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpbsvx.f b/SRC/zpbsvx.f index 7e847a80..8861fb8c 100644 --- a/SRC/zpbsvx.f +++ b/SRC/zpbsvx.f @@ -3,7 +3,8 @@ $ WORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpbtf2.f b/SRC/zpbtf2.f index d52dc731..b06eac27 100644 --- a/SRC/zpbtf2.f +++ b/SRC/zpbtf2.f @@ -1,7 +1,8 @@ SUBROUTINE ZPBTF2( UPLO, N, KD, AB, LDAB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpbtrf.f b/SRC/zpbtrf.f index 15a7798c..57963100 100644 --- a/SRC/zpbtrf.f +++ b/SRC/zpbtrf.f @@ -1,7 +1,8 @@ SUBROUTINE ZPBTRF( UPLO, N, KD, AB, LDAB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpbtrs.f b/SRC/zpbtrs.f index 5d49dc2c..03f452b0 100644 --- a/SRC/zpbtrs.f +++ b/SRC/zpbtrs.f @@ -1,7 +1,8 @@ SUBROUTINE ZPBTRS( UPLO, N, KD, NRHS, AB, LDAB, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpftri.f b/SRC/zpftri.f index 46566614..d669842f 100644 --- a/SRC/zpftri.f +++ b/SRC/zpftri.f @@ -1,9 +1,9 @@ SUBROUTINE ZPFTRI( TRANSR, UPLO, N, A, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/zpftrs.f b/SRC/zpftrs.f index 6cd0e88b..2d399e95 100644 --- a/SRC/zpftrs.f +++ b/SRC/zpftrs.f @@ -1,9 +1,9 @@ SUBROUTINE ZPFTRS( TRANSR, UPLO, N, NRHS, A, B, LDB, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/zpocon.f b/SRC/zpocon.f index 8002fff6..56dff353 100644 --- a/SRC/zpocon.f +++ b/SRC/zpocon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zpoequ.f b/SRC/zpoequ.f index 36a81a2e..5e996594 100644 --- a/SRC/zpoequ.f +++ b/SRC/zpoequ.f @@ -1,7 +1,8 @@ SUBROUTINE ZPOEQU( N, A, LDA, S, SCOND, AMAX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zporfs.f b/SRC/zporfs.f index d7d11ca2..ac864758 100644 --- a/SRC/zporfs.f +++ b/SRC/zporfs.f @@ -2,7 +2,8 @@ $ LDX, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zporfsx.f b/SRC/zporfsx.f index 500dcd34..5df8133f 100644 --- a/SRC/zporfsx.f +++ b/SRC/zporfsx.f @@ -3,10 +3,10 @@ $ ERR_BNDS_NORM, ERR_BNDS_COMP, NPARAMS, PARAMS, $ WORK, RWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zposv.f b/SRC/zposv.f index 1641b3a6..14a51549 100644 --- a/SRC/zposv.f +++ b/SRC/zposv.f @@ -1,7 +1,8 @@ SUBROUTINE ZPOSV( UPLO, N, NRHS, A, LDA, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zposvx.f b/SRC/zposvx.f index c63b9766..137b4fee 100644 --- a/SRC/zposvx.f +++ b/SRC/zposvx.f @@ -3,7 +3,8 @@ $ RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zposvxx.f b/SRC/zposvxx.f index 1387c455..bd202fff 100644 --- a/SRC/zposvxx.f +++ b/SRC/zposvxx.f @@ -3,10 +3,10 @@ $ N_ERR_BNDS, ERR_BNDS_NORM, ERR_BNDS_COMP, $ NPARAMS, PARAMS, WORK, RWORK, INFO ) * -* -- LAPACK driver routine (version 3.2) -- +* -- LAPACK driver routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zpotf2.f b/SRC/zpotf2.f index ef97106a..549601c8 100644 --- a/SRC/zpotf2.f +++ b/SRC/zpotf2.f @@ -1,7 +1,8 @@ SUBROUTINE ZPOTF2( UPLO, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpotrf.f b/SRC/zpotrf.f index d333f1fb..5749bb03 100644 --- a/SRC/zpotrf.f +++ b/SRC/zpotrf.f @@ -1,7 +1,8 @@ SUBROUTINE ZPOTRF( UPLO, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpotri.f b/SRC/zpotri.f index b4c8a98a..068d746b 100644 --- a/SRC/zpotri.f +++ b/SRC/zpotri.f @@ -1,7 +1,8 @@ SUBROUTINE ZPOTRI( UPLO, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpotrs.f b/SRC/zpotrs.f index 09cb6044..3ae63678 100644 --- a/SRC/zpotrs.f +++ b/SRC/zpotrs.f @@ -1,7 +1,8 @@ SUBROUTINE ZPOTRS( UPLO, N, NRHS, A, LDA, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zppcon.f b/SRC/zppcon.f index 43369c77..37136c2c 100644 --- a/SRC/zppcon.f +++ b/SRC/zppcon.f @@ -1,7 +1,8 @@ SUBROUTINE ZPPCON( UPLO, N, AP, ANORM, RCOND, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zppequ.f b/SRC/zppequ.f index ca82c9d3..92478f9a 100644 --- a/SRC/zppequ.f +++ b/SRC/zppequ.f @@ -1,7 +1,8 @@ SUBROUTINE ZPPEQU( UPLO, N, AP, S, SCOND, AMAX, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpprfs.f b/SRC/zpprfs.f index cfe6c6ea..07dd64cf 100644 --- a/SRC/zpprfs.f +++ b/SRC/zpprfs.f @@ -2,7 +2,8 @@ $ BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zppsv.f b/SRC/zppsv.f index 1673d6c9..d4d3dfb7 100644 --- a/SRC/zppsv.f +++ b/SRC/zppsv.f @@ -1,7 +1,8 @@ SUBROUTINE ZPPSV( UPLO, N, NRHS, AP, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zppsvx.f b/SRC/zppsvx.f index b7c6c455..7e06c26f 100644 --- a/SRC/zppsvx.f +++ b/SRC/zppsvx.f @@ -2,7 +2,8 @@ $ X, LDX, RCOND, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpptrf.f b/SRC/zpptrf.f index a28a969d..a1631ceb 100644 --- a/SRC/zpptrf.f +++ b/SRC/zpptrf.f @@ -1,7 +1,8 @@ SUBROUTINE ZPPTRF( UPLO, N, AP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpptri.f b/SRC/zpptri.f index 17c4e56a..bc0d68d1 100644 --- a/SRC/zpptri.f +++ b/SRC/zpptri.f @@ -1,7 +1,8 @@ SUBROUTINE ZPPTRI( UPLO, N, AP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpptrs.f b/SRC/zpptrs.f index 5a582384..ef322f07 100644 --- a/SRC/zpptrs.f +++ b/SRC/zpptrs.f @@ -1,7 +1,8 @@ SUBROUTINE ZPPTRS( UPLO, N, NRHS, AP, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpstrf.f b/SRC/zpstrf.f index fff0f9cf..3e09d843 100644 --- a/SRC/zpstrf.f +++ b/SRC/zpstrf.f @@ -1,8 +1,11 @@ SUBROUTINE ZPSTRF( UPLO, N, A, LDA, PIV, RANK, TOL, WORK, INFO ) * -* -- LAPACK routine (version 3.2) -- -* Craig Lucas, University of Manchester / NAG Ltd. -* October, 2008 +* -- LAPACK routine (version 3.2.1) -- +* +* -- Contributed by Craig Lucas, University of Manchester / NAG Ltd. -- +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- * * .. Scalar Arguments .. DOUBLE PRECISION TOL diff --git a/SRC/zptcon.f b/SRC/zptcon.f index df425ce0..43541b51 100644 --- a/SRC/zptcon.f +++ b/SRC/zptcon.f @@ -1,7 +1,8 @@ SUBROUTINE ZPTCON( N, D, E, ANORM, RCOND, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpteqr.f b/SRC/zpteqr.f index c80b3dc6..92dd5d51 100644 --- a/SRC/zpteqr.f +++ b/SRC/zpteqr.f @@ -1,7 +1,8 @@ SUBROUTINE ZPTEQR( COMPZ, N, D, E, Z, LDZ, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zptrfs.f b/SRC/zptrfs.f index d08bf4f0..ba6dde63 100644 --- a/SRC/zptrfs.f +++ b/SRC/zptrfs.f @@ -2,7 +2,8 @@ $ FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zptsv.f b/SRC/zptsv.f index 666d95f0..8aee5cbe 100644 --- a/SRC/zptsv.f +++ b/SRC/zptsv.f @@ -1,7 +1,8 @@ SUBROUTINE ZPTSV( N, NRHS, D, E, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zptsvx.f b/SRC/zptsvx.f index 2c81fad9..7f782cbc 100644 --- a/SRC/zptsvx.f +++ b/SRC/zptsvx.f @@ -2,7 +2,8 @@ $ RCOND, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpttrf.f b/SRC/zpttrf.f index 49ed6db7..20879ce5 100644 --- a/SRC/zpttrf.f +++ b/SRC/zpttrf.f @@ -1,7 +1,8 @@ SUBROUTINE ZPTTRF( N, D, E, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zpttrs.f b/SRC/zpttrs.f index 9afe775f..988aa43a 100644 --- a/SRC/zpttrs.f +++ b/SRC/zpttrs.f @@ -1,7 +1,8 @@ SUBROUTINE ZPTTRS( UPLO, N, NRHS, D, E, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zptts2.f b/SRC/zptts2.f index 356c5cc0..39b86590 100644 --- a/SRC/zptts2.f +++ b/SRC/zptts2.f @@ -1,7 +1,8 @@ SUBROUTINE ZPTTS2( IUPLO, N, NRHS, D, E, B, LDB ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. @@ -1,7 +1,8 @@ SUBROUTINE ZROT( N, CX, INCX, CY, INCY, C, S ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zspcon.f b/SRC/zspcon.f index be6927b5..437f0b6b 100644 --- a/SRC/zspcon.f +++ b/SRC/zspcon.f @@ -1,7 +1,8 @@ SUBROUTINE ZSPCON( UPLO, N, AP, IPIV, ANORM, RCOND, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zspmv.f b/SRC/zspmv.f index ec54418e..74b4f77e 100644 --- a/SRC/zspmv.f +++ b/SRC/zspmv.f @@ -1,7 +1,8 @@ SUBROUTINE ZSPMV( UPLO, N, ALPHA, AP, X, INCX, BETA, Y, INCY ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. @@ -1,7 +1,8 @@ SUBROUTINE ZSPR( UPLO, N, ALPHA, X, INCX, AP ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zsprfs.f b/SRC/zsprfs.f index 58a6a20f..e161062c 100644 --- a/SRC/zsprfs.f +++ b/SRC/zsprfs.f @@ -2,7 +2,8 @@ $ FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zspsv.f b/SRC/zspsv.f index e7dc28a9..fcbdc72d 100644 --- a/SRC/zspsv.f +++ b/SRC/zspsv.f @@ -1,7 +1,8 @@ SUBROUTINE ZSPSV( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zspsvx.f b/SRC/zspsvx.f index 62a7f6e7..4289a488 100644 --- a/SRC/zspsvx.f +++ b/SRC/zspsvx.f @@ -2,7 +2,8 @@ $ LDX, RCOND, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zsptrf.f b/SRC/zsptrf.f index 0e59f446..d539de5b 100644 --- a/SRC/zsptrf.f +++ b/SRC/zsptrf.f @@ -1,7 +1,8 @@ SUBROUTINE ZSPTRF( UPLO, N, AP, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zsptri.f b/SRC/zsptri.f index 2263e686..c7f24854 100644 --- a/SRC/zsptri.f +++ b/SRC/zsptri.f @@ -1,7 +1,8 @@ SUBROUTINE ZSPTRI( UPLO, N, AP, IPIV, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zsptrs.f b/SRC/zsptrs.f index 7f342125..546f5c02 100644 --- a/SRC/zsptrs.f +++ b/SRC/zsptrs.f @@ -1,7 +1,8 @@ SUBROUTINE ZSPTRS( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zstedc.f b/SRC/zstedc.f index 716cbed5..4c9e8336 100644 --- a/SRC/zstedc.f +++ b/SRC/zstedc.f @@ -2,7 +2,8 @@ $ LRWORK, IWORK, LIWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zstegr.f b/SRC/zstegr.f index ca0ee5d8..f7a02694 100644 --- a/SRC/zstegr.f +++ b/SRC/zstegr.f @@ -6,7 +6,8 @@ * * * -- LAPACK computational routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zstein.f b/SRC/zstein.f index 718b0419..03240eed 100644 --- a/SRC/zstein.f +++ b/SRC/zstein.f @@ -2,7 +2,8 @@ $ IWORK, IFAIL, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zstemr.f b/SRC/zstemr.f index 76f36b98..02ef49f3 100644 --- a/SRC/zstemr.f +++ b/SRC/zstemr.f @@ -3,9 +3,12 @@ $ IWORK, LIWORK, INFO ) IMPLICIT NONE * -* -- LAPACK computational routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK computational routine (version 3.2.1) -- +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * * .. Scalar Arguments .. CHARACTER JOBZ, RANGE diff --git a/SRC/zsteqr.f b/SRC/zsteqr.f index 1f266873..55ce87b6 100644 --- a/SRC/zsteqr.f +++ b/SRC/zsteqr.f @@ -1,7 +1,8 @@ SUBROUTINE ZSTEQR( COMPZ, N, D, E, Z, LDZ, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zsycon.f b/SRC/zsycon.f index e32a6776..4749e2b7 100644 --- a/SRC/zsycon.f +++ b/SRC/zsycon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zsymv.f b/SRC/zsymv.f index 68d06800..c880a74f 100644 --- a/SRC/zsymv.f +++ b/SRC/zsymv.f @@ -1,7 +1,8 @@ SUBROUTINE ZSYMV( UPLO, N, ALPHA, A, LDA, X, INCX, BETA, Y, INCY ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. @@ -1,7 +1,8 @@ SUBROUTINE ZSYR( UPLO, N, ALPHA, X, INCX, A, LDA ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zsyrfs.f b/SRC/zsyrfs.f index 90588e74..b4cb47ea 100644 --- a/SRC/zsyrfs.f +++ b/SRC/zsyrfs.f @@ -2,7 +2,8 @@ $ X, LDX, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/zsyrfsx.f b/SRC/zsyrfsx.f index bf856c71..4efabc3f 100644 --- a/SRC/zsyrfsx.f +++ b/SRC/zsyrfsx.f @@ -3,10 +3,10 @@ $ ERR_BNDS_NORM, ERR_BNDS_COMP, NPARAMS, PARAMS, $ WORK, RWORK, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zsysv.f b/SRC/zsysv.f index 042ba3e1..2520e165 100644 --- a/SRC/zsysv.f +++ b/SRC/zsysv.f @@ -2,7 +2,8 @@ $ LWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zsysvx.f b/SRC/zsysvx.f index 28a7bbb5..859dbd60 100644 --- a/SRC/zsysvx.f +++ b/SRC/zsysvx.f @@ -3,7 +3,8 @@ $ RWORK, INFO ) * * -- LAPACK driver routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zsysvxx.f b/SRC/zsysvxx.f index 95c18f86..f5464b2c 100644 --- a/SRC/zsysvxx.f +++ b/SRC/zsysvxx.f @@ -3,10 +3,10 @@ $ N_ERR_BNDS, ERR_BNDS_NORM, ERR_BNDS_COMP, $ NPARAMS, PARAMS, WORK, RWORK, INFO ) * -* -- LAPACK driver routine (version 3.2) -- +* -- LAPACK driver routine (version 3.2.1) -- * -- Contributed by James Demmel, Deaglan Halligan, Yozo Hida and -- * -- Jason Riedy of Univ. of California Berkeley. -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley and NAG Ltd. -- diff --git a/SRC/zsytf2.f b/SRC/zsytf2.f index fa8a8bf9..9d9e4d7e 100644 --- a/SRC/zsytf2.f +++ b/SRC/zsytf2.f @@ -1,7 +1,8 @@ SUBROUTINE ZSYTF2( UPLO, N, A, LDA, IPIV, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zsytrf.f b/SRC/zsytrf.f index a8fa4140..b6087999 100644 --- a/SRC/zsytrf.f +++ b/SRC/zsytrf.f @@ -1,7 +1,8 @@ SUBROUTINE ZSYTRF( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zsytri.f b/SRC/zsytri.f index 60edb6cc..b2e6ab6c 100644 --- a/SRC/zsytri.f +++ b/SRC/zsytri.f @@ -1,7 +1,8 @@ SUBROUTINE ZSYTRI( UPLO, N, A, LDA, IPIV, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zsytrs.f b/SRC/zsytrs.f index 4dca6cf1..f8ce8dfa 100644 --- a/SRC/zsytrs.f +++ b/SRC/zsytrs.f @@ -1,7 +1,8 @@ SUBROUTINE ZSYTRS( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ztbcon.f b/SRC/ztbcon.f index 02d814bc..1ed55654 100644 --- a/SRC/ztbcon.f +++ b/SRC/ztbcon.f @@ -2,7 +2,8 @@ $ RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/ztbrfs.f b/SRC/ztbrfs.f index 7bc74522..0288c539 100644 --- a/SRC/ztbrfs.f +++ b/SRC/ztbrfs.f @@ -2,7 +2,8 @@ $ LDB, X, LDX, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/ztbtrs.f b/SRC/ztbtrs.f index d81a4950..337400f7 100644 --- a/SRC/ztbtrs.f +++ b/SRC/ztbtrs.f @@ -2,7 +2,8 @@ $ LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ztfsm.f b/SRC/ztfsm.f index fcdcbbe6..9e5d3efc 100644 --- a/SRC/ztfsm.f +++ b/SRC/ztfsm.f @@ -1,10 +1,10 @@ SUBROUTINE ZTFSM( TRANSR, SIDE, UPLO, TRANS, DIAG, M, N, ALPHA, A, + B, LDB ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/ztftri.f b/SRC/ztftri.f index a63cf9c9..d3619a3f 100644 --- a/SRC/ztftri.f +++ b/SRC/ztftri.f @@ -1,9 +1,9 @@ SUBROUTINE ZTFTRI( TRANSR, UPLO, DIAG, N, A, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/ztfttp.f b/SRC/ztfttp.f index bf46facc..01317e76 100644 --- a/SRC/ztfttp.f +++ b/SRC/ztfttp.f @@ -1,9 +1,9 @@ SUBROUTINE ZTFTTP( TRANSR, UPLO, N, ARF, AP, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/ztfttr.f b/SRC/ztfttr.f index 6ebe0958..1ee876c5 100644 --- a/SRC/ztfttr.f +++ b/SRC/ztfttr.f @@ -1,9 +1,9 @@ SUBROUTINE ZTFTTR( TRANSR, UPLO, N, ARF, A, LDA, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/ztgevc.f b/SRC/ztgevc.f index e0b67a8a..6a79b7c5 100644 --- a/SRC/ztgevc.f +++ b/SRC/ztgevc.f @@ -2,7 +2,8 @@ $ LDVL, VR, LDVR, MM, M, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ztgex2.f b/SRC/ztgex2.f index a0db2b33..95e780ef 100644 --- a/SRC/ztgex2.f +++ b/SRC/ztgex2.f @@ -2,7 +2,8 @@ $ LDZ, J1, INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ztgexc.f b/SRC/ztgexc.f index 7cd2a4be..ce632369 100644 --- a/SRC/ztgexc.f +++ b/SRC/ztgexc.f @@ -2,7 +2,8 @@ $ LDZ, IFST, ILST, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ztgsen.f b/SRC/ztgsen.f index b9bcaf22..399a1d90 100644 --- a/SRC/ztgsen.f +++ b/SRC/ztgsen.f @@ -3,7 +3,8 @@ $ WORK, LWORK, IWORK, LIWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2007 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/ztgsja.f b/SRC/ztgsja.f index 1156e3cb..e9ca0a34 100644 --- a/SRC/ztgsja.f +++ b/SRC/ztgsja.f @@ -2,9 +2,10 @@ $ LDB, TOLA, TOLB, ALPHA, BETA, U, LDU, V, LDV, $ Q, LDQ, WORK, NCYCLE, INFO ) * -* -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* -- LAPACK routine (version 3.2.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* -- April 2009 -- * * .. Scalar Arguments .. CHARACTER JOBQ, JOBU, JOBV diff --git a/SRC/ztgsna.f b/SRC/ztgsna.f index af7399da..f4132a48 100644 --- a/SRC/ztgsna.f +++ b/SRC/ztgsna.f @@ -3,7 +3,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ztgsy2.f b/SRC/ztgsy2.f index a84b5fbd..bcf692b6 100644 --- a/SRC/ztgsy2.f +++ b/SRC/ztgsy2.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK auxiliary routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ztgsyl.f b/SRC/ztgsyl.f index e7593c0a..f9e2bfc8 100644 --- a/SRC/ztgsyl.f +++ b/SRC/ztgsyl.f @@ -3,7 +3,8 @@ $ IWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2007 * * .. Scalar Arguments .. diff --git a/SRC/ztpcon.f b/SRC/ztpcon.f index cfe1ef39..ddb7e1f0 100644 --- a/SRC/ztpcon.f +++ b/SRC/ztpcon.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/ztprfs.f b/SRC/ztprfs.f index 039c9910..6f2c797f 100644 --- a/SRC/ztprfs.f +++ b/SRC/ztprfs.f @@ -2,7 +2,8 @@ $ FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/ztptri.f b/SRC/ztptri.f index 64cef8e2..42f85cdd 100644 --- a/SRC/ztptri.f +++ b/SRC/ztptri.f @@ -1,7 +1,8 @@ SUBROUTINE ZTPTRI( UPLO, DIAG, N, AP, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ztptrs.f b/SRC/ztptrs.f index 3d04f0aa..6de926bb 100644 --- a/SRC/ztptrs.f +++ b/SRC/ztptrs.f @@ -1,7 +1,8 @@ SUBROUTINE ZTPTRS( UPLO, TRANS, DIAG, N, NRHS, AP, B, LDB, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ztpttf.f b/SRC/ztpttf.f index 89dc0d5c..b57d8523 100644 --- a/SRC/ztpttf.f +++ b/SRC/ztpttf.f @@ -1,9 +1,9 @@ SUBROUTINE ZTPTTF( TRANSR, UPLO, N, AP, ARF, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/ztrcon.f b/SRC/ztrcon.f index 337bf833..8b173cdf 100644 --- a/SRC/ztrcon.f +++ b/SRC/ztrcon.f @@ -2,7 +2,8 @@ $ RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/ztrevc.f b/SRC/ztrevc.f index b59d7a42..bd4473d8 100644 --- a/SRC/ztrevc.f +++ b/SRC/ztrevc.f @@ -2,7 +2,8 @@ $ LDVR, MM, M, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ztrexc.f b/SRC/ztrexc.f index 14c5f6b8..e259e122 100644 --- a/SRC/ztrexc.f +++ b/SRC/ztrexc.f @@ -1,7 +1,8 @@ SUBROUTINE ZTREXC( COMPQ, N, T, LDT, Q, LDQ, IFST, ILST, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ztrrfs.f b/SRC/ztrrfs.f index 11833234..7ae24020 100644 --- a/SRC/ztrrfs.f +++ b/SRC/ztrrfs.f @@ -2,7 +2,8 @@ $ LDX, FERR, BERR, WORK, RWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/ztrsen.f b/SRC/ztrsen.f index e5779a72..7050cd24 100644 --- a/SRC/ztrsen.f +++ b/SRC/ztrsen.f @@ -2,7 +2,8 @@ $ SEP, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/ztrsna.f b/SRC/ztrsna.f index 5d048951..20a8e2f8 100644 --- a/SRC/ztrsna.f +++ b/SRC/ztrsna.f @@ -3,7 +3,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * Modified to call ZLACN2 in place of ZLACON, 10 Feb 03, SJH. diff --git a/SRC/ztrsyl.f b/SRC/ztrsyl.f index 9dc394c9..baf619c0 100644 --- a/SRC/ztrsyl.f +++ b/SRC/ztrsyl.f @@ -2,7 +2,8 @@ $ LDC, SCALE, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ztrti2.f b/SRC/ztrti2.f index 1b860528..0cf8c2af 100644 --- a/SRC/ztrti2.f +++ b/SRC/ztrti2.f @@ -1,7 +1,8 @@ SUBROUTINE ZTRTI2( UPLO, DIAG, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ztrtri.f b/SRC/ztrtri.f index b8d12246..8b193f0c 100644 --- a/SRC/ztrtri.f +++ b/SRC/ztrtri.f @@ -1,7 +1,8 @@ SUBROUTINE ZTRTRI( UPLO, DIAG, N, A, LDA, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ztrtrs.f b/SRC/ztrtrs.f index 8ff54ff5..d63f3448 100644 --- a/SRC/ztrtrs.f +++ b/SRC/ztrtrs.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ztrttf.f b/SRC/ztrttf.f index f2c24753..efe7df43 100644 --- a/SRC/ztrttf.f +++ b/SRC/ztrttf.f @@ -1,9 +1,9 @@ SUBROUTINE ZTRTTF( TRANSR, UPLO, N, A, LDA, ARF, INFO ) * -* -- LAPACK routine (version 3.2) -- +* -- LAPACK routine (version 3.2.1) -- * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- -* -- November 2008 -- +* -- April 2009 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/ztrttp.f b/SRC/ztrttp.f index c89b3fdf..d0885877 100644 --- a/SRC/ztrttp.f +++ b/SRC/ztrttp.f @@ -4,7 +4,7 @@ * * -- Contributed by Fred Gustavson of the IBM Watson Research Center -- * -- and Julien Langou of the Univ. of Colorado Denver -- -* -- November 2008 -- +* -- November 2008 -- * * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- diff --git a/SRC/ztzrqf.f b/SRC/ztzrqf.f index 4afb118d..4571ca6c 100644 --- a/SRC/ztzrqf.f +++ b/SRC/ztzrqf.f @@ -1,7 +1,8 @@ SUBROUTINE ZTZRQF( M, N, A, LDA, TAU, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/ztzrzf.f b/SRC/ztzrzf.f index 7d9e5981..5abaf1db 100644 --- a/SRC/ztzrzf.f +++ b/SRC/ztzrzf.f @@ -1,7 +1,8 @@ SUBROUTINE ZTZRZF( M, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zung2l.f b/SRC/zung2l.f index 73c940ef..2a9d815e 100644 --- a/SRC/zung2l.f +++ b/SRC/zung2l.f @@ -1,7 +1,8 @@ SUBROUTINE ZUNG2L( M, N, K, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zung2r.f b/SRC/zung2r.f index b4416bc3..d3281039 100644 --- a/SRC/zung2r.f +++ b/SRC/zung2r.f @@ -1,7 +1,8 @@ SUBROUTINE ZUNG2R( M, N, K, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zungbr.f b/SRC/zungbr.f index 7ee2fcb8..6d372212 100644 --- a/SRC/zungbr.f +++ b/SRC/zungbr.f @@ -1,7 +1,8 @@ SUBROUTINE ZUNGBR( VECT, M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zunghr.f b/SRC/zunghr.f index a42c069b..e887fdff 100644 --- a/SRC/zunghr.f +++ b/SRC/zunghr.f @@ -1,7 +1,8 @@ SUBROUTINE ZUNGHR( N, ILO, IHI, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zungl2.f b/SRC/zungl2.f index f03a3b30..fe45abf6 100644 --- a/SRC/zungl2.f +++ b/SRC/zungl2.f @@ -1,7 +1,8 @@ SUBROUTINE ZUNGL2( M, N, K, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zunglq.f b/SRC/zunglq.f index d3e96cb1..fa8edfe3 100644 --- a/SRC/zunglq.f +++ b/SRC/zunglq.f @@ -1,7 +1,8 @@ SUBROUTINE ZUNGLQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zungql.f b/SRC/zungql.f index 1b93aa07..7447b5a9 100644 --- a/SRC/zungql.f +++ b/SRC/zungql.f @@ -1,7 +1,8 @@ SUBROUTINE ZUNGQL( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zungqr.f b/SRC/zungqr.f index 954289a0..372c3874 100644 --- a/SRC/zungqr.f +++ b/SRC/zungqr.f @@ -1,7 +1,8 @@ SUBROUTINE ZUNGQR( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zungr2.f b/SRC/zungr2.f index 5118fd8e..701d30f1 100644 --- a/SRC/zungr2.f +++ b/SRC/zungr2.f @@ -1,7 +1,8 @@ SUBROUTINE ZUNGR2( M, N, K, A, LDA, TAU, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zungrq.f b/SRC/zungrq.f index 19176c74..ef1d8326 100644 --- a/SRC/zungrq.f +++ b/SRC/zungrq.f @@ -1,7 +1,8 @@ SUBROUTINE ZUNGRQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zungtr.f b/SRC/zungtr.f index 679bd0ce..d81d9bb3 100644 --- a/SRC/zungtr.f +++ b/SRC/zungtr.f @@ -1,7 +1,8 @@ SUBROUTINE ZUNGTR( UPLO, N, A, LDA, TAU, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zunm2l.f b/SRC/zunm2l.f index afcc8a7d..f2aa1f2a 100644 --- a/SRC/zunm2l.f +++ b/SRC/zunm2l.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zunm2r.f b/SRC/zunm2r.f index 5614c4d5..6cf5779d 100644 --- a/SRC/zunm2r.f +++ b/SRC/zunm2r.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zunmbr.f b/SRC/zunmbr.f index 58866963..33b5a97b 100644 --- a/SRC/zunmbr.f +++ b/SRC/zunmbr.f @@ -2,7 +2,8 @@ $ LDC, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zunmhr.f b/SRC/zunmhr.f index 34e509d1..da0cb7ef 100644 --- a/SRC/zunmhr.f +++ b/SRC/zunmhr.f @@ -2,7 +2,8 @@ $ LDC, WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zunml2.f b/SRC/zunml2.f index e46edc22..2397898d 100644 --- a/SRC/zunml2.f +++ b/SRC/zunml2.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zunmlq.f b/SRC/zunmlq.f index 946abdaa..ee8dc3bc 100644 --- a/SRC/zunmlq.f +++ b/SRC/zunmlq.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zunmql.f b/SRC/zunmql.f index 05885b95..ba08aa08 100644 --- a/SRC/zunmql.f +++ b/SRC/zunmql.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zunmqr.f b/SRC/zunmqr.f index cba955e0..19d236ac 100644 --- a/SRC/zunmqr.f +++ b/SRC/zunmqr.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zunmr2.f b/SRC/zunmr2.f index 0126d4f5..a4191b51 100644 --- a/SRC/zunmr2.f +++ b/SRC/zunmr2.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zunmr3.f b/SRC/zunmr3.f index 8c329e8c..7f879b2f 100644 --- a/SRC/zunmr3.f +++ b/SRC/zunmr3.f @@ -2,7 +2,8 @@ $ WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zunmrq.f b/SRC/zunmrq.f index 64f3cc84..507c5596 100644 --- a/SRC/zunmrq.f +++ b/SRC/zunmrq.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zunmrz.f b/SRC/zunmrz.f index 5be51837..f1dc10a2 100644 --- a/SRC/zunmrz.f +++ b/SRC/zunmrz.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * January 2007 * * .. Scalar Arguments .. diff --git a/SRC/zunmtr.f b/SRC/zunmtr.f index 28c6b311..09a9be8a 100644 --- a/SRC/zunmtr.f +++ b/SRC/zunmtr.f @@ -2,7 +2,8 @@ $ WORK, LWORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zupgtr.f b/SRC/zupgtr.f index fb0d0959..2041bd95 100644 --- a/SRC/zupgtr.f +++ b/SRC/zupgtr.f @@ -1,7 +1,8 @@ SUBROUTINE ZUPGTR( UPLO, N, AP, TAU, Q, LDQ, WORK, INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. diff --git a/SRC/zupmtr.f b/SRC/zupmtr.f index c5935b77..579ccae1 100644 --- a/SRC/zupmtr.f +++ b/SRC/zupmtr.f @@ -2,7 +2,8 @@ $ INFO ) * * -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * November 2006 * * .. Scalar Arguments .. |