Update dbdsqr.f

Typo fix (spurious insertion on wrong line)
This commit is contained in:
Martin Kroeker 2017-03-24 16:24:39 +01:00 committed by GitHub
parent ca89a16a72
commit 2d43a1d83a
1 changed files with 1 additions and 1 deletions

View File

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