- 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/TRA/traldf_lap_blp.F90
r9094 r9124 89 89 !!---------------------------------------------------------------------- 90 90 ! 91 IF( ln_timing ) CALL timing_start('tra_ldf_lap')92 !93 91 IF( kt == nit000 .AND. lwp ) THEN 94 92 WRITE(numout,*) … … 165 163 END DO ! end of tracer loop 166 164 ! ! ================== 167 !168 IF( ln_timing ) CALL timing_stop('tra_ldf_lap')169 165 ! 170 166 END SUBROUTINE tra_ldf_lap … … 203 199 !!--------------------------------------------------------------------- 204 200 ! 205 IF( ln_timing ) CALL timing_start('tra_ldf_blp')206 !207 201 IF( kt == kit000 .AND. lwp ) THEN 208 202 WRITE(numout,*) … … 243 237 END SELECT 244 238 ! 245 IF( ln_timing ) CALL timing_stop('tra_ldf_blp')246 !247 239 END SUBROUTINE tra_ldf_blp 248 240
Note: See TracChangeset
for help on using the changeset viewer.