Changeset 3800
- Timestamp:
- 2013-02-12T05:56:41+01:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2012/dev_v3_4_STABLE_2012/NEMOGCM/NEMO/OPA_SRC/LBC/lib_mpp.F90
r3604 r3800 2821 2821 2822 2822 SUBROUTINE mppstop 2823 WRITE(*,*) 'mppstop: You should not have seen this print if running in mpp mode! error?...' 2824 WRITE(*,*) 'mppstop: ..otherwise this is a stop condition raised by ctl_stop in single processor mode' 2825 STOP 2823 STOP ! non MPP case, just stop the run 2826 2824 END SUBROUTINE mppstop 2827 2825
Note: See TracChangeset
for help on using the changeset viewer.