Loading [MathJax]/extensions/tex2jax.js
Neko 0.9.99
A portable framework for high-order spectral element flow simulations
All Classes Namespaces Files Functions Variables Typedefs Enumerator Macros Pages
euler_res_sx Module Reference

Data Types

type  euler_res_sx_t
 

Functions/Subroutines

subroutine advance_primitive_variables_sx (rho_field, m_x, m_y, m_z, e, p, u, v, w, ax, coef, gs, h, c_avisc_low, rk_scheme, dt)
 
subroutine evaluate_rhs_sx (rhs_rho_field, rhs_m_x, rhs_m_y, rhs_m_z, rhs_e, rho_field, m_x, m_y, m_z, e, p, u, v, w, ax, coef, gs, h, c_avisc_low)
 

Function/Subroutine Documentation

◆ advance_primitive_variables_sx()

subroutine euler_res_sx::advance_primitive_variables_sx ( type(field_t), intent(inout rho_field,
type(field_t), intent(inout m_x,
type(field_t), intent(inout m_y,
type(field_t), intent(inout m_z,
type(field_t), intent(inout e,
type(field_t), intent(in p,
type(field_t), intent(in u,
type(field_t), intent(in v,
type(field_t), intent(in w,
class(ax_t), intent(inout ax,
type(coef_t), intent(inout coef,
type(gs_t), intent(inout gs,
type(field_t), intent(in h,
real(kind=rp)  c_avisc_low,
class(runge_kutta_time_scheme_t), intent(in rk_scheme,
real(kind=rp), intent(in dt 
)

Definition at line 25 of file euler_res_sx.f90.

Here is the call graph for this function:

◆ evaluate_rhs_sx()

subroutine euler_res_sx::evaluate_rhs_sx ( type(field_t), intent(inout rhs_rho_field,
type(field_t), intent(inout rhs_m_x,
type(field_t), intent(inout rhs_m_y,
type(field_t), intent(inout rhs_m_z,
type(field_t), intent(inout rhs_e,
type(field_t), intent(inout rho_field,
type(field_t), intent(inout m_x,
type(field_t), intent(inout m_y,
type(field_t), intent(inout m_z,
type(field_t), intent(inout e,
type(field_t), intent(in p,
type(field_t), intent(in u,
type(field_t), intent(in v,
type(field_t), intent(in w,
class(ax_t), intent(inout ax,
type(coef_t), intent(inout coef,
type(gs_t), intent(inout gs,
type(field_t), intent(in h,
real(kind=rp)  c_avisc_low 
)
private

rho = rho - dt * div(m)

m = m - dt * div(rho * u * u^T + p*I)

E = E - dt * div(u * (E + p))

Definition at line 151 of file euler_res_sx.f90.

Here is the call graph for this function:
Here is the caller graph for this function: