diff --git a/Source/init.f90 b/Source/init.f90 index deb9fdb0ea8..efc36aa0d2a 100644 --- a/Source/init.f90 +++ b/Source/init.f90 @@ -4965,7 +4965,7 @@ SUBROUTINE GET_BOUNDARY_TYPE WC => MESHES(NM)%WALL(IW) BC => MESHES(NM)%BOUNDARY_COORD(WC%BC_INDEX) -IF (IW<=N_EXTERNAL_WALL_CELLS) THEN +IF (IW<=N_EXTERNAL_WALL_CELLS .AND. REMOVE) THEN EWC => MESHES(NM)%EXTERNAL_WALL(IW) WC%BOUNDARY_TYPE = SOLID_BOUNDARY CELL(IC)%SOLID = .TRUE.