Changeset 410 for trunk/LMDZ.MARS/util/concatnc.F90

Timestamp:

Nov 22, 2011, 5:07:44 PM (13 years ago)

Author:

acolaitis

Message:

Modified NCDF norm of our files from classic to 64bit offset to support variables indices of more than integer*4 maximum length. This is a priori retrocompatible with classic format. I have tested it, it works for all file outputs, newstart (on classic or 64-bit offset files). One can check the format of his .nc with ncdump -k file.nc

File:

• trunk/LMDZ.MARS/util/concatnc.F90 (modified) (2 diffs)

trunk/LMDZ.MARS/util/concatnc.F90

@@ -24 +24 @@
 include "netcdf.inc" ! NetCDF definitions
 
-character (len=50), dimension(1000) :: file
+character (len=80), dimension(1000) :: file
 ! file(): input file(s) names(s)
 character (len=30), dimension(15) :: notconcat
@@ -626 +626 @@
 !==============================================================================
 write(*,*) "creating "//trim(adjustl(filename))//'...'
-ierr = NF_CREATE(filename,NF_CLOBBER,nout)
+ierr = NF_CREATE(filename,IOR(NF_CLOBBER,NF_64BIT_OFFSET),nout)
 ! NB: setting NF_CLOBBER mode means that it's OK to overwrite an existing file
 if (ierr.NE.NF_NOERR) then