atl_modg_1d_euler_physFlux_nonConst Subroutine

public subroutine atl_modg_1d_euler_physFlux_nonConst(equation, poly_proj, res, pointVal, penalty_char, U_o)

Calculate the physical flux for the MODG scheme and Euler equation with variable characteristic (mask function) in the element.

Arguments

Type IntentOptional Attributes Name
type(atl_Equations_type) :: equation

The equation you solve.

type(ply_poly_project_type), intent(inout) :: poly_proj

Parameters for projection

real(kind=rk), intent(inout) :: res(:,:)

The physical flux result to be stored in

real(kind=rk), intent(in) :: pointVal(:,:)

Nodal representation of the polynomial with in each cell.

real(kind=rk), intent(in) :: penalty_char(:)

Characteristic (mask) function of the material penalization.

This should be 0 everywhere where there is no material, and 1 where there is material. obstacle velocity

real(kind=rk), intent(in) :: U_o(:)