mpi_is_root Function

public function mpi_is_root(ctx)

root rank (rank=0) かどうかを返す。

Arguments

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

Return Value logical


Called by

proc~~mpi_is_root~~CalledByGraph proc~mpi_is_root mpi_is_root proc~load_or_init_run_state load_or_init_run_state proc~load_or_init_run_state->proc~mpi_is_root proc~maybe_write_periodic_checkpoint maybe_write_periodic_checkpoint proc~maybe_write_periodic_checkpoint->proc~mpi_is_root proc~perf_write_outputs perf_write_outputs proc~perf_write_outputs->proc~mpi_is_root proc~precompute_periodic_root_operator precompute_periodic_root_operator proc~precompute_periodic_root_operator->proc~mpi_is_root proc~solve_matching_implicit_zero_mode solve_matching_implicit_zero_mode proc~solve_matching_implicit_zero_mode->proc~mpi_is_root program~main main program~main->proc~mpi_is_root program~main->proc~load_or_init_run_state program~main->proc~perf_write_outputs proc~core_build_panel_plan_impl core_build_panel_plan_impl proc~core_build_panel_plan_impl->proc~precompute_periodic_root_operator proc~core_build_plan_impl core_build_plan_impl proc~core_build_plan_impl->proc~precompute_periodic_root_operator

Source Code

  logical function mpi_is_root(ctx)
    type(mpi_context), intent(in) :: ctx

    mpi_is_root = (ctx%rank == 0_i32)
  end function mpi_is_root