- Timestamp:
- 2011-11-20T15:27:18+01:00 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/NEMO/TOP_SRC/TRP/trcadv.F90
r3153 r3160 75 75 !!---------------------------------------------------------------------- 76 76 ! 77 IF( nn_timing == 1 ) CALL timing_start('trc_adv') 78 ! 77 79 CALL wrk_alloc( jpi, jpj, jpk, zun, zvn, zwn ) 78 80 ! … … 140 142 ! 141 143 CALL wrk_dealloc( jpi, jpj, jpk, zun, zvn, zwn ) 144 ! 145 IF( nn_timing == 1 ) CALL timing_stop('trc_adv') 142 146 ! 143 147 END SUBROUTINE trc_adv
Note: See TracChangeset
for help on using the changeset viewer.