Changeset 2628 for trunk/LMDZ.MARS/libf/phymars/phys_state_var_init_mod.F90

Timestamp:

Feb 28, 2022, 6:46:07 PM (3 years ago)

Author:

abierjon

Message:

Mars GCM:
Big changes on mountain top dust flows for GCM6:

• the scheme now activates only in grid meshes that contain a mountain among a hard-written list, instead of every meshes. This is done to prevent strong artificial reinjections of dust in places that don't present huge converging slopes enabling the concentration of dust (ex: Valles Marineris, Hellas). Topdust is now also detrained as soon as it leaves the column it originated from.
• the list of the 19 allowed mountains is used by the subroutine topmons_setup in module topmons_mod, to compute a logical array contains_mons(ngrid). alpha_hmons and hsummit are also set up once and for all by this subroutine, which is called in physiq_mod's firstcall.
• contains_mons, alpha_hmons and hsummit are now saved variables of the module surfdat_h, and are called as such and not as arguments in the subroutines using them.
• the logical flag "slpwind" and the comments in the code have also been updated to the new terminology "mountain top dust flows", accordingly to ticket #71. The new flag read in callphys.def is "topflows".

AB

File:

• trunk/LMDZ.MARS/libf/phymars/phys_state_var_init_mod.F90 (modified) (2 diffs)

trunk/LMDZ.MARS/libf/phymars/phys_state_var_init_mod.F90

@@ -52 +52 @@
       use rocketduststorm_mod, only: ini_rocketduststorm_mod, &
                                      end_rocketduststorm_mod
-      use topmons_mod, only: ini_topmons_mod, &
-                             end_topmons_mod
       use calchim_mod, only: ini_calchim_mod,end_calchim_mod
       use watercloud_mod, only: ini_watercloud_mod, &
@@ -137 +135 @@
       call ini_rocketduststorm_mod(ngrid)
 
-      ! allocate arrays in "topmons_mod":
-      call end_topmons_mod
-      call ini_topmons_mod(ngrid,nlayer)
-
       ! allocate arrays in "calchim_mod" (aeronomars)
       call end_calchim_mod