core_eval_point_impl Subroutine

public subroutine core_eval_point_impl(plan, state, r, e)

1 点で電場を計算する。

Arguments

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

構築済みの FMM 計画。

type(fmm_state_type), intent(inout) :: state

評価に使う FMM state。

real(kind=dp), intent(in) :: r(3)
real(kind=dp), intent(out) :: e(3)

Calls

proc~~core_eval_point_impl~~CallsGraph proc~core_eval_point_impl core_eval_point_impl proc~active_tree_child_count active_tree_child_count proc~core_eval_point_impl->proc~active_tree_child_count proc~active_tree_child_idx active_tree_child_idx proc~core_eval_point_impl->proc~active_tree_child_idx proc~active_tree_child_octant active_tree_child_octant proc~core_eval_point_impl->proc~active_tree_child_octant proc~active_tree_nnode active_tree_nnode proc~core_eval_point_impl->proc~active_tree_nnode proc~active_tree_node_center active_tree_node_center proc~core_eval_point_impl->proc~active_tree_node_center proc~active_tree_node_half_size active_tree_node_half_size proc~core_eval_point_impl->proc~active_tree_node_half_size proc~add_periodic2_exact_ewald_correction_all_sources add_periodic2_exact_ewald_correction_all_sources proc~core_eval_point_impl->proc~add_periodic2_exact_ewald_correction_all_sources proc~build_axis_powers build_axis_powers proc~core_eval_point_impl->proc~build_axis_powers proc~octant_index octant_index proc~core_eval_point_impl->proc~octant_index proc~use_periodic2_m2l_root_oracle use_periodic2_m2l_root_oracle proc~core_eval_point_impl->proc~use_periodic2_m2l_root_oracle proc~wrap_periodic2_point~2 wrap_periodic2_point proc~core_eval_point_impl->proc~wrap_periodic2_point~2 proc~add_periodic2_exact_ewald_correction_single_source add_periodic2_exact_ewald_correction_single_source proc~add_periodic2_exact_ewald_correction_all_sources->proc~add_periodic2_exact_ewald_correction_single_source

Source Code

  subroutine core_eval_point_impl(plan, state, r, e)
    type(fmm_plan_type), intent(in) :: plan
    type(fmm_state_type), intent(inout) :: state
    real(dp), intent(in) :: r(3)
    real(dp), intent(out) :: e(3)

    call core_eval_point_xyz_impl(plan, state, r(1), r(2), r(3), e(1), e(2), e(3))
  end subroutine core_eval_point_impl