HACK: io_netcdf: write NetCDF4 files under 'lcdf64=.true.'

phil-blain · Aug 18, 2022 · 4e053a7 · 4e053a7
1 parent fea412a
commit 4e053a7
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/cicecore/cicedynB/infrastructure/io/io_netcdf/ice_history_write.F90 b/cicecore/cicedynB/infrastructure/io/io_netcdf/ice_history_write.F90
@@ -149,7 +149,7 @@ subroutine ice_write_hist (ns)
 
         ! create file
         iflag = nf90_clobber
-        if (lcdf64) iflag = ior(iflag,nf90_64bit_offset)
+        if (lcdf64) iflag = ior(iflag,nf90_netcdf4)
         status = nf90_create(ncfile(ns), iflag, ncid)
         if (status /= nf90_noerr) call abort_ice(subname// &
            'ERROR: creating history ncfile '//ncfile(ns))

diff --git a/cicecore/cicedynB/infrastructure/io/io_netcdf/ice_restart.F90 b/cicecore/cicedynB/infrastructure/io/io_netcdf/ice_restart.F90
@@ -220,7 +220,7 @@ subroutine init_restart_write(filename_spec)
          close(nu_rst_pointer)
 
          iflag = 0
-         if (lcdf64) iflag = nf90_64bit_offset
+         if (lcdf64) iflag = nf90_netcdf4
          status = nf90_create(trim(filename), iflag, ncid)
          if (status /= nf90_noerr) call abort_ice(subname// &
             'ERROR: creating restart ncfile '//trim(filename))