Quentin 28/05/2021: bugfix missing initilization of IMICRO leading to random...

Quentin 28/05/2021: bugfix missing initilization of IMICRO leading to random value that may be > 0 and fail the packing

src/MNH/rain_ice_red.f90

@@ -677,7 +677,7 @@ ENDIF
 !  optimization by looking for locations where
 !  the microphysical fields are larger than a minimal value only !!!
 !
-!IMICRO=0
+IMICRO=0
 IF(KSIZE/=0) IMICRO=COUNTJV(ODMICRO(:,:,:), I1(:), I2(:), I3(:))
 !Packing
 IF(IMICRO>0) THEN