diff --git a/SRC/sgeqp3.f b/SRC/sgeqp3.f
index a6ff14f06..a40a54430 100644
--- a/SRC/sgeqp3.f
+++ b/SRC/sgeqp3.f
@@ -239,7 +239,7 @@
 *
 *     Quick return if possible.
 *
-      IF( MINMNM.EQ.0 ) RETURN
+      IF( MINMN.EQ.0 ) RETURN
 *
       NFXD = NFXD - 1
 *