Changeset 4843 for LMDZ6/trunk/libf/phylmd/phys_output_write_mod.F90

Timestamp:

Mar 4, 2024, 6:58:03 PM (3 months ago)

Author:

crio

Message:

Nouvelle formulation du strig et correction thermiques montent trop haut

File:

• LMDZ6/trunk/libf/phylmd/phys_output_write_mod.F90 (modified) (3 diffs)

LMDZ6/trunk/libf/phylmd/phys_output_write_mod.F90

@@ -98 +98 @@
          o_qtaa, o_Clwaa, &
          o_ftd, o_fqd, o_wdtrainA, o_wdtrainS, o_wdtrainM, &
-         o_n2, o_s2, o_proba_notrig, &
+         o_n2, o_s2, o_strig, o_zcong, o_zlcl_th, o_proba_notrig, &
          o_random_notrig, o_ale_bl_stat, &
          o_ale_bl_trig, o_alp_bl_det, &
@@ -335 +335 @@
          wake_h, &
          wake_omg, d_t_wake, d_q_wake, Vprecip, qtaa, Clw, &
-         wdtrainA, wdtrainS, wdtrainM, n2, s2, proba_notrig, &
+         wdtrainA, wdtrainS, wdtrainM, n2, s2, strig, zcong, zlcl_th, proba_notrig, &
          random_notrig, &
          qclr, qcld, qss, qvc, rnebclr, rnebss, gamma_ss, &
@@ -1548 +1548 @@
                CALL histwrite_phy(o_kh         ,kh         ) 
                CALL histwrite_phy(o_kh_x       ,kh_x       ) 
+          CALL histwrite_phy(o_strig, strig)
+          CALL histwrite_phy(o_zcong, zcong)
+          CALL histwrite_phy(o_zlcl_th, zlcl_th)
                CALL histwrite_phy(o_kh_w       ,kh_w       ) 
              ENDIF   ! (iflag_pbl_split>=1)