- Timestamp:
- Apr 15, 2015, 6:49:07 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/cv3a_compress.F90
r3809 r3814 125 125 PRINT *, 'WARNING nn not equal to ncum: ', nn, ncum 126 126 abort_message = '' 127 CALL abort_ gcm(modname, abort_message, 1)127 CALL abort_physic(modname, abort_message, 1) 128 128 END IF 129 129 … … 155 155 PRINT *, 'WARNING nn not equal to ncum: ', nn, ncum 156 156 abort_message = '' 157 CALL abort_ gcm(modname, abort_message, 1)157 CALL abort_physic(modname, abort_message, 1) 158 158 END IF 159 159
Note: See TracChangeset
for help on using the changeset viewer.