- Timestamp:
- 2017-02-20T11:07:50+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_MEDUSA_optim_RH/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90
r7692 r7701 74 74 #if defined key_top 75 75 USE trcini ! passive tracer initialisation 76 USE trc, ONLY: numstr ! tracer stats unit number 76 77 #endif 77 78 USE lib_mpp ! distributed memory computing … … 596 597 IF( numdct_heat /= -1 ) CLOSE( numdct_heat ) ! heat transports 597 598 IF( numdct_salt /= -1 ) CLOSE( numdct_salt ) ! salt transports 599 IF( numstr /= -1 ) CLOSE( numstr ) ! tracer statistics 598 600 599 601 !
Note: See TracChangeset
for help on using the changeset viewer.