diff --git a/src/MNH/ice4_sedimentation_split.f90 b/src/MNH/ice4_sedimentation_split.f90 index 41c54c295e02fab023c2d7d34a1fb63fd402b413..63921e9d3cc1877f8b799fcb58ace7bf227adcc4 100644 --- a/src/MNH/ice4_sedimentation_split.f90 +++ b/src/MNH/ice4_sedimentation_split.f90 @@ -664,7 +664,7 @@ DO WHILE (ANY(ZREMAINT>0.)) ENDIF !$acc kernels ZMAX_TSTEP(:,:) = ZREMAINT(:,:) -!$acc loop independent private(JI,JJ,JK,JL) +!acc loop independent private(JI,JJ,JK,JL) DO CONCURRENT( JL = 1 : ISEDIM ) JI=I1(JL) JJ=I2(JL)