diff --git a/src/MNH/rain_ice_sedimentation_split.f90 b/src/MNH/rain_ice_sedimentation_split.f90 index 44b9c57bcad4b6ed5d6392c42ca882547805e083..2ab457fb30fe0ec77a8977f17197631fd7875adc 100644 --- a/src/MNH/rain_ice_sedimentation_split.f90 +++ b/src/MNH/rain_ice_sedimentation_split.f90 @@ -434,7 +434,9 @@ DO JN = 1 , KSPLITR IF ( KRR == 7 ) PRHS(:,:,:) = PRHS(:,:,:) + ZPRHS(:,:,:) * ZTSPLITR END IF ! +#ifndef MNH_COMPILER_CCE !$mnh_expand_array( JI=KIB:KIE,JJ=KJB:KJE,JK=KKTB:KKTE ) +#endif IF ( GSEDIC ) GSEDIMC(:,:,:) = & PRCS(:,:,:) > ZRTMIN(2) GSEDIMR(:,:,:) = & @@ -447,7 +449,9 @@ DO JN = 1 , KSPLITR PRGS(:,:,:) > ZRTMIN(6) IF ( GKRR_7 ) GSEDIMH(:,:,:) = & PRHS(:,:,:) > ZRTMIN(7) +#ifndef MNH_COMPILER_CCE !$mnh_end_expand_array() ! CONCURRENT +#endif !$acc end kernels ! #ifndef MNH_OPENACC