getWSS Function

public function getWSS(state, neigh, elem, omega, layout, iField, varPos, nScalars) result(wss)

Calculate the wall shear stress (WSS)

choose the max shear as Wall Shear Stress(wss)

Arguments

TypeIntentOptionalAttributesName
real(kind=rk), intent(in) :: state(:)
integer, intent(in) :: neigh(:)
integer, intent(in) :: elem
real(kind=rk), intent(in) :: omega
type(mus_scheme_layout_type), intent(in) :: layout
integer, intent(in) :: iField
integer, intent(in) :: varPos(:)
integer, intent(in) :: nScalars

Return Value real(kind=rk)


Calls

proc~~getwss~~CallsGraph proc~getwss getWSS interface~getshearstresstensor getShearStressTensor proc~getwss->interface~getshearstresstensor proc~getshearstresstensor_forelemfromstate getShearStressTensor_forElemFromState interface~getshearstresstensor->proc~getshearstresstensor_forelemfromstate proc~getshearstresstensorincomp_forpdfsubset getShearStressTensorIncomp_forPdfSubset interface~getshearstresstensor->proc~getshearstresstensorincomp_forpdfsubset proc~getshearstresstensor_forpdfsubset getShearStressTensor_forPdfSubset interface~getshearstresstensor->proc~getshearstresstensor_forpdfsubset proc~convprepost convPrePost proc~getshearstresstensor_forelemfromstate->proc~convprepost interface~getequilibrium getEquilibrium proc~getshearstresstensor_forelemfromstate->interface~getequilibrium proc~secondmom secondMom proc~getshearstresstensor_forelemfromstate->proc~secondmom proc~getequilibriumincomp getEquilibriumIncomp proc~getshearstresstensorincomp_forpdfsubset->proc~getequilibriumincomp proc~getshearstresstensorincomp_forpdfsubset->proc~convprepost proc~getshearstresstensorincomp_forpdfsubset->proc~secondmom proc~getshearstresstensor_forpdfsubset->proc~convprepost proc~getshearstresstensor_forpdfsubset->interface~getequilibrium proc~getshearstresstensor_forpdfsubset->proc~secondmom proc~getequilibrium_forpdfsubset getEquilibrium_forPdfSubset interface~getequilibrium->proc~getequilibrium_forpdfsubset proc~getequilibrium_forelemfromstate getEquilibrium_forElemfromState interface~getequilibrium->proc~getequilibrium_forelemfromstate proc~geteqbydensvel getEqByDensVel interface~getequilibrium->proc~geteqbydensvel

Contents


Variables

TypeVisibilityAttributesNameInitial
real(kind=rk), private :: tau(6)
real(kind=rk), private :: a0
real(kind=rk), private :: a1
real(kind=rk), private :: a2
real(kind=rk), private :: q_stress
real(kind=rk), private :: q_stress_cube
real(kind=rk), private :: q_term
real(kind=rk), private :: r_stress
real(kind=rk), private :: d_stress
real(kind=rk), private :: theta_stress
real(kind=rk), private :: cos_term
real(kind=rk), private :: shear_1
real(kind=rk), private :: shear_2
real(kind=rk), private :: shear_3