- 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/DOM/domngb.F90
r9019 r9124 14 14 USE in_out_manager ! I/O manager 15 15 USE lib_mpp ! for mppsum 16 USE timing ! Timing17 16 18 17 IMPLICIT NONE … … 48 47 !!-------------------------------------------------------------------- 49 48 ! 50 IF( ln_timing ) CALL timing_start('dom_ngb')51 !52 49 zmask(:,:) = 0._wp 53 50 ik = 1 … … 77 74 ENDIF 78 75 ! 79 IF( ln_timing ) CALL timing_stop('dom_ngb')80 !81 76 END SUBROUTINE dom_ngb 82 77
Note: See TracChangeset
for help on using the changeset viewer.