Accepting request 70128 from devel:libraries:c_c++
- Update to 3.3.1 [bnc#654560] * New procedures to compute the complete CS decomposition of a partitioned unitary matrix * Level-3 BLAS symmetric indefinite solve (xSYTRS) and symmetric indefinite inversion (xSYTRI) * Bug fixes * Changes see at http://www.netlib.org/lapack/lapack-3.3.1.html and http://www.netlib.org/lapack/lapack-3.3.0.html OBS-URL: https://build.opensuse.org/request/show/70128 OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/lapack?expand=0&rev=16
This commit is contained in:
parent
aa9ca72b95
commit
36ed9d5f9b
87
ila-bound-fix.patch
Normal file
87
ila-bound-fix.patch
Normal file
@ -0,0 +1,87 @@
|
||||
From SVN:
|
||||
r977 | james | 2011-04-22 00:00:11 +0200 (Fri, 22 Apr 2011) | 2 lines
|
||||
fixed problems with zero matrix and scan
|
||||
|
||||
bug0079 :: ILA[SDCZ]LR out of bound access in the DO LOOP for array A.
|
||||
Change DO LOOP condition and add a IF inside the DO LOOP
|
||||
|
||||
Index: SRC/ilazlr.f
|
||||
===================================================================
|
||||
--- SRC/ilazlr.f (revision 976)
|
||||
+++ SRC/ilazlr.f (revision 977)
|
||||
@@ -53,9 +53,12 @@
|
||||
ILAZLR = 0
|
||||
DO J = 1, N
|
||||
I=M
|
||||
- DO WHILE ((A(I,J).NE.ZERO).AND.(I.GE.1))
|
||||
- I=I-1
|
||||
- ENDDO
|
||||
+ DO WHILE ((A(I,J).EQ.ZERO).AND.(I.GT.1))
|
||||
+ I=I-1
|
||||
+ ENDDO
|
||||
+ IF( (I.EQ.1).AND.(A(1,J).EQ.ZERO) ) THEN
|
||||
+ I = 0
|
||||
+ END IF
|
||||
ILAZLR = MAX( ILAZLR, I )
|
||||
END DO
|
||||
END IF
|
||||
Index: SRC/ilaclr.f
|
||||
===================================================================
|
||||
--- SRC/ilaclr.f (revision 976)
|
||||
+++ SRC/ilaclr.f (revision 977)
|
||||
@@ -54,9 +54,12 @@
|
||||
ILACLR = 0
|
||||
DO J = 1, N
|
||||
I=M
|
||||
- DO WHILE ((A(I,J).NE.ZERO).AND.(I.GE.1))
|
||||
- I=I-1
|
||||
- ENDDO
|
||||
+ DO WHILE ((A(I,J).EQ.ZERO).AND.(I.GT.1))
|
||||
+ I=I-1
|
||||
+ ENDDO
|
||||
+ IF( (I.EQ.1).AND.(A(1,J).EQ.ZERO) ) THEN
|
||||
+ I = 0
|
||||
+ END IF
|
||||
ILACLR = MAX( ILACLR, I )
|
||||
END DO
|
||||
END IF
|
||||
Index: SRC/ilaslr.f
|
||||
===================================================================
|
||||
--- SRC/ilaslr.f (revision 976)
|
||||
+++ SRC/ilaslr.f (revision 977)
|
||||
@@ -54,9 +54,12 @@
|
||||
ILASLR = 0
|
||||
DO J = 1, N
|
||||
I=M
|
||||
- DO WHILE ((A(I,J).NE.ZERO).AND.(I.GE.1))
|
||||
- I=I-1
|
||||
+ DO WHILE ((A(I,J).EQ.ZERO).AND.(I.GT.1))
|
||||
+ I=I-1
|
||||
ENDDO
|
||||
+ IF( (I.EQ.1).AND.(A(1,J).EQ.ZERO) ) THEN
|
||||
+ I = 0
|
||||
+ END IF
|
||||
ILASLR = MAX( ILASLR, I )
|
||||
END DO
|
||||
END IF
|
||||
Index: SRC/iladlr.f
|
||||
===================================================================
|
||||
--- SRC/iladlr.f (revision 976)
|
||||
+++ SRC/iladlr.f (revision 977)
|
||||
@@ -53,10 +53,13 @@
|
||||
* Scan up each column tracking the last zero row seen.
|
||||
ILADLR = 0
|
||||
DO J = 1, N
|
||||
- I=M
|
||||
- DO WHILE ((A(I,J).NE.ZERO).AND.(I.GE.1))
|
||||
- I=I-1
|
||||
+ I = M
|
||||
+ DO WHILE ((A(I,J).EQ.ZERO).AND.(I.GT.1))
|
||||
+ I=I-1
|
||||
ENDDO
|
||||
+ IF( (I.EQ.1).AND.(A(1,J).EQ.ZERO) ) THEN
|
||||
+ I = 0
|
||||
+ END IF
|
||||
ILADLR = MAX( ILADLR, I )
|
||||
END DO
|
||||
END IF
|
@ -1,3 +0,0 @@
|
||||
version https://git-lfs.github.com/spec/v1
|
||||
oid sha256:e5f4ca0fca10a01636c698f6d390db62a826106a384f7ab7ebbdd3437e69a8ae
|
||||
size 3007563
|
3
lapack-3.3.1.tar.bz2
Normal file
3
lapack-3.3.1.tar.bz2
Normal file
@ -0,0 +1,3 @@
|
||||
version https://git-lfs.github.com/spec/v1
|
||||
oid sha256:8813ba185727a551f7c2450b96febf0aed7c03d0fc94cd7da5d5b84b180eca0a
|
||||
size 3092598
|
@ -1,3 +1,15 @@
|
||||
-------------------------------------------------------------------
|
||||
Thu May 12 07:12:55 UTC 2011 - burnus@net-b.de
|
||||
|
||||
- Update to 3.3.1 [bnc#654560]
|
||||
* New procedures to compute the complete CS decomposition of a
|
||||
partitioned unitary matrix
|
||||
* Level-3 BLAS symmetric indefinite solve (xSYTRS) and symmetric
|
||||
indefinite inversion (xSYTRI)
|
||||
* Bug fixes
|
||||
* Changes see at http://www.netlib.org/lapack/lapack-3.3.1.html
|
||||
and http://www.netlib.org/lapack/lapack-3.3.0.html
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Thu Aug 12 13:52:25 UTC 2010 - rguenther@novell.com
|
||||
|
||||
|
@ -21,14 +21,15 @@
|
||||
Name: lapack
|
||||
BuildRequires: gcc-fortran
|
||||
Summary: Linear Algebra Package
|
||||
Version: 3.2.2
|
||||
Version: 3.3.1
|
||||
Release: 1
|
||||
License: Public Domain, Freeware
|
||||
Group: Development/Libraries/Parallel
|
||||
Source0: lapack-%{version}.tar.bz2
|
||||
Source1: manpages-3.2.0.tar.bz2
|
||||
Source1: manpages.tar.bz2
|
||||
Source99: lapack-rpmlintrc
|
||||
Patch1: lapack-3.2.2.patch
|
||||
Patch2: ila-bound-fix.patch
|
||||
Url: http://www.netlib.org/lapack/
|
||||
Requires: blas = %{version}
|
||||
Requires: liblapack3 = %{version}
|
||||
@ -150,7 +151,8 @@ Authors:
|
||||
%prep
|
||||
%setup -q
|
||||
%patch1
|
||||
tar xjf %{S:1} --strip-components=1
|
||||
%patch2
|
||||
tar xjf %{S:1}
|
||||
|
||||
%build
|
||||
cp make.inc.example make.inc
|
||||
|
@ -1,3 +0,0 @@
|
||||
version https://git-lfs.github.com/spec/v1
|
||||
oid sha256:dd3438ab0c9d0ff314f3394f47054bab14571f568fa9d33e3b7f410f6c11b352
|
||||
size 656985
|
3
manpages.tar.bz2
Normal file
3
manpages.tar.bz2
Normal file
@ -0,0 +1,3 @@
|
||||
version https://git-lfs.github.com/spec/v1
|
||||
oid sha256:18ea32f5d93732ffe6e033b3f8d10a1c31ec04ecaec1443ab1859bac71acc496
|
||||
size 691541
|
Loading…
Reference in New Issue
Block a user