From 9b3306b30cb0883737f91593646e6c8a817fb385 Mon Sep 17 00:00:00 2001
From: Christine Lac <christine.lac@meteo.fr>
Date: Mon, 22 May 2017 16:46:14 +0200
Subject: [PATCH] Initialization of INDEP to 0

---
 src/MNH/rain_ice.f90 | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/MNH/rain_ice.f90 b/src/MNH/rain_ice.f90
index 2647d09e0..ad998eb89 100644
--- a/src/MNH/rain_ice.f90
+++ b/src/MNH/rain_ice.f90
@@ -870,6 +870,7 @@ REAL, DIMENSION(SIZE(PRHODREF,1),SIZE(PRHODREF,2),SIZE(PRHODREF,3)) :: ZCONC3D !
 !        O. Initialization of for sedimentation                  
 !
 IF (OSEDIC) PINPRC (:,:) = 0.
+IF (LDEPOSC) PINDEP (:,:) = 0.
 PINPRR (:,:) = 0.
 PINPRR3D (:,:,:) = 0.
 PINPRS (:,:) = 0.
@@ -1317,6 +1318,7 @@ REAL, DIMENSION(SIZE(PRHODREF,1),SIZE(PRHODREF,2),SIZE(PRHODREF,3)) :: ZCONC3D !
 !-------------------------------------------------------------------------------
 !
 IF (OSEDIC) PINPRC (:,:) = 0.
+IF (LDEPOSC) PINDEP (:,:) = 0.
 PINPRR (:,:) = 0.
 PINPRR3D (:,:,:) = 0.
 PINPRS (:,:) = 0.
-- 
GitLab