diff --git a/lapack-netlib/SRC/clarrv.f b/lapack-netlib/SRC/clarrv.f index a45f55ac3..26a9febc8 100644 --- a/lapack-netlib/SRC/clarrv.f +++ b/lapack-netlib/SRC/clarrv.f @@ -351,7 +351,7 @@ * * Quick return if possible * - IF( N.LE.0 ) THEN + IF( (N.LE.0) .OR. (M.LE.0) ) THEN RETURN END IF *