compute_face_area_from_bounds Function

public function compute_face_area_from_bounds(inject_face, pos_low, pos_high) result(area)

注入面上の矩形開口から有効面積[m^2]を返す。

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: inject_face

注入面識別子(x_low/x_high/y_low/y_high/z_low/z_high)。

real(kind=dp), intent(in) :: pos_low(3)
real(kind=dp), intent(in) :: pos_high(3)

Return Value real(kind=dp)


Called by

proc~~compute_face_area_from_bounds~~CalledByGraph proc~compute_face_area_from_bounds compute_face_area_from_bounds proc~compute_macro_particles_for_batch compute_macro_particles_for_batch proc~compute_macro_particles_for_batch->proc~compute_face_area_from_bounds proc~resolve_reservoir_target_weight resolve_reservoir_target_weight proc~resolve_reservoir_target_weight->proc~compute_face_area_from_bounds proc~sample_photo_raycast_particles sample_photo_raycast_particles proc~sample_photo_raycast_particles->proc~compute_face_area_from_bounds proc~compute_macro_particles_for_species compute_macro_particles_for_species proc~compute_macro_particles_for_species->proc~compute_macro_particles_for_batch proc~init_particle_batch_from_config init_particle_batch_from_config proc~init_particle_batch_from_config->proc~resolve_reservoir_target_weight proc~init_particle_batch_from_config->proc~compute_macro_particles_for_species proc~sample_photo_species_state sample_photo_species_state proc~init_particle_batch_from_config->proc~sample_photo_species_state proc~sample_photo_species_state->proc~sample_photo_raycast_particles

Source Code

  real(dp) function compute_face_area_from_bounds(inject_face, pos_low, pos_high) result(area)
    character(len=*), intent(in) :: inject_face
    real(dp), intent(in) :: pos_low(3), pos_high(3)
    integer :: axis_t1, axis_t2

    call resolve_face_axes(inject_face, axis_t1, axis_t2)
    area = (pos_high(axis_t1) - pos_low(axis_t1))*(pos_high(axis_t2) - pos_low(axis_t2))
  end function compute_face_area_from_bounds