FDS Source : Remove TWO_D single mesh conditional in UNKZ MPI exchange.

firemodels · May 27, 2021 · de85367 · de85367
1 parent 43372eb
commit de85367
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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