Changeset 3257
- Timestamp:
- 2012-01-11T14:58:09+01:00 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/EXTERNAL/XMLIO_SERVER/src/IOSERVER/mod_iomanager.f90
r2281 r3257 313 313 314 314 IF (pt_field%axis%name=="none") THEN 315 CALL write_ioipsl_2d(varname,Field_buffer(1:ni,1:nj,1)) 316 ELSE 315 317 CALL write_ioipsl_3d(varname,Field_buffer(1:ni,1:nj,1:nk)) 316 ELSE317 CALL write_ioipsl_2d(varname,Field_buffer(1:ni,1:nj,1))318 318 ENDIF 319 319
Note: See TracChangeset
for help on using the changeset viewer.