gather_solution_to_root Subroutine

public subroutine gather_solution_to_root(local_prim, n_local, decomp, gather_buf)

Gather (neq, n_local) primitives from every rank into (neq, n_global) on rank 0 via MPI_Gatherv.

                other ranks must pass a (neq, 0) buffer (untouched).

Arguments

Type IntentOptional Attributes Name
real(kind=wp), intent(in) :: local_prim(:,:)
integer, intent(in) :: n_local

this rank's interior cell count
type(decomp_t), intent(in) :: decomp

per-rank decomposition descriptor (needed for n_global, n_ranks)
real(kind=wp), intent(inout) :: gather_buf(:,:)