From 79a42f3684c6964405ce2ba6b842229dd2550ca9 Mon Sep 17 00:00:00 2001
From: David A Minton <daminton@purdue.edu>
Date: Fri, 5 Nov 2021 17:31:05 -0400
Subject: [PATCH] Fixed memory leak caused by multiple opening of NetCDF file
 on a restart

---
 src/io/io.f90 | 1 -
 1 file changed, 1 deletion(-)

diff --git a/src/io/io.f90 b/src/io/io.f90
index 62e77e38b..ebdd68531 100644
--- a/src/io/io.f90
+++ b/src/io/io.f90
@@ -2151,7 +2151,6 @@ module subroutine io_write_frame_system(self, param)
                   errmsg = param%outfile // " not found! You must specify OUT_STAT = NEW, REPLACE, or UNKNOWN"
                   goto 667
                end if
-               call param%nciu%open(param)
             case('NEW')
                if (fileExists) then
                   errmsg = param%outfile // " Alread Exists! You must specify OUT_STAT = APPEND, REPLACE, or UNKNOWN"