diff --git a/MNH/advecuvw_4th.f90 b/MNH/advecuvw_4th.f90
index 43e1ab7a5ee8ebc1c0635c8d43b60df06ff2f9c4..fecb024145dc63cf61404bca7017b468514262d1 100644
--- a/MNH/advecuvw_4th.f90
+++ b/MNH/advecuvw_4th.f90
@@ -277,8 +277,7 @@ INTEGER                                              :: II
 !*       1.     COMPUTES THE DOMAIN DIMENSIONS
 !
 !               ------------------------------
-!$acc data 
-! create(ZMEANX, ZMEANY)
+!acc data 
 !
 CALL GET_INDICE_ll(IIB,IJB,IIE,IJE)
 !!$CALL GET_DIM_EXT_ll('B',IIU,IJU)     
@@ -431,7 +430,7 @@ PRWS(:,:,:) = PRWS(:,:,:) - ZTEMP4
 !$acc end kernels
 IF (LBUDGET_W)  CALL BUDGET (PRWS,3,'ADVZ_BU_RW')
 !
-!$acc end data 
+!acc end data 
 !-------------------------------------------------------------------------------
 !
 END SUBROUTINE ADVECUVW_4TH_D