deriveVelIncomp_FromPreColState Subroutine

public subroutine deriveVelIncomp_FromPreColState(state, neigh, iField, nSize, nElems, varSys, layout, res)

This routine computes velocity from precollision state array using FETCH macro.

This subroutine's interface must match the abstract interface definition derive_FromPreColState in derived/mus_derVarPos_module.f90 in order to be callable via velFromPreColState function pointer.


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

Array of state n * layout%fStencil%QQ * nFields

integer, intent(in) :: neigh(:)

connectivity array

integer, intent(in) :: iField

Current field

integer, intent(in) :: nSize

number of elements in state array

integer, intent(in) :: nElems

number of elements

type(tem_varSys_type), intent(in) :: varSys

variable system which is required to access fieldProp information via variable method data c_ptr

type(mus_scheme_layout_type), intent(in) :: layout

scheme layout contains stencil definition and lattice weights

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

Output of this routine Dimension: n * nComponents of res



integer, private :: iElem
integer, private :: iDir
real(kind=rk), private :: pdf(layout%fStencil%QQ)
real(kind=rk), private :: vel(3)
integer, private :: QQ
integer, private :: nScalars
integer, private :: nDims