initialize_hit Subroutine

public subroutine initialize_hit(hit)

hit 構造体を未命中状態へ初期化する。

Arguments

Type IntentOptional Attributes Name
type(hit_info), intent(out) :: hit

Called by

proc~~initialize_hit~~CalledByGraph proc~initialize_hit initialize_hit proc~find_first_hit find_first_hit proc~find_first_hit->proc~initialize_hit proc~find_first_hit_base find_first_hit_base proc~find_first_hit->proc~find_first_hit_base proc~find_first_hit_periodic2 find_first_hit_periodic2 proc~find_first_hit->proc~find_first_hit_periodic2 proc~find_first_hit_base->proc~initialize_hit proc~find_first_hit_periodic2->proc~initialize_hit proc~find_first_hit_periodic2->proc~find_first_hit_base proc~advance_particle_step advance_particle_step proc~advance_particle_step->proc~find_first_hit proc~advance_particle_step_upper_panel_fourier advance_particle_step_upper_panel_fourier proc~advance_particle_step_upper_panel_fourier->proc~find_first_hit proc~resolve_particle_boundary_candidate resolve_particle_boundary_candidate proc~resolve_particle_boundary_candidate->proc~find_first_hit proc~sample_photo_raycast_particles sample_photo_raycast_particles proc~sample_photo_raycast_particles->proc~find_first_hit

Source Code

  subroutine initialize_hit(hit)
    type(hit_info), intent(out) :: hit

    hit%has_hit = .false.
    hit%elem_idx = -1_i32
    hit%t = 0.0d0
    hit%pos = 0.0d0
    hit%image_shift = 0_i32
    hit%pos_wrapped = 0.0d0
  end subroutine initialize_hit