Opened 10 years ago
Last modified 10 years ago
#682 closed defect
profile report — at Initial Version
| Reported by: | kate | Owned by: | arango |
|---|---|---|---|
| Priority: | major | Milestone: | Release ROMS/TOMS 3.7 |
| Component: | Nonlinear | Version: | 3.7 |
| Keywords: | Cc: |
Description
The profile report I used to get has gone away unless I make this change:
--- ../roms/trunk/ROMS/Utility/timers.F 2015-03-26 10:56:13.819755622 -0800
+++ ROMS/Utility/timers.F 2015-06-25 10:04:26.946864845 -0800
@@ -176,7 +176,7 @@
END DO
END IF
END DO
- IF (thread_count.eq.numthreads) THEN
+! IF (thread_count.eq.numthreads) THEN
thread_count=0
#ifdef DISTRIBUTE
op_handle(0:Nregion)='SUM'
@@ -269,7 +302,7 @@
60 FORMAT (/,' All percentages are with respect to total time =',&
& 5x,f12.3)
#endif
- END IF
+! END IF
!$OMP END CRITICAL (FINALIZE_WCLOCK)
END IF
RETURN
}}}There's probably a better fix if you want to keep OpenMP.
Note:
See TracTickets
for help on using tickets.
