- Timestamp:
- 2017-12-19T09:26:25+01:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_merge_2017/NEMOGCM/NEMO/TOP_SRC/trcwri.F90
r7646 r9124 44 44 !!--------------------------------------------------------------------- 45 45 ! 46 IF( nn_timing == 1 )CALL timing_start('trc_wri')46 IF( ln_timing ) CALL timing_start('trc_wri') 47 47 ! 48 48 IF( l_offline .AND. kt == nittrc000 .AND. lwp ) THEN ! WRITE root name in date.file for use by postpro … … 60 60 IF( ln_my_trc ) CALL trc_wri_my_trc ! MY_TRC tracers 61 61 ! 62 IF( nn_timing == 1 )CALL timing_stop('trc_wri')62 IF( ln_timing ) CALL timing_stop('trc_wri') 63 63 ! 64 64 END SUBROUTINE trc_wri
Note: See TracChangeset
for help on using the changeset viewer.