Changeset 3294 for trunk/NEMOGCM/NEMO/TOP_SRC/TRP/trctrp.F90
- Timestamp:
- 2012-01-28T17:44:18+01:00 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/TOP_SRC/TRP/trctrp.F90
r2528 r3294 58 58 INTEGER, INTENT( in ) :: kstp ! ocean time-step index 59 59 !! --------------------------------------------------------------------- 60 ! 61 IF( nn_timing == 1 ) CALL timing_start('trc_trp') 62 ! 60 63 IF( .NOT. lk_c1d ) THEN 61 64 ! … … 86 89 END IF 87 90 ! 91 IF( nn_timing == 1 ) CALL timing_stop('trc_trp') 92 ! 88 93 END SUBROUTINE trc_trp 89 94
Note: See TracChangeset
for help on using the changeset viewer.