Juan 01/02/2023:ZSOLVER/dotprod.f90, OpenACC OPT, remove update host(ZDOTPROD)...

Juan 01/02/2023:ZSOLVER/dotprod.f90, OpenACC OPT, remove update host(ZDOTPROD) + use SUM_DD_R2_ll_DEVICE

src/ZSOLVER/dotprod.f90

@@ -195,8 +195,8 @@ ZDOTPROD(:,:)    = 0.
   END DO
 !$mnh_end_do()
 !$acc end parallel
-!$acc update host(ZDOTPROD)
-PDOTPROD = SUM_DD_R2_ll(ZDOTPROD)
+! acc update host(ZDOTPROD)
+PDOTPROD = SUM_DD_R2_ll_DEVICE(ZDOTPROD)
 !JUAN16
 #ifndef MNH_OPENACC
 DEALLOCATE(ZDOTPROD)