Changeset 2854


Ignore:
Timestamp:
Dec 22, 2022, 5:38:14 PM (2 years ago)
Author:
llange
Message:

PEM
Conf_gcm is adapted to read the PEM.def files to simulate orbital parameter evolutions in the PEM
RV & LL

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/LMDZ.COMMON/libf/dyn3d/conf_gcm.F90

    r2135 r2854  
    3030                alphax,alphay,taux,tauy
    3131  USE temps_mod, ONLY: calend
     32  USE temps_mod_evol, ONLY: year_bp_ini, dt_pem, alpha_criterion, Max_iter_pem, &
     33                evol_orbit_pem
     34  USE comsoil_h_pem, only: soil_pem
    3235
    3336  IMPLICIT NONE
     
    635638  endif
    636639!----------------------------------------
     640
     641!PEM parameter
     642  year_bp_ini=0.
     643  CALL getin('year_bp_ini', year_bp_ini)
     644
     645  dt_pem=1
     646  CALL getin('dt_pem', dt_pem)
     647
     648  alpha_criterion=0.2
     649  CALL getin('alpha_criterion', alpha_criterion)
     650
     651  evol_orbit_pem=.false.
     652  CALL getin('evol_orbit_pem', evol_orbit_pem)
     653
     654  Max_iter_pem=99999999
     655  CALL getin('Max_iter_pem', Max_iter_pem)
     656
     657  soil_pem=.true.
     658  CALL getin('soil_pem', soil_pem)
    637659
    638660!----------------------------------------
Note: See TracChangeset for help on using the changeset viewer.