Changeset 2380 for trunk/LMDZ.COMMON/libf/dyn3d

Timestamp:

Jun 25, 2020, 5:10:48 PM (4 years ago)

Author:

jvatant

Message:

COMMON : Fix mass flux flxw sent unitialized to physics in NODYN mode.

Was a cause of crash in debug in NODYN.

--JVO

File:

• trunk/LMDZ.COMMON/libf/dyn3d/leapfrog.F (modified) (1 diff)

trunk/LMDZ.COMMON/libf/dyn3d/leapfrog.F

@@ -436 +436 @@
       dq(:,:,:) = 0.D+0
       dp(:) = 0.D+0
+      flxw(:,:) = 0.D+0
 #else
       CALL caldyn