Changeset 5139 for LMDZ6/branches/Amaury_dev/libf/phylmd/dyn1d/lmdz_scm.F90

Timestamp:

Jul 29, 2024, 9:59:33 AM (3 months ago)

Author:

abarral

Message:

Put nuage.h, flux_arp.h, compbl.h into modules
Move unused phylmd/ini_hist* to obsolete

File:

• LMDZ6/branches/Amaury_dev/libf/phylmd/dyn1d/lmdz_scm.F90 (modified) (2 diffs)

LMDZ6/branches/Amaury_dev/libf/phylmd/dyn1d/lmdz_scm.F90

@@ -45 +45 @@
     USE lmdz_cppkeys_wrapper, ONLY: CPPKEY_OUTPUTPHYSSCM
     USE lmdz_clesphys
+    USE lmdz_flux_arp, ONLY: fsens, flat, betaevap, ust, tg, ok_flux_surf, ok_prescr_ust, ok_prescr_beta, ok_forc_tsurf
+    USE lmdz_compbl, ONLY: iflag_pbl, iflag_pbl_split, iflag_order2_sollw, ifl_pbltree
 
     INCLUDE "dimensions.h"
@@ -50 +52 @@
     INCLUDE "dimsoil.h"
     INCLUDE "compar1d.h"
-    INCLUDE "flux_arp.h"
     INCLUDE "date_cas.h"
     INCLUDE "tsoilnudge.h"
     INCLUDE "fcg_gcssold.h"
-    INCLUDE "compbl.h"
 
     !=====================================================================