Changeset 5282 for LMDZ6/trunk/libf/phylmd/conf_phys_m.f90

Timestamp:

Oct 28, 2024, 1:11:48 PM (6 hours ago)

Author:

abarral

Message:

Turn iniprint.h clesphys.h into modules
Remove unused description.h

File:

• LMDZ6/trunk/libf/phylmd/conf_phys_m.f90 (modified) (3 diffs)

LMDZ6/trunk/libf/phylmd/conf_phys_m.f90

@@ -6 +6 @@
 MODULE conf_phys_m
 
-  IMPLICIT NONE
+  USE clesphys_mod_h
+    IMPLICIT NONE
 
 CONTAINS
@@ -17 +18 @@
        iflag_cld_th, &
        ratqsbas,ratqshaut,tau_ratqs, &
-       ok_ade, ok_aie, ok_alw, ok_cdnc, ok_volcan, flag_volc_surfstrat, aerosol_couple, & 
+       ok_ade, ok_aie, ok_alw, ok_cdnc, ok_volcan, flag_volc_surfstrat, aerosol_couple, &
        chemistry_couple, flag_aerosol, flag_aerosol_strat, flag_aer_feedback, &
        flag_bc_internal_mixture, bl95_b0, bl95_b1,&
@@ -56 +57 @@
 
     !IM : on inclut/initialise les taux de CH4, N2O, CFC11 et CFC12
-    INCLUDE "clesphys.h"
     INCLUDE "compbl.h"
     INCLUDE "comsoil.h"