boundary_inflow_face_enabled Function

public pure function boundary_inflow_face_enabled(spec, face) result(enabled)

face bit順の面に reservoir 流入が有効かを返す。

Arguments

Type IntentOptional Attributes Name
type(particle_species_spec), intent(in) :: spec
integer(kind=i32), intent(in) :: face

Return Value logical


Source Code

  pure logical function boundary_inflow_face_enabled(spec, face) result(enabled)
    type(particle_species_spec), intent(in) :: spec
    integer(i32), intent(in) :: face

    if (mod(face, 2_i32) == 1_i32) then
      enabled = spec%boundary_inflow_low((face + 1_i32)/2_i32) == particle_inflow_reservoir
    else
      enabled = spec%boundary_inflow_high(face/2_i32) == particle_inflow_reservoir
    end if
  end function boundary_inflow_face_enabled