active_tree_level_node Function

public pure function active_tree_level_node(plan, use_target_tree, level_pos)

レベル配列からノード番号を返す。

Arguments

Type IntentOptional Attributes Name
type(fmm_plan_type), intent(in) :: plan

FMM 計画。
logical, intent(in) :: use_target_tree

target 木を使うなら .true.。
integer(kind=i32), intent(in) :: level_pos

レベル内位置。

Return Value integer(kind=i32)


Called by

proc~~active_tree_level_node~~CalledByGraph proc~active_tree_level_node active_tree_level_node proc~core_update_state_impl core_update_state_impl proc~core_update_state_impl->proc~active_tree_level_node

Source Code

  pure integer(i32) function active_tree_level_node(plan, use_target_tree, level_pos)
    type(fmm_plan_type), intent(in) :: plan
    logical, intent(in) :: use_target_tree
    integer(i32), intent(in) :: level_pos

    if (use_target_tree) then
      active_tree_level_node = plan%target_level_nodes(level_pos)
    else
      active_tree_level_node = plan%node_level_nodes(level_pos)
    end if
  end function active_tree_level_node