Changeset 13013 for NEMO/releases/r4.0/r4.0-HEAD/src/OFF/nemogcm.F90
- Timestamp:
- 2020-06-03T10:33:06+02:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/releases/r4.0/r4.0-HEAD/src/OFF/nemogcm.F90
r12841 r13013 136 136 IF( nstop /= 0 .AND. lwp ) THEN ! error print 137 137 WRITE(ctmp1,*) ' ==>>> nemo_gcm: a total of ', nstop, ' errors have been found' 138 CALL ctl_stop( ctmp1 ) 138 WRITE(ctmp2,*) ' Look for "E R R O R" messages in all existing ocean_output* files' 139 CALL ctl_stop( ' ', ctmp1, ' ', ctmp2 ) 139 140 ENDIF 140 141 !
Note: See TracChangeset
for help on using the changeset viewer.