mus_setupIndices_forSrc Subroutine

private subroutine mus_setupIndices_forSrc(source, varSys, nSolve, bary, iLevel, tree)

This routines does setup indices for given source within a field or global. Index are stored for points which source term is active

Arguments

TypeIntentOptionalAttributesName
type(mus_source_type), intent(inout) :: source

Source term to fill in

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

global variable system

integer, intent(in) :: nSolve

Number of elements to apply source term on this level

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

Space coordinates to apply source terms

integer, intent(in) :: iLevel

Current level

type(treelmesh_type), intent(in) :: tree

global treelm mesh


Calls

proc~~mus_setupindices_forsrc~~CallsGraph proc~mus_setupindices_forsrc mus_setupIndices_forSrc proc~mus_init_absorblayer mus_init_absorbLayer proc~mus_setupindices_forsrc->proc~mus_init_absorblayer proc~mus_init_turbchanforce mus_init_turbChanForce proc~mus_setupindices_forsrc->proc~mus_init_turbchanforce proc~mus_init_hrrcorrection mus_init_hrrCorrection proc~mus_setupindices_forsrc->proc~mus_init_hrrcorrection proc~tem_create_subtree_of tem_create_subTree_of proc~mus_init_turbchanforce->proc~tem_create_subtree_of mpi_allreduce mpi_allreduce proc~mus_init_turbchanforce->mpi_allreduce

Called by

proc~~mus_setupindices_forsrc~~CalledByGraph proc~mus_setupindices_forsrc mus_setupIndices_forSrc proc~mus_init_sourceterms mus_init_sourceTerms proc~mus_init_sourceterms->proc~mus_setupindices_forsrc proc~mus_reset_aux mus_reset_aux proc~mus_reset_aux->proc~mus_init_sourceterms proc~mus_init_aux mus_init_aux proc~mus_init_aux->proc~mus_init_sourceterms proc~mus_initialize mus_initialize proc~mus_initialize->proc~mus_init_aux proc~mus_perform_dynloadbal mus_perform_dynLoadBal proc~mus_perform_dynloadbal->proc~mus_reset_aux none~do_balance do_balance none~do_balance->proc~mus_perform_dynloadbal program~musubi musubi program~musubi->proc~mus_initialize

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iVar
integer, private :: iElem
integer, private :: counter
integer, private :: src_nElems
integer, private :: nComps
integer, private :: data_varPos
integer, private, allocatable:: idx(:)
integer(kind=long_k), private :: nElems_var(source%varDict%nVals)