tem_reduction_spatial_close Subroutine

  1. tem_reduction_spatial_module.f90
  2. tem_reduction_spatial_module
  3. tem_reduction_spatial_close

public subroutine tem_reduction_spatial_close(me, proc)

Perform the global reduction

After the local reductions have been performed (in _append), the results must be communicated between processes.

Arguments

TypeIntentOptionalAttributesName
type(tem_reduction_spatial_type), intent(inout) :: me(:)

The reduction type to work on. All definitions should be present in here
type(tem_comm_env_type), intent(in) :: proc

communicator for processes participating in this reduction

Calls

proc~~tem_reduction_spatial_close~~CallsGraph proc~tem_reduction_spatial_close tem_reduction_spatial_close mpi_reduce mpi_reduce proc~tem_reduction_spatial_close->mpi_reduce

Called by

proc~~tem_reduction_spatial_close~~CalledByGraph proc~tem_reduction_spatial_close tem_reduction_spatial_close proc~tem_convergence_check_element tem_convergence_check_element proc~tem_convergence_check_element->proc~tem_reduction_spatial_close proc~tem_convergence_check_point tem_convergence_check_point proc~tem_convergence_check_point->proc~tem_reduction_spatial_close proc~hvs_ascii_dump_point_data hvs_ascii_dump_point_data proc~hvs_ascii_dump_point_data->proc~tem_reduction_spatial_close proc~hvs_ascii_dump_elem_data hvs_ascii_dump_elem_data proc~hvs_ascii_dump_elem_data->proc~tem_reduction_spatial_close proc~hvs_output_write hvs_output_write proc~hvs_output_write->proc~hvs_ascii_dump_point_data proc~hvs_output_write->proc~hvs_ascii_dump_elem_data proc~tem_convergence_check tem_convergence_check proc~tem_convergence_check->proc~tem_convergence_check_element proc~tem_convergence_check->proc~tem_convergence_check_point proc~tem_tracker tem_tracker proc~tem_tracker->proc~hvs_output_write

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
integer, private :: i
integer, private :: nComp
integer, private :: ierr
integer, private :: globalnElems
real(kind=rk), private, allocatable:: buff(:)
real(kind=rk), private :: Vglob