Changeset 410 for trunk/LMDZ.MARS/libf/phymars/physdem1.F
- Timestamp:
- Nov 22, 2011, 5:07:44 PM (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.MARS/libf/phymars/physdem1.F
r224 r410 94 94 c things to store in the physics start file: 95 95 c 96 ierr = NF_CREATE(adjustl(filename),NF_CLOBBER, nid) 96 ierr = NF_CREATE(adjustl(filename), 97 & IOR(NF_CLOBBER,NF_64BIT_OFFSET), nid) 97 98 IF (ierr.NE.NF_NOERR) THEN 98 99 WRITE(6,*)'physdem1: Problem creating file ',adjustl(filename)
Note: See TracChangeset
for help on using the changeset viewer.