Changeset 1999 for LMDZ5/branches/testing/libf/dyn3dmem/dynredem_loc.F
- Timestamp:
- Mar 20, 2014, 10:57:19 AM (10 years ago)
- Location:
- LMDZ5/branches/testing
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/branches/testing
- Property svn:mergeinfo changed
/LMDZ5/trunk merged: 1922-1927,1929-1933,1937-1939,1943-1997
- Property svn:mergeinfo changed
-
LMDZ5/branches/testing/libf/dyn3dmem/dynredem_loc.F
r1910 r1999 138 138 & //trim(fichnom) 139 139 write(lunout,*)' ierr = ', ierr 140 CALL ABORT 140 CALL ABORT_GCM("DYNREDEM0", "", 1) 141 141 ENDIF 142 142 c … … 588 588 IF (ierr .NE. NF_NOERR) THEN 589 589 write(lunout,*)"dynredem1: Pb. d ouverture "//trim(fichnom) 590 CALL abort 590 CALL abort_gcm("dynredem1", "", 1) 591 591 ENDIF 592 592
Note: See TracChangeset
for help on using the changeset viewer.