compute_fluxes_from_primitive Subroutine

  1. foreseer_conservative_compressible.f90
  2. foreseer_conservative_compressible
  3. compute_fluxes_from_primitive

private elemental subroutine compute_fluxes_from_primitive(self, eos, p, r, u, normal)

Compute conservative fluxes from primitives at interface.

Arguments

Type IntentOptional AttributesName
class(conservative_compressible), intent(inout) :: self

Conservative.
class(eos_object), intent(in) :: eos

Equation of state.
real(kind=R8P), intent(in) :: p

Pressure at interface.
real(kind=R8P), intent(in) :: r

Density at interface.
real(kind=R8P), intent(in) :: u

Velocity (normal component) at interface.
type(vector), intent(in) :: normal

Normal (versor) of face where fluxes are given.

Source Code

compute_fluxes_from_primitive

Source Code

   elemental subroutine compute_fluxes_from_primitive(self, eos, p, r, u, normal)
   !< Compute conservative fluxes from primitives at interface.
   class(conservative_compressible), intent(inout) :: self   !< Conservative.
   class(eos_object),                intent(in)    :: eos    !< Equation of state.
   real(R8P),                        intent(in)    :: p      !< Pressure at interface.
   real(R8P),                        intent(in)    :: r      !< Density at interface.
   real(R8P),                        intent(in)    :: u      !< Velocity (normal component) at interface.
   type(vector),                     intent(in)    :: normal !< Normal (versor) of face where fluxes are given.

   self%density = r * u
   self%momentum = (r * u * u + p) * normal
   self%energy = (r * eos%energy(density=r, pressure=p) + r * u * u * 0.5_R8P + p) * u
   endsubroutine compute_fluxes_from_primitive

All Procedures

add add add_euler array array compute_derivate compute_dt compute_fluxes compute_fluxes compute_fluxes_from_primitive compute_post_rarefaction compute_post_shock compute_roe_state compute_states23_from_u23 compute_u23 compute_up23 compute_waves compute_waves_u23 compute_waves_up23 cons_assign_cons cons_divide_real cons_multiply_cons cons_multiply_real conservative_compressible conservative_compressible_instance conservative_compressible_pointer conservative_to_primitive_compressible cp cv delta density description description description description destroy destroy destroy dEuler_dt energy energy eos_assign_eos eos_compressible eos_compressible_instance eos_compressible_pointer eta euler_assign_euler euler_assign_real euler_local_error euler_multiply_euler euler_multiply_real g gm1 gp1 impose_boundary_conditions initialize initialize initialize initialize initialize initialize initialize initialize initialize initialize left_eigenvectors momentum negative negative output parse_command_line_interface positive positive pressure pressure prim_assign_prim prim_divide_real prim_multiply_prim prim_multiply_real primitive_compressible primitive_compressible_instance primitive_compressible_pointer primitive_to_conservative_compressible R real_multiply_cons real_multiply_euler real_multiply_prim reconstruct_interfaces_characteristic reconstruct_interfaces_conservative reconstruct_interfaces_primitive right_eigenvectors rpat_assign_rpat save_time_serie solve solve solve solve solve speed_of_sound sub sub sub_euler temperature velocity