Changeset 4844 for LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90

Timestamp:

Mar 5, 2024, 12:09:41 AM (3 months ago)

Author:

fhourdin

Message:

Complement aux modifications de Catherine

File:

• LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90 (modified) (4 diffs)

LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90

@@ -319 +319 @@
        alp_bl_conv,alp_bl_det,  &
        alp_bl_fluct_m,alp_bl_fluct_tke,  &
-       alp_bl_stat, n2, s2,  &
+       alp_bl_stat, n2, s2,  strig, zcong, zlcl_th, &
        proba_notrig, random_notrig,  &
 !!       cv_gen,  &  !moved to phys_state_var_mod
@@ -796 +796 @@
     !--------Stochastic Boundary Layer Triggering: ALE_BL--------
     !---Propri\'et\'es du thermiques au LCL 
-    real zlcl_th(klon)          ! Altitude du LCL calcul\'e
+!    real zlcl_th(klon)          ! Altitude du LCL calcul\'e
     ! continument (pcon dans
     ! thermcell_main.F90)
@@ -4557 +4557 @@
                ,pbl_tke_input,pctsrf,omega,cell_area &
                ,zlcl_th,fraca0,w0,w_conv,therm_tke_max0,env_tke_max0 &
-               ,n2,s2,ale_bl_stat &
+               ,n2,s2,strig,zcong,ale_bl_stat &
                ,therm_tke_max,env_tke_max &
                ,alp_bl_det,alp_bl_fluct_m,alp_bl_fluct_tke &
@@ -4626 +4626 @@
 !
           CALL alpale_th( phys_tstep, lmax_th, t_seri, cell_area,  &
-                          cin, s2, n2,  &
+                          cin, s2, n2, strig, &
                           ale_bl_trig, ale_bl_stat, ale_bl,  &
                           alp_bl, alp_bl_stat, &