calcVelSW_unitSW_velTau_tVisc Subroutine

  1. mus_bc_fluid_turbulent_module.f90
  2. mus_bc_fluid_turbulent_module
  3. calcVelSW_unitSW_velTau_tVisc

private subroutine calcVelSW_unitSW_velTau_tVisc(velSW, unitSW, turbwallFunc, nElems, elemPos, normalInd, neighBufferPre, viscKine, turbulence, stencil, iLevel)

Calculation stream-wise velocity compononent from wall function and friction velocity, stream-wise unit vector and turbulent viscosity with mixing length formulation.

Arguments

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

Stream-wise velocity component from wall function
real(kind=rk), intent(out) :: unitSW(:,:)

Stream-wise unit vector
type(mus_turb_wallFunc_type), intent(inout) :: turbwallFunc

Turbulent wall model type contains viscosity, velTau, distToBnd and function pointers to compute velTau and velSW
integer, intent(in) :: nElems

Number of elements in current boundary
integer, intent(in) :: elemPos(:)

Current element position in state array. (Used to access viscosity)
integer, intent(in) :: normalInd(:)

Normal index for evey boundary element
real(kind=rk), intent(in) :: neighBufferPre(:,:)

Pre-collision from 1st and 2nd fluid neighbor
type(mus_viscosity_type) :: viscKine

Kinematic viscosity
type(mus_turbulence_type), intent(in) :: turbulence

turbulence model type
type(tem_stencilHeader_type), intent(in) :: stencil

Fluid stencil
integer, intent(in) :: iLevel

Current level

Called by

proc~~calcvelsw_unitsw_veltau_tvisc~~CalledByGraph proc~calcvelsw_unitsw_veltau_tvisc calcVelSW_unitSW_velTau_tVisc proc~turbulent_wall_noneq_expol_curved turbulent_wall_noneq_expol_curved proc~turbulent_wall_noneq_expol_curved->proc~calcvelsw_unitsw_veltau_tvisc proc~turbulent_wall_eq_curved turbulent_wall_eq_curved proc~turbulent_wall_eq_curved->proc~calcvelsw_unitsw_veltau_tvisc proc~turbulent_wall_libb turbulent_wall_libb proc~turbulent_wall_libb->proc~calcvelsw_unitsw_veltau_tvisc proc~turbulent_wall_noneq_expol turbulent_wall_noneq_expol proc~turbulent_wall_noneq_expol->proc~calcvelsw_unitsw_veltau_tvisc proc~turbulent_wall_eq turbulent_wall_eq proc~turbulent_wall_eq->proc~calcvelsw_unitsw_veltau_tvisc proc~turbulent_wall turbulent_wall proc~turbulent_wall->proc~calcvelsw_unitsw_veltau_tvisc

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iElem
integer, private :: QQ
integer, private :: normalInd_inv
real(kind=rk), private :: f_neigh(stencil%QQ)
real(kind=rk), private :: vel_neigh(3)
real(kind=rk), private :: dens_neigh_inv
real(kind=rk), private :: normal(3)
real(kind=rk), private :: vec(3)
real(kind=rk), private :: vec_mag
real(kind=rk), private :: velSW_neigh(nElems)
real(kind=rk), private :: yPlus
real(kind=rk), private :: gradU
real(kind=rk), private :: velSW_neigh_2