field_labelled_axpy_base Subroutine

public subroutine field_labelled_axpy_base(self, coeffs, g, label, a, b, c)

Adds coeffs(1, l)g, coeffs(2, l)g and coeffs(3, l)*g to a, b and c at every point of the DIR_X fields labelled l in 1..size(coeffs, 2). Points with any other label are left unchanged.

Type Bound

base_backend_t

Arguments

Type IntentOptional Attributes Name
class(base_backend_t) :: self
real(kind=dp), intent(in) :: coeffs(:,:)
class(field_t), intent(in) :: g
class(field_t), intent(in) :: label
class(field_t), intent(inout) :: a
class(field_t), intent(inout) :: b
class(field_t), intent(inout) :: c

Calls

proc~~field_labelled_axpy_base~~CallsGraph proc~field_labelled_axpy_base m_base_backend::base_backend_t%field_labelled_axpy_base proc~abort_run m_logger::abort_run proc~field_labelled_axpy_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_labelled_axpy_base~~CalledByGraph proc~field_labelled_axpy_base m_base_backend::base_backend_t%field_labelled_axpy_base proc~project_forces_adm m_adm::adm_t%project_forces_adm proc~project_forces_adm->proc~field_labelled_axpy_base