diff options
| author | julie <julielangou@users.noreply.github.com> | 2013-11-20 18:57:47 +0000 |
|---|---|---|
| committer | julie <julielangou@users.noreply.github.com> | 2013-11-20 18:57:47 +0000 |
| commit | 89e6d08cb3551d04d65b2ddb1d2534beb24c7a76 (patch) | |
| tree | b5cd3f6293ca4ca439bac1c9501c771b7fac8b5d /SRC/dtgsy2.f | |
| parent | 8368c618d419d8648c03299977f0fffc18b861d9 (diff) | |
| download | lapack-89e6d08cb3551d04d65b2ddb1d2534beb24c7a76.tar.gz lapack-89e6d08cb3551d04d65b2ddb1d2534beb24c7a76.tar.bz2 lapack-89e6d08cb3551d04d65b2ddb1d2534beb24c7a76.zip | |
Fix info value problem for (c,d,s,z)tgsy2.f reported by Elena Ivanova (ORACLE) - Sent Nov 20th
Diffstat (limited to 'SRC/dtgsy2.f')
| -rw-r--r-- | SRC/dtgsy2.f | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/SRC/dtgsy2.f b/SRC/dtgsy2.f index 44fc84f8..dcc5e44f 100644 --- a/SRC/dtgsy2.f +++ b/SRC/dtgsy2.f @@ -342,7 +342,7 @@ ELSE IF( N.LE.0 ) THEN INFO = -4 ELSE IF( LDA.LT.MAX( 1, M ) ) THEN - INFO = -5 + INFO = -6 ELSE IF( LDB.LT.MAX( 1, N ) ) THEN INFO = -8 ELSE IF( LDC.LT.MAX( 1, M ) ) THEN |