field_add_const_x_face_base Subroutine

public subroutine field_add_const_x_face_base(self, f, c, at_end)

Adds a uniform constant c to one x-normal face plane of a DIR_X field, in place. Used to enforce exact outlet mass conservation: after the convective outflow update, the outlet-plane mean is shifted uniformly so that it matches the prescribed inlet mean (mirrors Incompact3d's bxxn = bxxn - ut + ut1). at_end = .true. -> the x = nx plane (outlet) at_end = .false. -> the x = 1 plane (inlet)

Type Bound

base_backend_t

Arguments

Type IntentOptional Attributes Name
class(base_backend_t) :: self
class(field_t), intent(inout) :: f
real(kind=dp), intent(in) :: c
logical, intent(in) :: at_end

Calls

proc~~field_add_const_x_face_base~~CallsGraph proc~field_add_const_x_face_base m_base_backend::base_backend_t%field_add_const_x_face_base proc~abort_run m_logger::abort_run proc~field_add_const_x_face_base->proc~abort_run interface~str m_logger::str proc~abort_run->interface~str mpi_abort mpi_abort proc~abort_run->mpi_abort mpi_barrier mpi_barrier proc~abort_run->mpi_barrier mpi_comm_rank mpi_comm_rank proc~abort_run->mpi_comm_rank mpi_comm_size mpi_comm_size proc~abort_run->mpi_comm_size mpi_finalized mpi_finalized proc~abort_run->mpi_finalized mpi_initialized mpi_initialized proc~abort_run->mpi_initialized

Called by

proc~~field_add_const_x_face_base~~CalledByGraph proc~field_add_const_x_face_base m_base_backend::base_backend_t%field_add_const_x_face_base proc~apply_bc_wind_turbine m_case_wind_turbine::case_wind_turbine_t%apply_BC_wind_turbine proc~apply_bc_wind_turbine->proc~field_add_const_x_face_base