Changeset 5487 for LMDZ6/trunk/libf/dyn3d_common

Timestamp:

Jan 17, 2025, 5:12:48 PM (6 months ago)

Author:

dcugnet

Message:

Fix in infotrac_phy: isInPhysics depends on iadv, which has to be recomputed.
Typo fix in cv3_routines.f90.

File:

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

LMDZ6/trunk/libf/dyn3d_common/infotrac.f90

@@ -144 +144 @@
 ! Local variables
    INTEGER, ALLOCATABLE :: hadv(:), vadv(:)                          !--- Horizontal/vertical transport scheme number
-   INTEGER, ALLOCATABLE :: had (:), hadv_inca(:), conv_flg_inca(:), &!--- Variables specific to INCA
-                           vad (:), vadv_inca(:),  pbl_flg_inca(:)
-   CHARACTER(LEN=8), ALLOCATABLE :: solsym_inca(:)                   !--- Tracers names for INCA
    INTEGER :: nqINCA
    CHARACTER(LEN=2)      ::   suff(9)                                !--- Suffixes for schemes of order 3 or 4 (Prather)