Changeset 4059 for LMDZ6/trunk/libf/phylmd/clesphys.h

Timestamp:

Jan 21, 2022, 3:50:54 PM (2 years ago)

Author:

oboucher

Message:

Audran Borella's parametrisation for ice supersaturation
activated with flag_ice_sursat (FALSE by default)

File:

• LMDZ6/trunk/libf/phylmd/clesphys.h (modified) (3 diffs)

LMDZ6/trunk/libf/phylmd/clesphys.h

@@ -85 +85 @@
        LOGICAL :: ok_cosp,ok_mensuelCOSP,ok_journeCOSP,ok_hfCOSP
        LOGICAL :: ok_airs
-       INTEGER :: ip_ebil_phy, iflag_rrtm, iflag_ice_thermo, NSW, iflag_albedo
+       INTEGER :: ip_ebil_phy, iflag_rrtm, iflag_ice_thermo, iflag_ice_sursat, NSW, iflag_albedo
        LOGICAL :: ok_chlorophyll
        LOGICAL :: ok_strato
@@ -123 +123 @@
 ! THEN INTEGER AND LOGICALS
      &     , top_height                                                 &
-     &     , iflag_cycle_diurne, soil_model, new_oliq                         &
+     &     , iflag_cycle_diurne, soil_model, new_oliq                   &
      &     , ok_orodr, ok_orolf, ok_limitvrai, nbapp_rad                &
      &     , iflag_con, nbapp_cv, nbapp_wk                              &
@@ -139 +139 @@
      &     , ok_lic_melt, ok_lic_cond, aer_type                         &
      &     , iflag_rrtm, ok_strato,ok_hines, ok_qch4                    &
-     &     , iflag_ice_thermo, ok_gwd_rando, NSW, iflag_albedo          &
+     &     , iflag_ice_thermo, iflag_ice_sursat                         & 
+     &     , ok_gwd_rando, NSW, iflag_albedo                            &
      &     , ok_chlorophyll,ok_conserv_q, adjust_tropopause             &
      &     , ok_daily_climoz, ok_all_xml, ok_lwoff                      &