diff --git a/src/MNH/ice4_fast_rg.f90 b/src/MNH/ice4_fast_rg.f90
index 67eb2a2e324cf0beeba1ba2e6d0ba0dfe90d55b0..89c209385a171f838715028d53f92d81b214fa35 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