Changeset 1673 for LMDZ5/trunk/libf/dyn3dmem/abort_gcm.F
- Timestamp:
- Oct 27, 2012, 4:23:07 PM (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/dyn3dmem/abort_gcm.F
r1658 r1673 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.