diff --git a/src/MNH/ini_modeln.f90 b/src/MNH/ini_modeln.f90
index a7ff5457c1cfbe7464077149deef90d0492ec766..5fadcc1ba0362ff545e3ba18027e367b4b1f631e 100644
--- a/src/MNH/ini_modeln.f90
+++ b/src/MNH/ini_modeln.f90
@@ -900,6 +900,7 @@ ALLOCATE(XDYY(IIU,IJU,IKU))
 ALLOCATE(XDZX(IIU,IJU,IKU))
 ALLOCATE(XDZY(IIU,IJU,IKU))
 ALLOCATE(XDZZ(IIU,IJU,IKU))
+!$acc enter data create(XDXX,XDYY,XDZZ,XDZX,XDZY)
 !
 !*       3.3   Modules MODD_REF and  MODD_REF_n
 !
@@ -912,6 +913,7 @@ ALLOCATE(XRHODREF(IIU,IJU,IKU))
 ALLOCATE(XTHVREF(IIU,IJU,IKU))
 ALLOCATE(XEXNREF(IIU,IJU,IKU))
 ALLOCATE(XRHODJ(IIU,IJU,IKU))
+!$acc enter data create(XRHODJ)
 IF (CEQNSYS=='DUR' .AND. LUSERV) THEN
   ALLOCATE(XRVREF(IIU,IJU,IKU))
 ELSE
diff --git a/src/MNH/modd_metricsn.f90 b/src/MNH/modd_metricsn.f90
index 8a9b5711169cda8e71f89cba6792054d95e236d4..9777112cf10a7ae607ed55bfa8b9912cd76d64c0 100644
--- a/src/MNH/modd_metricsn.f90
+++ b/src/MNH/modd_metricsn.f90
@@ -48,7 +48,7 @@ TYPE(METRICS_t), DIMENSION(JPMODELMAX), TARGET, SAVE :: METRICS_MODEL
 
 REAL, DIMENSION(:,:,:), POINTER, contiguous :: XDXX=>NULL(),XDZX=>NULL(), &
                                   XDYY=>NULL(),XDZY=>NULL(),XDZZ=>NULL()
-!$acc declare create(XDXX,XDYY,XDZZ,XDZX,XDZY)
+! acc declare create(XDXX,XDYY,XDZZ,XDZX,XDZY)
 
 CONTAINS
 
diff --git a/src/MNH/modd_refn.f90 b/src/MNH/modd_refn.f90
index 45981ba791acd92414962b2fd040e4b6eeb14434..9ebcc958ad3398ae6f78177c43eba57f265e2851 100644
--- a/src/MNH/modd_refn.f90
+++ b/src/MNH/modd_refn.f90
@@ -69,7 +69,7 @@ REAL, DIMENSION(:,:,:), POINTER, contiguous :: XTHVREF=>NULL()
 REAL, DIMENSION(:,:,:), POINTER :: XRVREF=>NULL()
 REAL, DIMENSION(:,:,:), POINTER, contiguous :: XEXNREF=>NULL()
 REAL, DIMENSION(:,:,:), POINTER, contiguous :: XRHODJ=>NULL()
-!$acc declare create (XRHODJ)
+! acc declare create (XRHODJ)
 REAL, POINTER :: XREFMASS=>NULL()
 REAL, POINTER :: XMASS_O_PHI0=>NULL()
 REAL, POINTER :: XLINMASS=>NULL()