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

Fix uninitialized read/wrong variable (Reference-LAPACK PR 967)

This commit is contained in:
Martin Kroeker 2023-12-31 12:39:21 +01:00 committed by GitHub
parent 1b668479de
commit 00d7476b4b
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -804,7 +804,7 @@
CALL DLARTGP( B22BULGE, B22E(I-1), RWORK(IU2SN+I-1),
$ RWORK(IU2CS+I-1), R )
ELSE IF( NU .LT. MU ) THEN
CALL DLARTGS( B21E(I), B21E(I+1), NU, RWORK(IU2CS+I-1),
CALL DLARTGS( B21E(I), B21D(I+1), NU, RWORK(IU2CS+I-1),
$ RWORK(IU2SN+I-1) )
ELSE
CALL DLARTGS( B22D(I), B22E(I), MU, RWORK(IU2CS+I-1),