diff --git a/src/common/micro/rain_ice.F90 b/src/common/micro/rain_ice.F90 index a38ae64d0b1f00b13b6ee52cb33aa25ec62ec9c2..821abc317f32c639bc67eb746dc28ad7b218195f 100644 --- a/src/common/micro/rain_ice.F90 +++ b/src/common/micro/rain_ice.F90 @@ -1107,6 +1107,7 @@ PCIT(:,:,:)=ZCITOUT(:,:,:) !* 6. COMPUTES THE SLOW COLD PROCESS SOURCES OUTSIDE OF ODMICRO POINTS ! ---------------------------------------------------------------- ! +LLW3D(:,:,:)=.FALSE. DO JK=D%NKTB,D%NKTE DO JJ=D%NJB,D%NJE DO JI=D%NIB,D%NIE