Changeset 3814 for dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/inifis.F90
- Timestamp:
- Apr 15, 2015, 6:49:07 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/inifis.F90
r3809 r3814 60 60 PRINT *, 'klev = ', klev 61 61 abort_message = '' 62 CALL abort_ gcm(modname, abort_message, 1)62 CALL abort_physic(modname, abort_message, 1) 63 63 END IF 64 64 … … 69 69 PRINT *, 'klon = ', klon 70 70 abort_message = '' 71 CALL abort_ gcm(modname, abort_message, 1)71 CALL abort_physic(modname, abort_message, 1) 72 72 END IF 73 73 … … 76 76 & & 77 77 & et surf.def' 78 CALL abort_ gcm(modname, abort_message, 1)78 CALL abort_physic(modname, abort_message, 1) 79 79 80 80 END SUBROUTINE inifis
Note: See TracChangeset
for help on using the changeset viewer.