Changeset 2878 for LMDZ5/trunk/libf

Timestamp:

May 13, 2017, 1:42:09 PM (7 years ago)

Author:

fhourdin

Message:

Initialisation manquante de zmqc dans fisrtilp.F90.
Resoud des plantages et sans doute des problÃmes de reproductibilité.

File:

• LMDZ5/trunk/libf/phylmd/fisrtilp.F90 (modified) (1 diff)

LMDZ5/trunk/libf/phylmd/fisrtilp.F90

@@ -325 +325 @@
   ! BOUCLE VERTICALE (DU HAUT VERS LE BAS)
   !
+  zmqc(1:klon)=0.
   DO k = klev, 1, -1
      !