diff --git a/src/MNH/turb.f90 b/src/MNH/turb.f90
index f26a7b23ea08818f6338911fdc7c8e3ab197eb0d..6c9b64d176e6d7b55de4e119c284159f5d1fefa3 100644
--- a/src/MNH/turb.f90
+++ b/src/MNH/turb.f90
@@ -2048,8 +2048,10 @@ ELSE
 !*         3.1 BL89 mixing length
 !           ------------------
   CASE ('BL89','RM17')
-!$acc kernels present(ZSHEAR)
+!$acc kernels present_cr(ZSHEAR)
+!$mnh_expand_array(JI=1:JIU,JJ=1:JJU,JK=1:JKU)     
     ZSHEAR(:, :, : ) = 0.
+!$mnh_end_expand_array()
 !$acc end kernels
     CALL BL89(KKA,KKU,KKL,PZZ,PDZZ,PTHVREF,ZTHLM,KRR,ZRM,PTKET,ZSHEAR,ZLM_CLOUD)
 !
diff --git a/src/ZSOLVER/turb.f90 b/src/ZSOLVER/turb.f90
index c6b85c5d1cf444a2d29b81aabc888993f78280f3..a7d1b3cc7d148954f83cb688fa99003bdad3a5b5 100644
--- a/src/ZSOLVER/turb.f90
+++ b/src/ZSOLVER/turb.f90
@@ -2060,8 +2060,10 @@ ELSE
 !*         3.1 BL89 mixing length
 !           ------------------
   CASE ('BL89','RM17')
-!$acc kernels present(ZSHEAR)
+!$acc kernels present_cr(ZSHEAR)
+!$mnh_expand_array(JI=1:JIU,JJ=1:JJU,JK=1:JKU)     
     ZSHEAR(:, :, : ) = 0.
+!$mnh_end_expand_array()
 !$acc end kernels
     CALL BL89(KKA,KKU,KKL,PZZ,PDZZ,PTHVREF,ZTHLM,KRR,ZRM,PTKET,ZSHEAR,ZLM_CLOUD)
 !