diff options
1550 files changed, 3249 insertions, 1865 deletions
diff --git a/INSTALL/ilaver.f b/INSTALL/ilaver.f index 50256307..17b79247 100644 --- a/INSTALL/ilaver.f +++ b/INSTALL/ilaver.f @@ -1,11 +1,11 @@ SUBROUTINE ILAVER( VERS_MAJOR, VERS_MINOR, VERS_PATCH ) +* +* -- LAPACK routine (version 3.2.1) -- * -* -- LAPACK routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2008 +* -- April 2009 -- * -* .. Scalar Arguments .. - INTEGER VERS_MAJOR, VERS_MINOR, VERS_PATCH +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * .. * * Purpose @@ -15,19 +15,19 @@ * * Arguments * ========= -* * VERS_MAJOR (output) INTEGER * return the lapack major version * VERS_MINOR (output) INTEGER * return the lapack minor version from the major version * VERS_PATCH (output) INTEGER * return the lapack patch version from the minor version +* ===================================================================== * -* .. Executable Statements .. -* + INTEGER VERS_MAJOR, VERS_MINOR, VERS_PATCH +* ===================================================================== VERS_MAJOR = 3 VERS_MINOR = 2 - VERS_PATCH = 0 + VERS_PATCH = 1 * ===================================================================== * RETURN diff --git a/INSTALL/make.inc.ALPHA b/INSTALL/make.inc.ALPHA index d43e2f04..9a1a34e7 100644 --- a/INSTALL/make.inc.ALPHA +++ b/INSTALL/make.inc.ALPHA @@ -1,7 +1,7 @@ #################################################################### # LAPACK make include file. # -# LAPACK, Version 3.2 # -# November 2008 # +# LAPACK, Version 3.2.1 # +# April 2009 # #################################################################### # SHELL = /bin/sh diff --git a/INSTALL/make.inc.HPPA b/INSTALL/make.inc.HPPA index f2df1b66..b692a5d4 100644 --- a/INSTALL/make.inc.HPPA +++ b/INSTALL/make.inc.HPPA @@ -1,7 +1,7 @@ #################################################################### # LAPACK make include file. # -# LAPACK, Version 3.2 # -# November 2008 # +# LAPACK, Version 3.2.1 # +# April 2009 # #################################################################### # SHELL = /bin/sh diff --git a/INSTALL/make.inc.IRIX64 b/INSTALL/make.inc.IRIX64 index 7925f812..27d81385 100644 --- a/INSTALL/make.inc.IRIX64 +++ b/INSTALL/make.inc.IRIX64 @@ -1,7 +1,7 @@ #################################################################### # LAPACK make include file. # -# LAPACK, Version 3.2 # -# November 2008 # +# LAPACK, Version 3.2.1 # +# April 2009 # #################################################################### # SHELL = /sbin/sh diff --git a/INSTALL/make.inc.O2K b/INSTALL/make.inc.O2K index d6fba9f2..a7f9b863 100644 --- a/INSTALL/make.inc.O2K +++ b/INSTALL/make.inc.O2K @@ -1,7 +1,7 @@ #################################################################### # LAPACK make include file. # -# LAPACK, Version 3.2 # -# November 2008 # +# LAPACK, Version 3.2.1 # +# April 2009 # #################################################################### # SHELL = /sbin/sh diff --git a/INSTALL/make.inc.RS6K b/INSTALL/make.inc.RS6K index c685493c..d4343520 100644 --- a/INSTALL/make.inc.RS6K +++ b/INSTALL/make.inc.RS6K @@ -1,7 +1,7 @@ #################################################################### # LAPACK make include file. # -# LAPACK, Version 3.2 # -# November 2008 # +# LAPACK, Version 3.2.1 # +# April 2009 # #################################################################### # SHELL = /bin/sh diff --git a/INSTALL/make.inc.SGI5 b/INSTALL/make.inc.SGI5 index 25576191..d677ab57 100644 --- a/INSTALL/make.inc.SGI5 +++ b/INSTALL/make.inc.SGI5 @@ -1,7 +1,7 @@ #################################################################### # LAPACK make include file. # -# LAPACK, Version 3.2 # -# November 2008 # +# LAPACK, Version 3.2.1 # +# April 2009 # #################################################################### # SHELL = /sbin/sh diff --git a/INSTALL/make.inc.SUN4 b/INSTALL/make.inc.SUN4 index 3d7327c3..004840cf 100644 --- a/INSTALL/make.inc.SUN4 +++ b/INSTALL/make.inc.SUN4 @@ -1,7 +1,7 @@ #################################################################### # LAPACK make include file. # -# LAPACK, Version 3.2 # -# November 2008 # +# LAPACK, Version 3.2.1 # +# April 2009 # #################################################################### # SHELL = /bin/sh diff --git a/INSTALL/make.inc.SUN4SOL2 b/INSTALL/make.inc.SUN4SOL2 index f9611c92..3dc9512e 100644 --- a/INSTALL/make.inc.SUN4SOL2 +++ b/INSTALL/make.inc.SUN4SOL2 @@ -1,7 +1,7 @@ #################################################################### # LAPACK make include file. # -# LAPACK, Version 3.2 # -# November 2008 # +# LAPACK, Version 3.2.1 # +# April 2009 # #################################################################### # SHELL = /bin/sh diff --git a/INSTALL/make.inc.gfortran b/INSTALL/make.inc.gfortran index 0b487b3c..508e7dae 100644 --- a/INSTALL/make.inc.gfortran +++ b/INSTALL/make.inc.gfortran @@ -1,7 +1,7 @@ #################################################################### # LAPACK make include file. # -# LAPACK, Version 3.2 # -# November 2008 # +# LAPACK, Version 3.2.1 # +# April 2009 # #################################################################### # SHELL = /bin/sh diff --git a/INSTALL/make.inc.pghpf b/INSTALL/make.inc.pghpf index 237e8a18..64e3c083 100644 --- a/INSTALL/make.inc.pghpf +++ b/INSTALL/make.inc.pghpf @@ -1,7 +1,7 @@ #################################################################### # LAPACK make include file. # -# LAPACK, Version 3.2 # -# November 2008 # +# LAPACK, Version 3.2.1 # +# April 2009 # #################################################################### # SHELL = /bin/sh @@ -1,4 +1,4 @@ -Copyright (c) 1992-2008 The University of Tennessee. All rights reserved. +Copyright (c) 1992-2009 The University of Tennessee. All rights reserved. $COPYRIGHT$ @@ -2,19 +2,20 @@ LAPACK README FILE ================== -VERSION 1.0 : February 29, 1992 -VERSION 1.0a : June 30, 1992 -VERSION 1.0b : October 31, 1992 -VERSION 1.1 : March 31, 1993 -VERSION 2.0 : September 30, 1994 -VERSION 3.0 : June 30, 1999 +VERSION 1.0 : February 29, 1992 +VERSION 1.0a : June 30, 1992 +VERSION 1.0b : October 31, 1992 +VERSION 1.1 : March 31, 1993 +VERSION 2.0 : September 30, 1994 +VERSION 3.0 : June 30, 1999 VERSION 3.0 + update : October 31, 1999 VERSION 3.0 + update : May 31, 2000 -VERSION 3.1 : November 2006 -VERSION 3.1.1 : February 2007 -VERSION 3.2 : November 2008 +VERSION 3.1 : November 2006 +VERSION 3.1.1 : February 2007 +VERSION 3.2 : November 2008 +VERSION 3.2.1 : April 2009 -LAPACK is a library of Fortran 90 with subroutines for solving +LAPACK is a library of Fortran 90 with subroutines for solving the most commonly occurring problems in numerical linear algebra. It is freely-available software, and is copyrighted. 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 .. diff --git a/TESTING/EIG/dlafts.f b/TESTING/EIG/dlafts.f index a5a2e4fe..2c81eab4 100644 --- a/TESTING/EIG/dlafts.f +++ b/TESTING/EIG/dlafts.f @@ -1,9 +1,9 @@ SUBROUTINE DLAFTS( TYPE, M, N, IMAT, NTESTS, RESULT, ISEED, $ THRESH, IOUNIT, IE ) * -* -- LAPACK auxiliary test routine (version 3.1) -- +* -- LAPACK auxiliary test routine (version 3.1.2) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. CHARACTER*3 TYPE diff --git a/TESTING/EIG/slafts.f b/TESTING/EIG/slafts.f index c82a0269..d36e0e9d 100644 --- a/TESTING/EIG/slafts.f +++ b/TESTING/EIG/slafts.f @@ -1,9 +1,9 @@ SUBROUTINE SLAFTS( TYPE, M, N, IMAT, NTESTS, RESULT, ISEED, $ THRESH, IOUNIT, IE ) * -* -- LAPACK auxiliary test routine (version 3.1) -- +* -- LAPACK auxiliary test routine (version 3.1.2) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. CHARACTER*3 TYPE diff --git a/TESTING/LIN/cchkps.f b/TESTING/LIN/cchkps.f index 09c8c40d..379e421c 100644 --- a/TESTING/LIN/cchkps.f +++ b/TESTING/LIN/cchkps.f @@ -4,7 +4,7 @@ * * -- LAPACK test routine (version 3.2.1) -- * Craig Lucas, University of Manchester / NAG Ltd. -* October, 2008 +* -- April 2009 * * .. Scalar Arguments .. REAL THRESH diff --git a/TESTING/LIN/cdrvgbx.f b/TESTING/LIN/cdrvgbx.f index ba250253..6ae8db30 100644 --- a/TESTING/LIN/cdrvgbx.f +++ b/TESTING/LIN/cdrvgbx.f @@ -2,9 +2,9 @@ $ AFB, LAFB, ASAV, B, BSAV, X, XACT, S, WORK, $ RWORK, IWORK, NOUT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. LOGICAL TSTERR diff --git a/TESTING/LIN/cdrvgex.f b/TESTING/LIN/cdrvgex.f index bf42a117..83b9fee6 100644 --- a/TESTING/LIN/cdrvgex.f +++ b/TESTING/LIN/cdrvgex.f @@ -2,9 +2,9 @@ $ A, AFAC, ASAV, B, BSAV, X, XACT, S, WORK, $ RWORK, IWORK, NOUT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. LOGICAL TSTERR diff --git a/TESTING/LIN/cdrvhex.f b/TESTING/LIN/cdrvhex.f index 67bbf93e..bf16a294 100644 --- a/TESTING/LIN/cdrvhex.f +++ b/TESTING/LIN/cdrvhex.f @@ -2,9 +2,9 @@ $ A, AFAC, AINV, B, X, XACT, WORK, RWORK, IWORK, $ NOUT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. LOGICAL TSTERR diff --git a/TESTING/LIN/cdrvpox.f b/TESTING/LIN/cdrvpox.f index 8989cfd3..cbb2a69f 100644 --- a/TESTING/LIN/cdrvpox.f +++ b/TESTING/LIN/cdrvpox.f @@ -2,9 +2,9 @@ $ A, AFAC, ASAV, B, BSAV, X, XACT, S, WORK, $ RWORK, NOUT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. LOGICAL TSTERR diff --git a/TESTING/LIN/cerrgex.f b/TESTING/LIN/cerrgex.f index 935c90d2..b4e538f4 100644 --- a/TESTING/LIN/cerrgex.f +++ b/TESTING/LIN/cerrgex.f @@ -1,8 +1,8 @@ SUBROUTINE CERRGE( PATH, NUNIT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. CHARACTER*3 PATH diff --git a/TESTING/LIN/cerrpox.f b/TESTING/LIN/cerrpox.f index 34609a88..18c9a3cb 100644 --- a/TESTING/LIN/cerrpox.f +++ b/TESTING/LIN/cerrpox.f @@ -1,8 +1,8 @@ SUBROUTINE CERRPO( PATH, NUNIT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. CHARACTER*3 PATH diff --git a/TESTING/LIN/cerrvxx.f b/TESTING/LIN/cerrvxx.f index 0f5c5848..1dfff764 100644 --- a/TESTING/LIN/cerrvxx.f +++ b/TESTING/LIN/cerrvxx.f @@ -1,8 +1,11 @@ SUBROUTINE CERRVX( PATH, NUNIT ) * -* -- LAPACK test routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2008 +* -- LAPACK test 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*3 PATH diff --git a/TESTING/LIN/dchkab.f b/TESTING/LIN/dchkab.f index 274f3548..8d02f5e8 100644 --- a/TESTING/LIN/dchkab.f +++ b/TESTING/LIN/dchkab.f @@ -2,8 +2,11 @@ IMPLICIT NONE * * -- LAPACK test routine (version 3.2.1) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* January 2007 +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * * Purpose * ======= diff --git a/TESTING/LIN/dchkge.f b/TESTING/LIN/dchkge.f index e539e7ba..9d2a9764 100644 --- a/TESTING/LIN/dchkge.f +++ b/TESTING/LIN/dchkge.f @@ -3,8 +3,11 @@ $ X, XACT, WORK, RWORK, IWORK, NOUT ) * * -- LAPACK test routine (version 3.2.1) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* January 2007 +* +* -- 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 .. LOGICAL TSTERR diff --git a/TESTING/LIN/ddrvgbx.f b/TESTING/LIN/ddrvgbx.f index 5cfc13ea..4b4d97f6 100644 --- a/TESTING/LIN/ddrvgbx.f +++ b/TESTING/LIN/ddrvgbx.f @@ -2,9 +2,9 @@ $ AFB, LAFB, ASAV, B, BSAV, X, XACT, S, WORK, $ RWORK, IWORK, NOUT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. LOGICAL TSTERR diff --git a/TESTING/LIN/ddrvgex.f b/TESTING/LIN/ddrvgex.f index ac5cc095..17fe1f45 100644 --- a/TESTING/LIN/ddrvgex.f +++ b/TESTING/LIN/ddrvgex.f @@ -2,9 +2,9 @@ $ A, AFAC, ASAV, B, BSAV, X, XACT, S, WORK, $ RWORK, IWORK, NOUT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. LOGICAL TSTERR diff --git a/TESTING/LIN/ddrvpox.f b/TESTING/LIN/ddrvpox.f index 0dabf130..a737c169 100644 --- a/TESTING/LIN/ddrvpox.f +++ b/TESTING/LIN/ddrvpox.f @@ -2,9 +2,9 @@ $ A, AFAC, ASAV, B, BSAV, X, XACT, S, WORK, $ RWORK, IWORK, NOUT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. LOGICAL TSTERR diff --git a/TESTING/LIN/derrgex.f b/TESTING/LIN/derrgex.f index 259bc6fe..032981e1 100644 --- a/TESTING/LIN/derrgex.f +++ b/TESTING/LIN/derrgex.f @@ -1,8 +1,8 @@ SUBROUTINE DERRGE( PATH, NUNIT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. CHARACTER*3 PATH diff --git a/TESTING/LIN/derrpox.f b/TESTING/LIN/derrpox.f index e8c1e7e8..e15bbe7b 100644 --- a/TESTING/LIN/derrpox.f +++ b/TESTING/LIN/derrpox.f @@ -1,8 +1,8 @@ SUBROUTINE DERRPO( PATH, NUNIT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. CHARACTER*3 PATH diff --git a/TESTING/LIN/derrsyx.f b/TESTING/LIN/derrsyx.f index 7a25a8a8..3c65ff4e 100644 --- a/TESTING/LIN/derrsyx.f +++ b/TESTING/LIN/derrsyx.f @@ -1,8 +1,8 @@ SUBROUTINE DERRSY( PATH, NUNIT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. CHARACTER*3 PATH diff --git a/TESTING/LIN/derrvxx.f b/TESTING/LIN/derrvxx.f index 6d819509..f7f90b0f 100644 --- a/TESTING/LIN/derrvxx.f +++ b/TESTING/LIN/derrvxx.f @@ -1,8 +1,11 @@ SUBROUTINE DERRVX( PATH, NUNIT ) * -* -- LAPACK test routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2008 +* -- LAPACK test 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*3 PATH diff --git a/TESTING/LIN/sdrvgbx.f b/TESTING/LIN/sdrvgbx.f index d58b5ce2..b006abc0 100644 --- a/TESTING/LIN/sdrvgbx.f +++ b/TESTING/LIN/sdrvgbx.f @@ -2,9 +2,9 @@ $ AFB, LAFB, ASAV, B, BSAV, X, XACT, S, WORK, $ RWORK, IWORK, NOUT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. LOGICAL TSTERR diff --git a/TESTING/LIN/sdrvgex.f b/TESTING/LIN/sdrvgex.f index e51bee6e..89e38c1e 100644 --- a/TESTING/LIN/sdrvgex.f +++ b/TESTING/LIN/sdrvgex.f @@ -2,9 +2,9 @@ $ A, AFAC, ASAV, B, BSAV, X, XACT, S, WORK, $ RWORK, IWORK, NOUT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. LOGICAL TSTERR diff --git a/TESTING/LIN/sdrvpox.f b/TESTING/LIN/sdrvpox.f index 7225487a..a4b8de73 100644 --- a/TESTING/LIN/sdrvpox.f +++ b/TESTING/LIN/sdrvpox.f @@ -2,9 +2,9 @@ $ A, AFAC, ASAV, B, BSAV, X, XACT, S, WORK, $ RWORK, IWORK, NOUT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. LOGICAL TSTERR diff --git a/TESTING/LIN/serrgex.f b/TESTING/LIN/serrgex.f index 0d57fe7a..b9ab2689 100644 --- a/TESTING/LIN/serrgex.f +++ b/TESTING/LIN/serrgex.f @@ -1,8 +1,8 @@ SUBROUTINE SERRGE( PATH, NUNIT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. CHARACTER*3 PATH diff --git a/TESTING/LIN/serrpox.f b/TESTING/LIN/serrpox.f index 040230e7..48f6cd1d 100644 --- a/TESTING/LIN/serrpox.f +++ b/TESTING/LIN/serrpox.f @@ -1,8 +1,8 @@ SUBROUTINE SERRPO( PATH, NUNIT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. CHARACTER*3 PATH diff --git a/TESTING/LIN/serrvxx.f b/TESTING/LIN/serrvxx.f index 40a9d94d..ce7ac48f 100644 --- a/TESTING/LIN/serrvxx.f +++ b/TESTING/LIN/serrvxx.f @@ -1,8 +1,11 @@ SUBROUTINE SERRVX( PATH, NUNIT ) * -* -- LAPACK test routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2008 +* -- LAPACK test 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*3 PATH diff --git a/TESTING/LIN/zchkab.f b/TESTING/LIN/zchkab.f index 8ec1bd05..cea02b0e 100644 --- a/TESTING/LIN/zchkab.f +++ b/TESTING/LIN/zchkab.f @@ -2,8 +2,11 @@ IMPLICIT NONE * * -- LAPACK test routine (version 3.2.1) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* January 2007 +* +* -- April 2009 -- +* +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- * * Purpose * ======= diff --git a/TESTING/LIN/zchkps.f b/TESTING/LIN/zchkps.f index 28a02fab..20e199a2 100644 --- a/TESTING/LIN/zchkps.f +++ b/TESTING/LIN/zchkps.f @@ -4,7 +4,7 @@ * * -- LAPACK test routine (version 3.2.1) -- * Craig Lucas, University of Manchester / NAG Ltd. -* October, 2008 +* -- April 2009 * * .. Scalar Arguments .. DOUBLE PRECISION THRESH diff --git a/TESTING/LIN/zdrvgbx.f b/TESTING/LIN/zdrvgbx.f index dfff5e62..5fa2bb79 100644 --- a/TESTING/LIN/zdrvgbx.f +++ b/TESTING/LIN/zdrvgbx.f @@ -2,9 +2,9 @@ $ AFB, LAFB, ASAV, B, BSAV, X, XACT, S, WORK, $ RWORK, IWORK, NOUT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. LOGICAL TSTERR diff --git a/TESTING/LIN/zdrvgex.f b/TESTING/LIN/zdrvgex.f index f43c892b..4dcd1fa7 100644 --- a/TESTING/LIN/zdrvgex.f +++ b/TESTING/LIN/zdrvgex.f @@ -2,9 +2,9 @@ $ A, AFAC, ASAV, B, BSAV, X, XACT, S, WORK, $ RWORK, IWORK, NOUT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. LOGICAL TSTERR diff --git a/TESTING/LIN/zdrvhex.f b/TESTING/LIN/zdrvhex.f index d68a3f1a..d0461376 100644 --- a/TESTING/LIN/zdrvhex.f +++ b/TESTING/LIN/zdrvhex.f @@ -2,9 +2,9 @@ $ A, AFAC, AINV, B, X, XACT, WORK, RWORK, IWORK, $ NOUT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. LOGICAL TSTERR diff --git a/TESTING/LIN/zdrvpox.f b/TESTING/LIN/zdrvpox.f index e3321a62..38a2e349 100644 --- a/TESTING/LIN/zdrvpox.f +++ b/TESTING/LIN/zdrvpox.f @@ -2,9 +2,9 @@ $ A, AFAC, ASAV, B, BSAV, X, XACT, S, WORK, $ RWORK, NOUT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. LOGICAL TSTERR diff --git a/TESTING/LIN/zerrgex.f b/TESTING/LIN/zerrgex.f index 5fbf891b..282b2aad 100644 --- a/TESTING/LIN/zerrgex.f +++ b/TESTING/LIN/zerrgex.f @@ -1,8 +1,8 @@ SUBROUTINE ZERRGE( PATH, NUNIT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. CHARACTER*3 PATH diff --git a/TESTING/LIN/zerrpox.f b/TESTING/LIN/zerrpox.f index 40dbd0c5..a976e677 100644 --- a/TESTING/LIN/zerrpox.f +++ b/TESTING/LIN/zerrpox.f @@ -1,8 +1,8 @@ SUBROUTINE ZERRPO( PATH, NUNIT ) * -* -- LAPACK test routine (version 3.2) -- +* -- LAPACK test routine (version 3.2.1) -- * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* April 2009 * * .. Scalar Arguments .. CHARACTER*3 PATH diff --git a/TESTING/LIN/zerrvxx.f b/TESTING/LIN/zerrvxx.f index 23423e2b..1f5a9106 100644 --- a/TESTING/LIN/zerrvxx.f +++ b/TESTING/LIN/zerrvxx.f @@ -1,8 +1,11 @@ SUBROUTINE ZERRVX( PATH, NUNIT ) * -* -- LAPACK test routine (version 3.2) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2008 +* -- LAPACK test 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*3 PATH diff --git a/make.inc.example b/make.inc.example index 5e22584d..64c1c185 100644 --- a/make.inc.example +++ b/make.inc.example @@ -1,8 +1,8 @@ # -*- Makefile -*- #################################################################### # LAPACK make include file. # -# LAPACK, Version 3.2 # -# November 2008 # +# LAPACK, Version 3.2.1 # +# April 2009 # #################################################################### # # See the INSTALL/ directory for more examples. |