diff --git a/src/MNH/set_grid.f90 b/src/MNH/set_grid.f90
index c6acdf6b952df5f7a5a6d071b6a70ce5eb8e1043..e2cb21e464aae02d30198b902b13584ff71e34b1 100644
--- a/src/MNH/set_grid.f90
+++ b/src/MNH/set_grid.f90
@@ -538,6 +538,8 @@ SUBROUTINE STORE_GRID_1DIR_BOUNDS( HDIR, PHAT, PHATM, PHAT_BOUND, PHATM_BOUND )
   REAL, DIMENSION(:), POINTER :: ZHAT_GLOB
   REAL, DIMENSION(:), POINTER :: ZHATM_GLOB
 
+  GALLOC  = .FALSE.
+  GALLOCM = .FALSE.
   ZHAT_GLOB  => NULL()
   ZHATM_GLOB => NULL()