vector_norm_squared_omp Function

public function vector_norm_squared_omp(self, a, b, c) result(norm_squared)

Global sum of a2 + b2 + c**2, with one MPI reduction.

Type Bound

omp_backend_t

Arguments

Type IntentOptional Attributes Name
class(omp_backend_t) :: self
class(field_t), intent(in) :: a
class(field_t), intent(in) :: b
class(field_t), intent(in) :: c

Return Value real(kind=dp)


Calls

proc~~vector_norm_squared_omp~~CallsGraph proc~vector_norm_squared_omp m_omp_backend::omp_backend_t%vector_norm_squared_omp mpi_allreduce mpi_allreduce proc~vector_norm_squared_omp->mpi_allreduce proc~abort_run m_logger::abort_run proc~vector_norm_squared_omp->proc~abort_run proc~get_dims m_mesh::mesh_t%get_dims proc~vector_norm_squared_omp->proc~get_dims 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~get_dims_dataloc m_mesh::get_dims_dataloc proc~get_dims->proc~get_dims_dataloc