Changeset 5610 for LMDZ6

Timestamp:

Apr 14, 2025, 6:06:17 PM (2 months ago)

Author:

evignon

Message:

amendement declaration de adv_qsat_liq dans dyn3d

File:

• LMDZ6/trunk/libf/dyn3d/conf_gcm.f90 (modified) (2 diffs)

LMDZ6/trunk/libf/dyn3d/conf_gcm.f90 ¶

@@ -799 +799 @@
      CALL getin('type_trac',type_trac)
 
+     !Config  Key  = adv_qsat_liq
+     !Config  Desc = option for qsat calculation in the dynamics
+     !Config  Def  = n 
+     !Config  Help = controls which phase is considered for qsat calculation 
+     !Config          
+     adv_qsat_liq = .FALSE.
+     CALL getin('adv_qsat_liq',adv_qsat_liq)
+
      !Config  Key  = ok_dynzon 
      !Config  Desc = sortie des transports zonaux dans la dynamique
@@ -914 +922 @@
      write(lunout,*)' ok_guide = ', ok_guide
      write(lunout,*)' read_orop = ', read_orop
+     write(lunout,*)' adv_qsat_liq = ', adv_qsat_liq
+
   ENDIF test_etatinit