Changeset 4153 for LMDZ6/trunk/libf/dyn3d_common/infotrac.F90

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.

File:

• LMDZ6/trunk/libf/dyn3d_common/infotrac.F90 (modified) (1 diff)

LMDZ6/trunk/libf/dyn3d_common/infotrac.F90

@@ -132 +132 @@
    INTEGER,             SAVE, ALLOCATABLE :: conv_flg(:), &     !--- Convection     activation ; needed for INCA        (nbtr)
                                               pbl_flg(:)        !--- Boundary layer activation ; needed for INCA        (nbtr)
-   LOGICAL, PARAMETER :: lOldCode = .TRUE.
+   LOGICAL, PARAMETER :: lOldCode = .FALSE.
 
 CONTAINS