mpi_world_size Function

public function mpi_world_size(ctx)

MPI world size を返す(size<=0 は 1 へ補正)。

Arguments

Type IntentOptional Attributes Name
type(mpi_context), intent(in), optional :: ctx

Return Value integer(kind=i32)


Called by

proc~~mpi_world_size~~CalledByGraph proc~mpi_world_size mpi_world_size program~main main program~main->proc~mpi_world_size

Source Code

  integer(i32) function mpi_world_size(ctx)
    type(mpi_context), intent(in), optional :: ctx

    mpi_world_size = 1_i32
    if (present(ctx)) mpi_world_size = max(1_i32, ctx%size)
  end function mpi_world_size