Changeset 3814 for dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/calltherm.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/calltherm.F90 (modified) (2 diffs)

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

@@ -208 +208 @@
           else if (iflag_thermals.eq.11) then
               abort_message = 'cas non prevu dans calltherm'
-              CALL abort_gcm (modname,abort_message,1)
+              CALL abort_physic (modname,abort_message,1)
 
 !           CALL thermcell_pluie(klon,klev,zdt  &
@@ -260 +260 @@
          else
            abort_message = 'Cas des thermiques non prevu'
-           CALL abort_gcm (modname,abort_message,1)
+           CALL abort_physic (modname,abort_message,1)
          endif