Changeset 3794 for branches/CMIP5_IPSL/NEMO/OPA_SRC/TRD/trdmld.F90
- Timestamp:
- 2013-02-10T20:13:47+01:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/CMIP5_IPSL/NEMO/OPA_SRC/TRD/trdmld.F90
r1846 r3794 744 744 ! ------------------------------------------------- 745 745 746 IF( ( lk_trdmld ) .AND. ( MOD( nitend , nn_trd ) /= 0 ) ) THEN746 IF( ( lk_trdmld ) .AND. ( MOD( nitend-nit000+1, nn_trd ) /= 0 ) ) THEN 747 747 WRITE(numout,cform_err) 748 748 WRITE(numout,*) ' Your nitend parameter, nitend = ', nitend
Note: See TracChangeset
for help on using the changeset viewer.