diff --git a/src/MNH/resolved_cloud.f90 b/src/MNH/resolved_cloud.f90
index d97d37e34e96bd120540e036f94b25a615217375..0870549d407b4d22330b48ed4d6b8d13cc42bb83 100644
--- a/src/MNH/resolved_cloud.f90
+++ b/src/MNH/resolved_cloud.f90
@@ -623,6 +623,13 @@ allocate ( ZZZ      ( JIU,JJU,JKU  ) )
 allocate ( ZINPRI   ( JIU,JJU ) )
 allocate ( ZTHSSTEP ( SIZE(PTHS,1), SIZE(PTHS,2), SIZE(PTHS,3) ) )
 allocate ( ZRSSTEP  ( SIZE(PRS,1),  SIZE(PRS,2),  SIZE(PRS,3), SIZE(PRS,4) ) )
+
+IF (HCLOUD(1:3)=='ICE' .AND. LRED) THEN
+  allocate( ZRSMIN(SIZE( XRTMIN )) )
+ELSE
+  allocate( ZRSMIN(0) )
+END IF
+
 #else
 !Pin positions in the pools of MNH memory
 CALL MNH_MEM_POSITION_PIN()