diff --git a/Source/ccib.f90 b/Source/ccib.f90 index b9146a62bf6..9cfa8a2d78e 100644 --- a/Source/ccib.f90 +++ b/Source/ccib.f90 @@ -15991,7 +15991,7 @@ SUBROUTINE FILL_UNKZ_GUARDCELLS IF (EVACUATION_ONLY(NM)) CYCLE DO NOM=1,NMESHES IF (EVACUATION_ONLY(NOM)) CYCLE - IF (.NOT.(TWO_D .AND. NMESHES==1) .AND. .NOT.MESHES(NM)%CONNECTED_MESH(NOM)) CYCLE + IF (.NOT.TWO_D .AND. .NOT.MESHES(NM)%CONNECTED_MESH(NOM)) CYCLE M3 => MESHES(NM)%OMESH(NOM) IF (N_MPI_PROCESSES>1 .AND. NM/=NOM .AND. PROCESS(NOM)/=MY_RANK .AND. MESHES(NM)%CONNECTED_MESH(NOM)) THEN N_REQ0 = N_REQ0 + 1