Changeset 179 for trunk/MESOSCALE/LMD_MM_MARS/SRC

Timestamp:

Jun 29, 2011, 11:16:56 AM (13 years ago)

Author:

acolaitis

Message:

Important modification for LES model : replaced soil layers by new gcm soil settings, independant of soil inertia and valid for the whole range of Martian soil diversity, at all seasons.

File:

• trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/phys/module_lmd_driver.F (modified) (1 diff)

trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/phys/module_lmd_driver.F

@@ -843 +843 @@
    IF ( (i == ips) .AND. (j == jps) ) PRINT *,'** Mars ** IDEALIZED SIMULATION isoil and dsoil standard'
    isoil_val(k) = inertiedat_val
-   dsoil_val(k) = sqrt(887.75/3.14)*((2.**(k-0.5))-1.) * inertiedat_val / wvolcapa
+!  dsoil_val(k) = sqrt(887.75/3.14)*((2.**(k-0.5))-1.) * inertiedat_val / wvolcapa    ! old setting
+   dsoil_val(k) = 2.E-4 * (2.**(k-0.5-1.))                                            ! new gcm settings
    IF ( (i == ips) .AND. (j == jps) ) PRINT *,'** Mars ** ISOIL DSOIL are ',isoil_val(k), dsoil_val(k)
 #endif