- Timestamp:
- 2010-11-05T16:22:12+01:00 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/DIA/diaptr.F90
r2287 r2364 728 728 ! Horizontal grid : zphi() 729 729 CALL histbeg(clhstnam, 1, zfoo, jpj, zphi, & 730 1, 1, 1, jpj, niter, zjulian, zdt*nf_ptr, nhoridz, numptr, domain_id=nidom_ptr )730 1, 1, 1, jpj, niter, zjulian, zdt*nf_ptr, nhoridz, numptr, domain_id=nidom_ptr, snc4chunks=snc4set) 731 731 ! Vertical grids : gdept_0, gdepw_0 732 732 CALL histvert( numptr, "deptht", "Vertical T levels", & … … 880 880 ENDIF 881 881 882 CALL histend( numptr )882 CALL histend( numptr, snc4set ) 883 883 884 884 END IF
Note: See TracChangeset
for help on using the changeset viewer.