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.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| 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 |
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer, | private | :: | iElem | ||||
| integer, | private | :: | iDir | ||||
| real(kind=rk), | private | :: | pdf(layout%fStencil%QQ) | ||||
| real(kind=rk), | private | :: | vel(3) | ||||
| integer, | private | :: | |||||
| integer, | private | :: | nScalars | ||||
| integer, | private | :: | nDims |