source: trunk/LMDZ.COMMON/libf/evolution/time_evol_mod.F90 @ 3203

Last change on this file since 3203 was 3159, checked in by jbclement, 20 months ago

PEM:

  • A number of corrections related to r3149 for CO2 ice management:

    'co2_ice' was not transferred to 'perennial_co2ice' at the end of the PEM run;
    In the Mars PCM, 'perennial_co2ice' is now correctly handled regarding the frost in case of CO2 sublimation/condensation.

  • Addition of (CO2 and H2O) ice metamorphism: if the frost is above a given value, then the excess frost is transferred to the perennial ice.
  • Thresholds value for ice management can now be set in the "run_PEM.def".

JBC

File size: 1.2 KB
Line 
1MODULE time_evol_mod
2
3implicit none
4
5integer :: year_bp_ini    ! Initial year (in Planetary years) of the simulation of the PEM defined in run.def (in Earth years)
6integer :: dt_pem         ! Time step used by the PEM in Planetary years
7real    :: convert_years  ! Conversion ratio from Planetary years to Earth years
8real    :: h2o_ice_crit   ! Percentage of change of the surface of h2o ice sublimating before stopping the PEM
9real    :: co2_ice_crit   ! Percentage of change of the surface of co2 ice sublimating before stopping the PEM
10real    :: ps_criterion   ! Percentage of change of averaged surface pressure before stopping the PEM
11integer :: Max_iter_pem   ! Maximal number of iteration when converging to a steady state, read in evol.def
12logical :: evol_orbit_pem ! True if we want to follow the orbital parameters of obl_ecc_lsp.asc, read in evol.def
13logical :: var_obl        ! True if we want the PEM to follow obl_ecc_lsp.asc parameters for obliquity
14logical :: var_ecc        ! True if we want the PEM to follow obl_ecc_lsp.asc parameters for eccenticity
15logical :: var_lsp        ! True if we want the PEM to follow obl_ecc_lsp.asc parameters for ls perihelie
16
17END MODULE time_evol_mod
Note: See TracBrowser for help on using the repository browser.