Changeset 3703 for trunk/LMDZ.COMMON


Ignore:
Timestamp:
Apr 1, 2025, 10:09:29 AM (3 months ago)
Author:
evos
Message:

Changing the paramters of the PEM to be more realistic and to work with the layering

Location:
trunk/LMDZ.COMMON/libf/evolution
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • TabularUnified trunk/LMDZ.COMMON/libf/evolution/changelog.txt

    r3680 r3703  
    624624== 12/03/2025 == JBC
    625625Updating the average pressure at each iteration.
     626
     627== 1/4/2025 == EV
     628updating paramaters to work with the layering
  • TabularUnified trunk/LMDZ.COMMON/libf/evolution/layering_mod.F90

    r3673 r3703  
    2020! Physical parameters
    2121real, parameter :: d_dust = 5.78e-2             ! Tendency of dust [kg.m-2.y-1]
    22 real, parameter :: dry_lag_porosity = 0.5       ! Porosity of dust lag
    23 real, parameter :: dry_regolith_porosity = 0.45 ! Porosity of regolith
    24 real, parameter :: co2ice_porosity = 0.3        ! Porosity of CO2 ice
    25 real, parameter :: h2oice_porosity = 0.3        ! Porosity of H2O ice
     22real, parameter :: dry_lag_porosity = 0.4       ! Porosity of dust lag
     23real, parameter :: dry_regolith_porosity = 0.4 ! Porosity of regolith
     24real, parameter :: co2ice_porosity = 0        ! Porosity of CO2 ice
     25real, parameter :: h2oice_porosity = 0        ! Porosity of H2O ice
    2626real, parameter :: rho_dust = 2500.             ! Density of dust [kg.m-3]
    2727real, parameter :: rho_rock = 3200.             ! Density of rock [kg.m-3]
    2828
    2929! Lag layer parameters -> see Levrard et al. 2007
    30 real, parameter :: hmin_lag = 0.5  ! Minimal height of the lag deposit to reduce the sublimation rate
    31 real, parameter :: fred_subl = 0.1 ! Reduction factor of sublimation rate
     30real, parameter :: hmin_lag = 0  ! Minimal height of the lag deposit to reduce the sublimation rate
     31real, parameter :: fred_subl = 0 ! Reduction factor of sublimation rate
    3232
    3333! Stratum = node of the linked list
Note: See TracChangeset for help on using the changeset viewer.