directional_flux Subroutine

private pure subroutine directional_flux(q, dir, gam, f)

Return the directional Euler flux: fx for dir==1, gy for dir==2.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	q(neq2d)
integer,	intent(in)			::	dir
real(kind=wp),	intent(in)			::	gam
real(kind=wp),	intent(out)			::	f(neq2d)