filter_in_dir Subroutine

public subroutine filter_in_dir(self, f, dirps, is_normal)

Filter a DIR_X field along one direction, in place.

Arguments

Type IntentOptional Attributes Name
class(solver_t), intent(inout) :: self
class(field_t), intent(inout) :: f
type(dirps_t), intent(in), target :: dirps

.true. when f is the component along dirps%dir, which is the odd one across a free-slip boundary.

logical, intent(in) :: is_normal

Calls

proc~~filter_in_dir~~CallsGraph proc~filter_in_dir m_solver::filter_in_dir proc~abort_run m_logger::abort_run proc~filter_in_dir->proc~abort_run proc~get_block m_allocator::allocator_t%get_block proc~filter_in_dir->proc~get_block proc~release_block m_allocator::allocator_t%release_block proc~filter_in_dir->proc~release_block proc~reorder_base m_base_backend::base_backend_t%reorder_base proc~filter_in_dir->proc~reorder_base proc~tds_solve_base m_base_backend::base_backend_t%tds_solve_base proc~filter_in_dir->proc~tds_solve_base proc~veccopy_base m_base_backend::base_backend_t%veccopy_base proc~filter_in_dir->proc~veccopy_base 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 proc~create_block m_allocator::allocator_t%create_block proc~get_block->proc~create_block proc~set_shape m_field::field_t%set_shape proc~get_block->proc~set_shape proc~reorder_base->proc~abort_run proc~tds_solve_base->proc~abort_run proc~veccopy_base->proc~abort_run

Called by

proc~~filter_in_dir~~CalledByGraph proc~filter_in_dir m_solver::filter_in_dir proc~filter_field m_solver::filter_field proc~filter_field->proc~filter_in_dir proc~apply_spatial_filter m_solver::solver_t%apply_spatial_filter proc~apply_spatial_filter->proc~filter_field proc~run m_base_case::base_case_t%run proc~run->proc~apply_spatial_filter program~xcompact xcompact program~xcompact->proc~run