getVelocity_forElemFromState_noForce Function

private pure function getVelocity_forElemFromState_noForce(state, elem, stencil, varPos, nScalars) result(vel)

Calculate the velocity in all 3 directions from the element indicated (elem), reading the pdf (state information) from the state array. state array includes all the pdfs of all elements. The access to the state array has to be done via the generic access macro IDX, as we want to access post-collision values.

Arguments

TypeIntentOptionalAttributesName
real(kind=rk), intent(in) :: state(:)
integer, intent(in) :: elem

element index, for which to calc velocity

type(tem_stencilHeader_type), intent(in) :: stencil
integer, intent(in) :: varPos(:)
integer, intent(in) :: nScalars

Return Value real(kind=rk)(3)


Called by

proc~~getvelocity_forelemfromstate_noforce~~CalledByGraph proc~getvelocity_forelemfromstate_noforce getVelocity_forElemFromState_noForce interface~getvelocity getVelocity interface~getvelocity->proc~getvelocity_forelemfromstate_noforce proc~getequilibrium_forelemfromstate getEquilibrium_forElemfromState proc~getequilibrium_forelemfromstate->interface~getvelocity proc~mus_inamuroini mus_inamuroIni proc~mus_inamuroini->interface~getvelocity proc~velocity_noneqexpol_curved velocity_nonEqExpol_curved proc~velocity_noneqexpol_curved->interface~getvelocity interface~getequilibrium getEquilibrium interface~getequilibrium->proc~getequilibrium_forelemfromstate proc~mus_inamuro_ibm mus_inamuro_IBM proc~mus_inamuro_ibm->proc~mus_inamuroini proc~do_fast_singlelevel do_fast_singleLevel proc~do_fast_singlelevel->proc~mus_inamuro_ibm proc~mus_turbvisc_smagorinsky_fromprecolpdf mus_turbVisc_Smagorinsky_fromPreColPDF proc~mus_turbvisc_smagorinsky_fromprecolpdf->interface~getequilibrium

Contents


Variables

TypeVisibilityAttributesNameInitial
real(kind=rk), private :: dens
integer, private :: iDir
integer, private :: nElems