- 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/OPA_SRC/C1D/dyndmp.F90
r6140 r9124 157 157 !!---------------------------------------------------------------------- 158 158 ! 159 IF( nn_timing == 1 )CALL timing_start( 'dyn_dmp' )159 IF( ln_timing ) CALL timing_start( 'dyn_dmp' ) 160 160 ! 161 161 CALL wrk_alloc( jpi,jpj,jpk,2, zuv_dta ) … … 227 227 CALL wrk_dealloc( jpi,jpj,jpk,2, zuv_dta ) 228 228 ! 229 IF( nn_timing == 1 )CALL timing_stop( 'dyn_dmp')229 IF( ln_timing ) CALL timing_stop( 'dyn_dmp') 230 230 ! 231 231 END SUBROUTINE dyn_dmp
Note: See TracChangeset
for help on using the changeset viewer.