diff --git a/src/MNH/ice4_fast_rg.f90 b/src/MNH/ice4_fast_rg.f90
index 78b5a90c9fa5ebd0eb50dfcdef19a6bb8c4e1580..7cee4149786eeb5204ff2b573215722a7de89ea7 100644
--- a/src/MNH/ice4_fast_rg.f90
+++ b/src/MNH/ice4_fast_rg.f90
@@ -601,7 +601,7 @@ ELSE
       ZZW(I1(JJ)) = ZVEC3(JJ)
     END DO
     !
-    !$mnh_expand_where(JJ=1:IGDRY)
+    !$mnh_expand_where(JJ=1:ISIZE)
     WHERE(GDRY(:))
 #ifndef MNH_BITREP
       PRG_TEND(:, IRRDRYG) = XFRDRYG*ZZW(:)                    & ! RRDRYG