- Timestamp:
- 2019-02-14T15:10:07+01:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/UKMO/dev_r9950_GO8_package/src/OCE/timing.F90
r10322 r10682 491 491 END DO 492 492 493 WRITE(*,*) 'ARPDBG: timing: done gathers'494 495 493 IF( narea == 1 ) THEN 496 494 ! Compute some stats … … 515 513 END DO 516 514 517 WRITE(*,*) 'ARPDBG: timing: done computing stats'518 519 515 ! reorder the averaged list by CPU time 520 516 s_wrk => NULL()
Note: See TracChangeset
for help on using the changeset viewer.