diff --git a/mediator/med_io_mod.F90 b/mediator/med_io_mod.F90 index 69d1891f..97db9bcc 100644 --- a/mediator/med_io_mod.F90 +++ b/mediator/med_io_mod.F90 @@ -1140,7 +1140,6 @@ subroutine med_io_write_FB(filename, FB, whead, wdata, nx, ny, nt, & call pio_syncfile(io_file(lfile_ind)) call pio_freedecomp(io_file(lfile_ind), iodesc) endif - deallocate(fieldNameList) deallocate(ownedElemCoords, ownedElemCoords_x, ownedElemCoords_y) if (dbug_flag > 5) then