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

Timestamp:

Mar 27, 2026, 4:57:35 PM (2 weeks ago)

Author:

evignon

Message:

suppression de nuages_param et déplacement des parametres lies a la convection profonde dans lmdz_cv_ini

File:

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

LMDZ6/trunk/libf/phylmd/conf_phys_m.f90

@@ -89 +89 @@
     USE lmdz_cppkeys_wrapper, ONLY: CPPKEY_STRATAER
     USE comsoil_mod_h
-    USE nuage_params_mod_h
     USE ch4n2o_correction_mod, ONLY: ok_CH4_eff_ppb, ok_N2O_eff_ppb
     
@@ -674 +673 @@
     CALL getin_p('iflag_cldcon',iflag_cld_th)
     CALL getin_p('iflag_cld_th',iflag_cld_th)
-    iflag_cld_cv = 0 
-    CALL getin_p('iflag_cld_cv',iflag_cld_cv)
-
-    !
-    !
-    tau_cld_cv = 10.
-    CALL getin_p('tau_cld_cv',tau_cld_cv)
-
-    !
-    !
-    coefw_cld_cv = 0.1
-    CALL getin_p('coefw_cld_cv',coefw_cld_cv)
-
-    !
     !
     fact_cldcon = 0.375
@@ -1098 +1083 @@
     !
     !
-    tmax_fonte_cv = 275.15
-    CALL getin_p('tmax_fonte_cv',tmax_fonte_cv)
-
     !
 
@@ -1457 +1439 @@
     WRITE(lunout,*) 'conf_phys :  ok_mass_duvcon=',ok_mass_duvcon
     WRITE(lunout,*) 'conf_phys :  iflag_cld_th = ', iflag_cld_th
-    WRITE(lunout,*) 'conf_phys :  iflag_cld_cv = ', iflag_cld_cv
-    WRITE(lunout,*) 'conf_phys :  tau_cld_cv = ', tau_cld_cv
-    WRITE(lunout,*) 'conf_phys :  coefw_cld_cv = ', coefw_cld_cv
     WRITE(lunout,*) 'conf_phys :  iflag_radia = ', iflag_radia
     WRITE(lunout,*) 'conf_phys :  iflag_rrtm = ', iflag_rrtm
@@ -1543 +1522 @@
     WRITE(lunout,*) 'conf_phys :  z0m_land = ',z0m_land
     WRITE(lunout,*) 'conf_phys :  z0h_land = ',z0h_land
-    WRITE(lunout,*) 'conf_phys :  tmax_fonte_cv = ', tmax_fonte_cv
     WRITE(lunout,*) 'conf_phys :  iflag_wake = ', iflag_wake
     WRITE(lunout,*) 'conf_phys :  alp_offset = ', alp_offset