diff --git a/src/ZSOLVER/get_halo.f90 b/src/ZSOLVER/get_halo.f90
index a8665d2059ebde26c45b582cbbce6d343be75aba..e29e295d745ac2ecb814f50c7156920f03817339 100644
--- a/src/ZSOLVER/get_halo.f90
+++ b/src/ZSOLVER/get_halo.f90
@@ -2320,6 +2320,8 @@ character(len=*), optional, intent(in) :: HNAME ! Name of the field to be added
 !
 REAL , DIMENSION(:,:) , POINTER , CONTIGUOUS :: ZH2F_EAST,ZH2F_WEST,ZH2F_NORTH,ZH2F_SOUTH
 !
+CALL INIT_HALO_D()
+!
 ZH2F_EAST => TP_PSRC_HALO2F_ll%HALO2%EAST
 ZH2F_WEST => TP_PSRC_HALO2F_ll%HALO2%WEST
 ZH2F_NORTH => TP_PSRC_HALO2F_ll%HALO2%NORTH