floraachy/OpenBLAS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Make IWORK array larger to avoid overflow

Browse Source
This commit is contained in:
Martin Kroeker
2023-09-14 20:21:06 +02:00
committed by GitHub
parent 0606102460
commit 7779bb6fb1
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lapack-netlib/SRC/dtgex2.f
View File

@@ -254,7 +254,7 @@
$ THRESHA, THRESHB
* ..
* .. Local Arrays ..
INTEGER IWORK( LDST )
INTEGER IWORK( LDST + 2 )
DOUBLE PRECISION AI( 2 ), AR( 2 ), BE( 2 ), IR( LDST, LDST ),
$ IRCOP( LDST, LDST ), LI( LDST, LDST ),
$ LICOP( LDST, LDST ), S( LDST, LDST ),