- Timestamp:
- 2017-12-13T15:58:53+01:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_merge_2017/NEMOGCM/NEMO/OPA_SRC/DOM/daymod.F90
r8329 r9019 223 223 !!---------------------------------------------------------------------- 224 224 ! 225 IF( nn_timing == 1 )CALL timing_start('day')225 IF( ln_timing ) CALL timing_start('day') 226 226 ! 227 227 zprec = 0.1 / rday … … 277 277 IF( lrst_oce ) CALL day_rst( kt, 'WRITE' ) ! write day restart information 278 278 ! 279 IF( nn_timing == 1 )CALL timing_stop('day')279 IF( ln_timing ) CALL timing_stop('day') 280 280 ! 281 281 END SUBROUTINE day … … 403 403 CALL iom_rstput( kt, nitrst, numrow, 'adatrj' , adatrj ) ! number of elapsed days since 404 404 ! ! the begining of the run [s] 405 CALL iom_rstput( kt, nitrst, numrow, 'ntime' , REAL( nn_time0, wp) ) ! time405 CALL iom_rstput( kt, nitrst, numrow, 'ntime' , REAL( nn_time0, wp) ) ! time 406 406 ENDIF 407 407 !
Note: See TracChangeset
for help on using the changeset viewer.