mus_updateSrcVar_dynSponFld Subroutine

  1. mus_source_var_module.f90
  2. mus_source_var_module
  3. mus_updateSrcVar_dynSponFld

public subroutine mus_updateSrcVar_dynSponFld(fun, auxField, iLevel, varSys, phyConvFac, derVarPos)

Compute density and velocity in sponge layer for dynamic sponge

Arguments

TypeIntentOptionalAttributesName
class(mus_source_op_type), intent(inout) :: fun

Description of method to update source
real(kind=rk), intent(in) :: auxField(:)

input auxField array on current level

integer, intent(in) :: iLevel

current level
type(tem_varSys_type), intent(in) :: varSys

variable system definition
type(mus_convertFac_type), intent(in) :: phyConvFac

Physics conversion factor on current level
type(mus_derVarPos_type), intent(in) :: derVarPos(:)

position of derived quantities in varsys

Calls

proc~~mus_updatesrcvar_dynsponfld~~CallsGraph proc~mus_updatesrcvar_dynsponfld mus_updateSrcVar_dynSponFld posintotal posintotal proc~mus_updatesrcvar_dynsponfld->posintotal

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
integer, private :: dens_pos
integer, private :: vel_pos(3)
integer, private :: iElem
integer, private :: nElems
integer, private :: elemOff
real(kind=rk), private :: dens
real(kind=rk), private :: vel(3)
real(kind=rk), private :: smoothFac
real(kind=rk), private :: inv_rho_phy
real(kind=rk), private :: inv_vel_phy
real(kind=rk), private :: dens_ref
real(kind=rk), private :: vel_ref(3)