getVelocity Interface

public interface getVelocity

Calls

interface~~getvelocity~~CallsGraph interface~getvelocity getVelocity proc~getvelocity_forelemfromstate_noforce getVelocity_forElemFromState_noForce interface~getvelocity->proc~getvelocity_forelemfromstate_noforce proc~getvelocity_forpdfsubset getVelocity_forPdfSubset interface~getvelocity->proc~getvelocity_forpdfsubset

Called by

interface~~getvelocity~~CalledByGraph interface~getvelocity getVelocity 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


Module Procedures

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)

private pure function getVelocity_forPdfSubset(subset, stencil, varPos) result(vel)

Calculate the velocity in all 3 directions from a subset given, ordered according to the stencil

Arguments

TypeIntentOptionalAttributesName
real(kind=rk), intent(in) :: subset(:)
type(tem_stencilHeader_type), intent(in) :: stencil
integer, intent(in) :: varPos(:)

Return Value real(kind=rk)(3)