Quentin 13/04/2022: bugfix infinite loop sedimentation init inner values of...

Quentin 13/04/2022: bugfix infinite loop sedimentation init inner values of ZREMAINT (bug in mesonh only)

src/common/micro/mode_ice4_sedimentation_split.F90

@@ -336,7 +336,8 @@ END IF
 PINPRX(:,:) = 0.
 ZINVTSTEP=1./PTSTEP
 ZRSMIN(:) = ICED%XRTMIN(:) * ZINVTSTEP
-ZREMAINT(:,:) = PTSTEP
+ZREMAINT(:,:) = 0.
+ZREMAINT(D%NIB:D%NIE,D%NJB:D%NJE) = PTSTEP
 !
 DO WHILE (ANY(ZREMAINT>0.))
   ISEDIM = 0