Changeset 3814 for dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/aeropt.F90

Timestamp:

Apr 15, 2015, 6:49:07 PM (10 years ago)

Author:

ymipsl

Message:

remove all dynamic dependency in LMDZ physics except for the include "dimensions.h"

YM

File:

• dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/aeropt.F90 (modified) (1 diff)

dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/aeropt.F90

@@ -81 +81 @@
       IF (rh<0.) THEN
         abort_message = 'aeropt: RH < 0 not possible'
-        CALL abort_gcm(modname, abort_message, 1)
+        CALL abort_physic(modname, abort_message, 1)
       END IF
       IF (rh>85.) rh_num = 10