Ignore:
Timestamp:
Feb 10, 2023, 12:14:50 PM (22 months ago)
Author:
romain.vande
Message:

Mars PEM:
Correction of recomp_tend_co2 formula and make it dependent on the presence of co2_ice.
Add different stopping criterion for water_ice and co2_ice called : water_ice_criterion and co2_ice_criterion.
Add the possibility to output a diagfi.nc each year for the amount of ice, the tendencies, tsurf and ps.
Remove useless variables (not sloped)
Remove useless file
Some cleaning
RV

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.COMMON/libf/evolution/temps_mod_evol.F90

    r2888 r2893  
    33IMPLICIT NONE 
    44
    5   INTEGER   year_bp_ini     !     year_bp_ini : Initial year of the simulation of the PEM (in evol.def)
    6   INTEGER   dt_pem          !     dt_pem  : in years, the time step used by the PEM   
    7   REAL      ice_criterion   !     ice_criterion : percentage of change of ice before stopping the PEM
    8   REAL      ps_criterion    !     ice_criterion : percentage of change of ice before stopping the PEM
    9   INTEGER   year_PEM        !     year written in startfiPEM.nc
    10   INTEGER   Max_iter_pem    !     Maximal number of iteration when converging to a steady state, read in evol.def
    11   LOGICAL   evol_orbit_pem  !     True if we want to follow the orbital parameters of ob_ex_lsp.asc, read in evol.def
     5  INTEGER   year_bp_ini         !     year_bp_ini : Initial year of the simulation of the PEM (in evol.def)
     6  INTEGER   dt_pem              !     dt_pem  : in Planetary years, the time step used by the PEM   
     7  REAL      water_ice_criterion !     Percentage of change of the surface of water ice sublimating before stopping the PEM
     8  REAL      co2_ice_criterion   !     Percentage of change of the surface of co2 ice sublimating before stopping the PEM
     9  REAL      ps_criterion        !     Percentage of change of averaged surface pressure before stopping the PEM
     10  INTEGER   year_PEM            !     year written in startfiPEM.nc
     11  INTEGER   Max_iter_pem        !     Maximal number of iteration when converging to a steady state, read in evol.def
     12  LOGICAL   evol_orbit_pem      !     True if we want to follow the orbital parameters of ob_ex_lsp.asc, read in evol.def
    1213
    1314END MODULE temps_mod_evol
Note: See TracChangeset for help on using the changeset viewer.