diff --git a/Source/dump.f90 b/Source/dump.f90
index 45ed5b80daf..2cf728ddafc 100644
--- a/Source/dump.f90
+++ b/Source/dump.f90
@@ -6049,7 +6049,6 @@ SUBROUTINE DUMP_SLCF(T,DT,NM,IFRMT)
             CLOSE(LU_SLCF(IQ2,NM))
          ENDIF
          CLOSE(LU_SLCF(IQ,NM))
-         CLOSE(LU_SLCF(IQ+N_SLCF_MAX,NM))
       ENDIF
    ENDIF