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~mus_inamuroini mus_inamuroIni proc~mus_inamuroini->interface~getvelocity proc~velocity_noneqexpol_curved velocity_nonEqExpol_curved proc~velocity_noneqexpol_curved->interface~getvelocity proc~getequilibrium_forelemfromstate getEquilibrium_forElemfromState proc~getequilibrium_forelemfromstate->interface~getvelocity proc~mus_inamuro_ibm mus_inamuro_IBM proc~mus_inamuro_ibm->proc~mus_inamuroini interface~getequilibrium getEquilibrium interface~getequilibrium->proc~getequilibrium_forelemfromstate proc~set_pdfacoustic set_pdfAcoustic proc~set_pdfacoustic->interface~getequilibrium proc~getshearstresstensor_forelemfromstate getShearStressTensor_forElemFromState proc~getshearstresstensor_forelemfromstate->interface~getequilibrium proc~getshearratetensor_acoustic_lbm getShearRateTensor_acoustic_lbm proc~getshearratetensor_acoustic_lbm->interface~getequilibrium proc~mus_turbvisc_smagorinsky_fromprecolpdf mus_turbVisc_Smagorinsky_fromPreColPDF proc~mus_turbvisc_smagorinsky_fromprecolpdf->interface~getequilibrium proc~getshearstresstensor_forpdfsubset getShearStressTensor_forPdfSubset proc~getshearstresstensor_forpdfsubset->interface~getequilibrium proc~do_fast_singlelevel do_fast_singleLevel proc~do_fast_singlelevel->proc~mus_inamuro_ibm

Contents


Variables

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