Changeset 5622 for LMDZ6/trunk/libf/phylmd/clesphys_mod_h.f90

Timestamp:

Apr 16, 2025, 9:25:21 PM (8 weeks ago)

Author:

evignon

Message:

commission pour la conservation de l'eau dans la convection profonde.
1/ integre les corrections apportees par JYG dans cv3routines.
2/ par defaut, conserve dx*masse quand on appelle la convection tous les n pas de temps
Cette commission conduit à une perte de convergence

File:

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

LMDZ6/trunk/libf/phylmd/clesphys_mod_h.f90

@@ -51 +51 @@
           , iflag_phytrac, ok_new_lscp, ok_bs, ok_rad_bs               &
           , iflag_thermals, nsplit_thermals              &
-          , iflag_physiq, ok_3Deffect, ok_water_mass_fixer
+          , iflag_physiq, ok_3Deffect, ok_water_mass_fixer             &
+          , ok_mass_dtcon, ok_mass_dqcon, ok_mass_duvcon
 
 
@@ -158 +159 @@
   !OB flag to activate water mass fixer in physiq
   LOGICAL :: ok_water_mass_fixer
+
+  ! for conservation when calling deep convection every n time steps
+  LOGICAL :: ok_mass_dtcon, ok_mass_dqcon, ok_mass_duvcon
+
 
 
@@ -207 +212 @@
   !$OMP      , iflag_phytrac, ok_new_lscp, ok_bs, ok_rad_bs               &
   !$OMP      , iflag_thermals, nsplit_thermals              &
-  !$OMP      , iflag_physiq, ok_3Deffect, ok_water_mass_fixer)
+  !$OMP      , iflag_physiq, ok_3Deffect, ok_water_mass_fixer             &
+  !$OMP      , ok_mass_dtcon, ok_mass_dqcon, ok_mass_duvcon )
 
 END MODULE clesphys_mod_h