- Timestamp:
- 2017-09-27T16:29:24+02:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_r7881_ENHANCE09_RK3/NEMOGCM/NEMO/RK3_SRC/DYN/dynzdf.F90
r8367 r8568 76 76 !!--------------------------------------------------------------------- 77 77 ! 78 IF( nn_timing == 1) CALL timing_start('dyn_zdf')78 IF( ln_timing ) CALL timing_start('dyn_zdf') 79 79 ! 80 80 IF( kt == nit000 ) THEN !* initialization … … 392 392 & tab3d_2=va, clinfo2= ' Va: ', mask2=vmask, clinfo3='dyn' ) 393 393 ! 394 IF( nn_timing == 1) CALL timing_stop('dyn_zdf')394 IF( ln_timing ) CALL timing_stop('dyn_zdf') 395 395 ! 396 396 END SUBROUTINE dyn_zdf
Note: See TracChangeset
for help on using the changeset viewer.