diff options
Diffstat (limited to 'SRC/csysvxx.f')
-rw-r--r-- | SRC/csysvxx.f | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/SRC/csysvxx.f b/SRC/csysvxx.f index 8ebc2c4a..eae24c3c 100644 --- a/SRC/csysvxx.f +++ b/SRC/csysvxx.f @@ -608,7 +608,7 @@ SMAX = MAX( SMAX, S( J ) ) 10 CONTINUE IF( SMIN.LE.ZERO ) THEN - INFO = -10 + INFO = -11 ELSE IF( N.GT.0 ) THEN SCOND = MAX( SMIN, SMLNUM ) / MIN( SMAX, BIGNUM ) ELSE |