Changeset 410 for trunk/LMDZ.MARS/libf/phymars/inistats.F
- Timestamp:
- Nov 22, 2011, 5:07:44 PM (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.MARS/libf/phymars/inistats.F
r38 r410 43 43 enddo 44 44 45 ierr = NF_CREATE("stats.nc", NF_CLOBBER,nid)45 ierr = NF_CREATE("stats.nc",IOR(NF_CLOBBER,NF_64BIT_OFFSET),nid) 46 46 if (ierr.ne.NF_NOERR) then 47 47 write (*,*) NF_STRERROR(ierr)
Note: See TracChangeset
for help on using the changeset viewer.