diff --git a/src/ZSOLVER/modeln.f90 b/src/ZSOLVER/modeln.f90
index 71f868206338e1a4e4432f62216dc875e1628f28..e82b9908c68ebf6f3af5f6e017aca89992c0719f 100644
--- a/src/ZSOLVER/modeln.f90
+++ b/src/ZSOLVER/modeln.f90
@@ -1953,7 +1953,7 @@ IF (CCLOUD /= 'NONE' .AND. CELEC == 'NONE') THEN
 !$acc &            XHLC_HRC, XHLC_HCF, XHLI_HRI, XHLI_HCF)                                       &
 !$acc &    copyout(XSRCT, XRAINFR)
 
-!$acc update device ( XRTHS, ZPABST )
+!$acc update device (XRTHS)
   
   IF (CSURF=='EXTE') THEN
 #ifndef MNH_OPENACC