Changeset 4770 for LMDZ6/trunk/libf/phylmd

Timestamp:

Dec 10, 2023, 10:37:08 PM (12 months ago)

Author:

lguez

Message:

Bug fix: correct intent of dx in cvltr_noscav

intent(out) means that the whole array becomes undefined on entry of
the procedure. Here we only define dx(:, :, it) and we want to keep
the values of dx for other tracers.

File:

• LMDZ6/trunk/libf/phylmd/cvltr_noscav.F90 (modified) (1 diff)

LMDZ6/trunk/libf/phylmd/cvltr_noscav.F90

@@ -27 +27 @@
 
 ! Sortie
-  REAL,DIMENSION(klon,klev,nbtr),INTENT(OUT) :: dx ! tendance de traceur  (bas en haut)
+  REAL,DIMENSION(klon,klev,nbtr),INTENT(inOUT) :: dx ! tendance de traceur  (bas en haut)
 
 ! Variables locales