diff --git a/Source/main.f90 b/Source/main.f90
index ca050160ca2..9368e1ade49 100644
--- a/Source/main.f90
+++ b/Source/main.f90
@@ -2151,7 +2151,7 @@ SUBROUTINE INITIALIZE_BACK_WALL_EXCHANGE
 
 DO NM=LOWER_MESH_INDEX,UPPER_MESH_INDEX
    DO NOM=1,NMESHES
-      IF (PROCESS(NM)==PROCESS(NOM)) CYCLE
+      IF (NM==NOM) CYCLE
       OS => MESHES(NM)%OMESH(NOM)%WALL_SEND_BUFFER
       IF (OS%N_ITEMS>0) ALLOCATE(OS%ITEM_INDEX(OS%N_ITEMS_DIM))
       IF (OS%N_ITEMS>0) ALLOCATE(OS%SURF_INDEX(OS%N_ITEMS_DIM))