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

Update dbdsqr.f

This commit is contained in:
Martin Kroeker 2017-03-24 16:56:17 +01:00 committed by GitHub
parent 2d43a1d83a
commit 8a17201f8e
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/dbdsqr.f
View File

@ -310,7 +310,7 @@
ELSE IF( NRU.LT.0 ) THEN ELSE IF( NRU.LT.0 ) THEN
INFO = -4 INFO = -4
ELSE IF( NCC.LT.0 ) THEN ELSE IF( NCC.LT.0 ) THEN
INFO = -5, INFO = -5
ELSE IF( ( NCVT.EQ.0 .AND. LDVT.LT.1 ) .OR. ELSE IF( ( NCVT.EQ.0 .AND. LDVT.LT.1 ) .OR.
$ ( NCVT.GT.0 .AND. LDVT.LT.MAX( 1, N ) ) ) THEN $ ( NCVT.GT.0 .AND. LDVT.LT.MAX( 1, N ) ) ) THEN
INFO = -9 INFO = -9