- Timestamp:
- 2013-02-10T20:11:06+01:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2012/dev_v3_4_STABLE_2012/NEMOGCM/NEMO/TOP_SRC/TRP/trdmld_trc.F90
r3320 r3793 373 373 !! - See NEMO documentation (in preparation) 374 374 !!---------------------------------------------------------------------- 375 !376 375 INTEGER, INTENT(in) :: kt ! ocean time-step index 377 376 ! … … 1174 1173 ! ------------------------------------------------- 1175 1174 1176 IF( ( lk_trdmld_trc ) .AND. ( MOD( nitend , nn_trd_trc ) /= 0 ) ) THEN1175 IF( ( lk_trdmld_trc ) .AND. ( MOD( nitend-nittrc000+1, nn_trd_trc ) /= 0 ) ) THEN 1177 1176 WRITE(numout,cform_err) 1178 1177 WRITE(numout,*) ' Your nitend parameter, nitend = ', nitend
Note: See TracChangeset
for help on using the changeset viewer.