- Timestamp:
- 2010-11-05T16:22:12+01:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/nemo_v3_3_beta/NEMOGCM/NEMO/TOP_SRC/TRP/trdmld_trc.F90
r2287 r2364 1304 1304 CALL dia_nam( clhstnam, nn_trd_trc, csuff ) 1305 1305 CALL histbeg( clhstnam, jpi, glamt, jpj, gphit, & 1306 & 1, jpi, 1, jpj, nit000, zjulian, rdt, nh_t(jn), nidtrd(jn), domain_id=nidom )1306 & 1, jpi, 1, jpj, nit000, zjulian, rdt, nh_t(jn), nidtrd(jn), domain_id=nidom, snc4chunks=snc4set ) 1307 1307 1308 1308 !-- Define the ML depth variable … … 1317 1317 CALL dia_nam( clhstnam, nn_trd_trc, 'trdbio' ) 1318 1318 CALL histbeg( clhstnam, jpi, glamt, jpj, gphit, & 1319 & 1, jpi, 1, jpj, nit000, zjulian, rdt, nh_tb, nidtrdbio, domain_id=nidom )1319 & 1, jpi, 1, jpj, nit000, zjulian, rdt, nh_tb, nidtrdbio, domain_id=nidom, snc4chunks=snc4set ) 1320 1320 #endif 1321 1321 … … 1368 1368 !-- Leave IOIPSL/NetCDF define mode 1369 1369 DO jn = 1, jptra 1370 IF( ln_trdtrc(jn) ) CALL histend( nidtrd(jn) )1370 IF( ln_trdtrc(jn) ) CALL histend( nidtrd(jn), snc4set ) 1371 1371 END DO 1372 1372 1373 1373 #if defined key_lobster 1374 1374 !-- Leave IOIPSL/NetCDF define mode 1375 CALL histend( nidtrdbio )1375 CALL histend( nidtrdbio, snc4set ) 1376 1376 1377 1377 IF(lwp) WRITE(numout,*)
Note: See TracChangeset
for help on using the changeset viewer.