mus_turbVisc_Smagorinsky_fromGradU3D_incomp Subroutine

public subroutine mus_turbVisc_Smagorinsky_fromGradU3D_incomp(turbVisc, turbConfig, gradData, auxField, velPos, nSolve, nAuxScalars, dxL, dtL)

Calculate eddy viscosity with smagorinsky model for incompressible model using gradient of velocity

Arguments

TypeIntentOptionalAttributesName
real(kind=rk), intent(out) :: turbVisc(:)

output: turbulent viscosity

type(mus_turbulence_config_type), intent(in) :: turbConfig

Contains turbulenct coefficients

type(mus_gradData_type), intent(in) :: gradData

gradient data

real(kind=rk), intent(in) :: auxField(:)

Auxiliary field variable array

integer, intent(in) :: velPos(3)

position of velocity components in auxField

integer, intent(in) :: nSolve

Number of element to solve in this level

integer, intent(in) :: nAuxScalars

number of scalars in auxField array

real(kind=rk), intent(in) :: dxL

current level lattice element size

real(kind=rk), intent(in) :: dtL

current level lattice time step size


Calls

proc~~mus_turbvisc_smagorinsky_fromgradu3d_incomp~~CallsGraph proc~mus_turbvisc_smagorinsky_fromgradu3d_incomp mus_turbVisc_Smagorinsky_fromGradU3D_incomp proc~getgradu getGradU proc~mus_turbvisc_smagorinsky_fromgradu3d_incomp->proc~getgradu

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iElem
real(kind=rk), private :: SR(6)
real(kind=rk), private :: SR_mag
real(kind=rk), private :: k_sgs
real(kind=rk), private :: visc_coeff
real(kind=rk), private :: gradU(3,3,1)

gradient of velocity