Changeset 4590 for LMDZ6/trunk/libf/phylmd/phytrac_mod.F90

Timestamp:

Jun 29, 2023, 3:03:15 AM (15 months ago)

Author:

fhourdin

Message:

Passage des thermiques a la nouvelle norme.

File:

• LMDZ6/trunk/libf/phylmd/phytrac_mod.F90 (modified) (2 diffs)

LMDZ6/trunk/libf/phylmd/phytrac_mod.F90

@@ -135 +135 @@
     USE print_control_mod, ONLY: lunout
     USE aero_mod, ONLY : naero_grp
+    USE lmdz_thermcell_dq, ONLY : thermcell_dq
 
     USE tracco2i_mod
@@ -249 +250 @@
     !----------
     REAL,DIMENSION(klon,klev+1),INTENT(IN)   :: fm_therm
-    REAL,DIMENSION(klon,klev),INTENT(IN)     :: entr_therm
+    REAL,DIMENSION(klon,klev),INTENT(INOUT)     :: entr_therm
     !
     !Couche limite: