FDS source: remove CLOSE of slice file bounds file put in wrong place

firemodels · Nov 1, 2023 · 6bdfcb1 · 6bdfcb1
1 parent 5127c71
commit 6bdfcb1
Showing 1 changed file with 0 additions and 1 deletion.
diff --git 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