setThirdOrder_diffusive Function

public function setThirdOrder_diffusive(layout, omega, x, dx, dt) result(f3)

Set third order for diffusive scaling (for push algorithm?!) Have a look at the initial condition file for TGV in Hasert/2013/multilevel_diffusive/ic Note that this is only for a 2d taylor green test case in the region x = y = 0:2pi with reference velocity u0 = 1

Arguments

TypeIntentOptionalAttributesName
type(mus_scheme_layout_type), intent(in) :: layout
real(kind=rk), intent(in) :: omega
real(kind=rk), intent(in) :: x(3)
real(kind=rk), intent(in) :: dx
real(kind=rk), intent(in) :: dt

Return Value real(kind=rk)(layout%fStencil%QQ)


Calls

proc~~setthirdorder_diffusive~~CallsGraph proc~setthirdorder_diffusive setThirdOrder_diffusive proc~convprepost convPrePost proc~setthirdorder_diffusive->proc~convprepost

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iDir
real(kind=rk), private :: cx(3)
real(kind=rk), private :: nu
real(kind=rk), private :: u0
real(kind=rk), private :: A
real(kind=rk), private :: BI
real(kind=rk), private :: BII
real(kind=rk), private :: CI
real(kind=rk), private :: CII
real(kind=rk), private :: D