atl_fill_sourceIndex Subroutine

  1. atl_source_module.f90
  2. atl_source_module
  3. atl_fill_sourceIndex

public subroutine atl_fill_sourceIndex(source, varSys, nDim, tree, poly_proj_list, mesh_list)

Create source elements list for given source variable

This routine was taken from musubi's mus_source_module. This was necessary, because we can't move the routine to treelm and work with type extensions, as there are differences between atl_source_elems_type and mus_source_elems_type, which prevents us from using a shared and extendable tem_source_op_type.

If this routine is changed, please also keep the coresponding routine in mus_source_module up to date.

Arguments

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

Instance of atl_source_type to be initialized. This instance will contain the source definitions from lua as well as the corresponding variables in the global variable system.
type(tem_varSys_type), intent(in) :: varSys

global variable system
integer, intent(in) :: nDim

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

global treelm mesh
type(ply_poly_project_type), intent(in), target:: poly_proj_list(:)

unique list for projection methods
type(atl_cube_elem_type), intent(in) :: mesh_list(tree%global%minLevel:)

Mesh list to access the level descriptors

Calls

proc~~atl_fill_sourceindex~~CallsGraph proc~atl_fill_sourceindex atl_fill_sourceIndex interface~append~2 append proc~atl_fill_sourceindex->interface~append~2 proc~atl_reftophyscoord atl_refToPhysCoord proc~atl_fill_sourceindex->proc~atl_reftophyscoord

Called by

proc~~atl_fill_sourceindex~~CalledByGraph proc~atl_fill_sourceindex atl_fill_sourceIndex proc~atl_initialize_sources atl_initialize_sources proc~atl_initialize_sources->proc~atl_fill_sourceindex proc~atl_initialize atl_initialize proc~atl_initialize->proc~atl_initialize_sources proc~atl_initialize_program atl_initialize_program proc~atl_initialize_program->proc~atl_initialize program~atl_harvesting atl_harvesting program~atl_harvesting->proc~atl_initialize program~ateles ateles program~ateles->proc~atl_initialize_program

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iElem
integer, private :: iLevel
integer, private :: iSource
integer, private :: nElems
integer, private :: nQuadPnts
integer, private :: data_varPos
integer, private :: minLevel
integer, private :: maxLevel
type(ply_prj_body_type), private, pointer:: polyProjBody
real(kind=rk), private, allocatable, dimension(:,:):: refPoints
real(kind=rk), private, allocatable, dimension(:,:):: srcPhysPnts
integer, private, allocatable:: idx(:)