Changeset 1707 for LMDZ5/branches/testing/libf/dyn3dmem/abort_gcm.F
- Timestamp:
- Jan 11, 2013, 10:19:19 AM (12 years ago)
- Location:
- LMDZ5/branches/testing
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/branches/testing
- Property svn:mergeinfo changed
/LMDZ5/trunk merged: 1670-1692,1694-1703,1705-1706
- Property svn:mergeinfo changed
-
LMDZ5/branches/testing/libf/dyn3dmem/abort_gcm.F
r1669 r1707 1 1 ! 2 ! $Id : abort_gcm.F 1425 2010-09-02 13:45:23Z lguez$2 ! $Id$ 3 3 ! 4 4 c … … 45 45 if (ierr .eq. 0) then 46 46 write(lunout,*) 'Everything is cool' 47 stop48 47 else 49 48 write(lunout,*) 'Houston, we have a problem ', ierr
Note: See TracChangeset
for help on using the changeset viewer.