- Timestamp:
- 2017-12-01T18:44:09+01:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_CNRS_2017/NEMOGCM/NEMO/OPA_SRC/DYN/dynspg_exp.F90
r6140 r8882 61 61 !!---------------------------------------------------------------------- 62 62 ! 63 IF( nn_timing == 1 )CALL timing_start('dyn_spg_exp')63 IF( ln_timing ) CALL timing_start('dyn_spg_exp') 64 64 ! 65 65 IF( kt == nit000 ) THEN … … 93 93 ENDIF 94 94 ! 95 IF( nn_timing == 1 )CALL timing_stop('dyn_spg_exp')95 IF( ln_timing ) CALL timing_stop('dyn_spg_exp') 96 96 ! 97 97 END SUBROUTINE dyn_spg_exp
Note: See TracChangeset
for help on using the changeset viewer.