wall_edges_2d Subroutine

public subroutine wall_edges_2d(state, w_xlo, w_xhi, w_ylo, w_yhi)

Report which of the four block edges are PHYSICAL solid (reflecting) walls, for the curvilinear residual's weak pressure-wall flux. Mirrors apply_halos_2d's serial/MPI dual-path edge selection exactly (single source of truth): serial (np=1 or no Cart comm) => all four edges are physical; MPI => an edge is physical only if its Cartesian neighbour is MPI_PROC_NULL. An edge is a wall iff it is physical AND its cfg % bc_* is 'reflecting'.

Arguments

Type IntentOptional Attributes Name
type(solver_state_2d_t), intent(in) :: state
logical, intent(out) :: w_xlo
logical, intent(out) :: w_xhi
logical, intent(out) :: w_ylo
logical, intent(out) :: w_yhi