diff --git a/MNH/advection.f90 b/MNH/advection.f90
index edc78d7689120d38e2a001d7351f6e65cd44d500..005ba4bd2fd25bc0d5d8e5e6f5fe9873ef2411ab 100644
--- a/MNH/advection.f90
+++ b/MNH/advection.f90
@@ -152,7 +152,6 @@ USE MODI_MPDATA_SCALAR
 USE MODI_PPM_MET
 USE MODI_PPM_SCALAR
 !
-USE MODE_MNH_ZWORK, ONLY :  ZW3D20
 !
 !-------------------------------------------------------------------------------
 !
@@ -320,11 +319,11 @@ ELSEIF (HMET_ADV_SCHEME(1:3)=='PPM') THEN
    ZRVCT = ZRVCT*PTSTEP_MET
    ZRWCT = ZRWCT*PTSTEP_MET
 
+   !$acc update device(PRT)
    CALL PPM_MET   (HLBCX,HLBCY, KRR, KTCOUNT,                  &
                    ZRUCT, ZRVCT, ZRWCT, PTSTEP_MET, PRHODJ,    &
                    PTHT, PTKET, PRT, PRTHS, PRTKES, PRRS,      &
-                   HMET_ADV_SCHEME,                            &
-                   ZW3D20                                      )
+                   HMET_ADV_SCHEME                             )
 !
 END IF
 !