Changeset 4762 for LMDZ6/trunk/libf/phylmd/StratAer/coagulate.F90

Timestamp:

Dec 10, 2023, 10:37:06 PM (6 months ago)

Author:

lguez

Message:

Use YOMCST from LMDZ, not from RRTM or ECRad

Because the modules yomcst in RRTM and ECRad do not contain the same
objects. In particular, RKBOL is in rrtm/yomcst.F90 but not in
ecrad/yomcst.F90. So compilation with -rad ecrad -strataer true
fails. And we want to avoid modifying files from ECRad.

File:

• LMDZ6/trunk/libf/phylmd/StratAer/coagulate.F90 (modified) (2 diffs)

LMDZ6/trunk/libf/phylmd/StratAer/coagulate.F90

@@ -27 +27 @@
   USE infotrac_phy
   USE phys_local_var_mod, ONLY: DENSO4, f_r_wet
-  USE YOMCST
 
   IMPLICIT NONE
@@ -81 +80 @@
   REAL                                          :: EvdW
 
+  include "YOMCST.h"
+
   DO i=1, nbtr_bin
    radius(i)=mdw(i)/2.