Changeset 4153


Ignore:
Timestamp:
May 18, 2022, 2:58:08 PM (2 years ago)
Author:
dcugnet
Message:

Switch to the new tracers files "tracer.def".
Still working for the older "traceur.def" files.
The "isotope_params.def" file is now needed ; contains most of the constants formerly hard-coded in isotopes_mod.
Still contains few hard-coded lines for the "tdifrel" parameters, needed for reproductibilite the code is highly sensitive to this parameter: a difference not visible on 16 digits is enough to change the two last digits of deltaD after a one day run.

Location:
LMDZ6/trunk/libf
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • LMDZ6/trunk/libf/dyn3d_common/infotrac.F90

    r4143 r4153  
    132132   INTEGER,             SAVE, ALLOCATABLE :: conv_flg(:), &     !--- Convection     activation ; needed for INCA        (nbtr)
    133133                                              pbl_flg(:)        !--- Boundary layer activation ; needed for INCA        (nbtr)
    134    LOGICAL, PARAMETER :: lOldCode = .TRUE.
     134   LOGICAL, PARAMETER :: lOldCode = .FALSE.
    135135
    136136CONTAINS
  • LMDZ6/trunk/libf/phylmdiso/isotopes_mod.F90

    r4149 r4153  
    1212  !--- Isotopes-specific routines are in isotopes_routines_mod to avoid circular dependencies with isotopes_verif_mod.
    1313
    14   LOGICAL, PARAMETER :: lOldCode=.TRUE.
     14  LOGICAL, PARAMETER :: lOldCode=.FALSE.
    1515
    1616   !--- Isotopes indices (in [1,niso] ; non-existing => 0 index)
Note: See TracChangeset for help on using the changeset viewer.