Changeset 5154 for LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad

Timestamp:

Jul 31, 2024, 9:54:47 PM (3 months ago)

Author:

abarral

Message:

Fix ecrad & rrtm compilation

Location:

LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad/lmdz

Files:

• readaerosol_optic_ecrad.F90 (modified) (1 diff)
• readaerosolstrato_ecrad.F90 (modified) (1 diff)

LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad/lmdz/readaerosol_optic_ecrad.F90

@@ -22 +22 @@
   USE infotrac_phy, ONLY: tracers, nqtot, nbtr
   USE YOMCST
+  USE lmdz_clesphys
 
   IMPLICIT NONE
-
-  include "clesphys.h"
 
   ! Input arguments

LMDZ6/branches/Amaury_dev/libf/phylmd/ecrad/lmdz/readaerosolstrato_ecrad.F90

@@ -25 +25 @@
     USE xios
 #endif
+  USE lmdz_clesphys
 
     IMPLICIT NONE
-
-    INCLUDE "clesphys.h"
 
     CHARACTER (len = 80) :: abort_message