sound_speed_inf Function

  1. state.f90
  2. state
  3. sound_speed_inf

private function sound_speed_inf(flow) result(a)

Return the free stream speed of sound.

Arguments

Type IntentOptional AttributesName
type(flowtype), intent(in) :: flow

Information about fluid flow: freestream-speed, ref-viscosity,etc.

Return Value real(kind=wp)

output variable: speed of sound


Called by

proc~~sound_speed_inf~~CalledByGraph proc~sound_speed_inf sound_speed_inf proc~init_infinity_values init_infinity_values proc~init_infinity_values->proc~sound_speed_inf proc~setup_state setup_state proc~setup_state->proc~init_infinity_values proc~setup_solver setup_solver proc~setup_solver->proc~setup_state proc~start_run start_run proc~start_run->proc~setup_solver program~main main program~main->proc~start_run

Contents

Source Code

sound_speed_inf

Source Code

        function sound_speed_inf(flow) result(a)
            !< Return the free stream speed of sound.
            !-----------------------------------------------------------

            implicit none
            type(flowtype), intent(in) :: flow
            !< Information about fluid flow: freestream-speed, ref-viscosity,etc.
            real(wp) :: a
            !< output variable: speed of sound

            a = sqrt(flow%gm * flow%pressure_inf / flow%density_inf)

        end function sound_speed_inf