diff --git a/src/MNH/rain_ice_nucleation.f90 b/src/MNH/rain_ice_nucleation.f90
index d563437d50ae789265790fe1087ae443cdc642db..dbac01ac7c272af6e32df903580505fd626d2c53 100644
--- a/src/MNH/rain_ice_nucleation.f90
+++ b/src/MNH/rain_ice_nucleation.f90
@@ -291,8 +291,19 @@ END DO
  DO CONCURRENT ( JL=1:INEGT )
     ZZW(JL) = ZZW(JL) - ZCIT(JL)
  END DO
-  ZZWMAX = MAXVAL(ZZW(1:INEGT))
+#ifndef MNH_COMPILER_NVHPC
+ ZZWMAX = MAXVAL(ZZW(1:INEGT))
 !$acc end kernels
+#else
+!$acc end kernels
+ ZZWMAX = 0.0
+!$acc parallel reduction(max:ZZWMAX)
+ !$mnh_do_concurrent( JL=1:INEGT)
+  ZZWMAX = MAX(ZZWMAX,ZZW(JL))
+ !$mnh_end_do()
+!$acc end parallel 
+#endif 
+
 
   IF( ZZWMAX > 0.0 ) THEN
   !$acc kernels