Changeset 3811 for LMDZ6/branches/Ocean_skin/libf/dynphy_lonlat
- Timestamp:
- Jan 28, 2021, 4:02:09 PM (4 years ago)
- Location:
- LMDZ6/branches/Ocean_skin
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/Ocean_skin
- Property svn:mergeinfo changed
/LMDZ6/trunk merged: 3799-3806
- Property svn:mergeinfo changed
-
LMDZ6/branches/Ocean_skin/libf/dynphy_lonlat/phylmd/limit_netcdf.F90
r3380 r3811 74 74 NF90_DEF_DIM, NF90_DEF_VAR, NF90_PUT_VAR, NF90_PUT_ATT, & 75 75 NF90_NOERR, NF90_NOWRITE, NF90_DOUBLE, NF90_GLOBAL, & 76 NF90_CLOBBER, NF90_ENDDEF, NF90_UNLIMITED, NF90_FLOAT 76 NF90_CLOBBER, NF90_ENDDEF, NF90_UNLIMITED, NF90_FLOAT, & 77 NF90_64BIT_OFFSET 77 78 USE inter_barxy_m, ONLY: inter_barxy 78 79 USE netcdf95, ONLY: nf95_def_var, nf95_put_att, nf95_put_var … … 228 229 229 230 !--- File creation 230 CALL ncerr(NF90_CREATE(fnam, NF90_CLOBBER,nid),fnam)231 CALL ncerr(NF90_CREATE(fnam,IOR(NF90_CLOBBER,NF90_64BIT_OFFSET),nid),fnam) 231 232 CALL ncerr(NF90_PUT_ATT(nid,NF90_GLOBAL,"title","Fichier conditions aux limites"),fnam) 232 233 str='File produced using ce0l executable.'
Note: See TracChangeset
for help on using the changeset viewer.