vecmult_base Subroutine

public subroutine vecmult_base(self, y, x)

pointwise multiplication between two vectors: y(:) = y(:) * x(:)

Type Bound

base_backend_t

Arguments

Type IntentOptional Attributes Name
class(base_backend_t) :: self
class(field_t), intent(inout) :: y
class(field_t), intent(in) :: x

Calls

proc~~vecmult_base~~CallsGraph proc~vecmult_base m_base_backend::base_backend_t%vecmult_base proc~abort_run m_logger::abort_run proc~vecmult_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~~vecmult_base~~CalledByGraph proc~vecmult_base m_base_backend::base_backend_t%vecmult_base none~apply_damping m_abl::abl_t%apply_damping none~apply_damping->proc~vecmult_base none~body m_ibm::ibm_t%body none~body->proc~vecmult_base none~apply_forcing m_abl::abl_t%apply_forcing none~apply_forcing->none~apply_damping proc~substep m_base_case::base_case_t%substep proc~substep->none~body proc~forcings_abl m_case_abl::case_abl_t%forcings_abl proc~forcings_abl->none~apply_forcing proc~run m_base_case::base_case_t%run proc~run->proc~substep proc~run_build_mode m_memcheck_build::run_build_mode proc~run_build_mode->proc~substep program~x3d2_memcheck x3d2_memcheck program~x3d2_memcheck->proc~run_build_mode program~xcompact xcompact program~xcompact->proc~run