Changeset 352 for trunk/NEMO/OPA_SRC/DIA/diagap.F90
- Timestamp:
- 2005-12-12T15:18:10+01:00 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/DIA/diagap.F90
r247 r352 168 168 ! Horizontal grid : zphi() 169 169 CALL histbeg( clhstnam, 1, zfoo, 1, zloo, & 170 1, 1, 1, 1, 0, zjulian, zdt, nhoridg, numgap)170 1, 1, 1, 1, 0, zjulian, zdt, nhoridg, numgap, domain_id=nidom ) 171 171 ! Vertical grids : gdept, gdepw 172 172 CALL histvert( numgap, "deptht", "Vertical T levels", &
Note: See TracChangeset
for help on using the changeset viewer.