atl_append_newSourceVars Subroutine

public subroutine atl_append_newSourceVars(me, varSys, varSys_data, poss_srcVars, eval_source)

Arguments

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

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(inout) :: varSys

The variable system to which the souce variables have to be added

type(atl_varSys_solverData_type), intent(in), target:: varSys_data

Data for the variable System

type(tem_possible_variable_type) :: poss_srcVars

The list of possible source variables. This is used to determine the index of the eval-source_routine in eval_source.

type(atl_eqn_sourceMap_type), allocatable:: eval_source(:)

List of function pointers for each possible source to apply the source term to the state.


Calls

proc~~atl_append_newsourcevars~~CallsGraph proc~atl_append_newsourcevars atl_append_newSourceVars interface~positionofval~2 positionofval proc~atl_append_newsourcevars->interface~positionofval~2 proc~atl_get_new_varsys_data_ptr atl_get_new_varSys_data_ptr proc~atl_append_newsourcevars->proc~atl_get_new_varsys_data_ptr proc~tem_varsys_append_dervar tem_varSys_append_derVar proc~atl_append_newsourcevars->proc~tem_varsys_append_dervar proc~tem_abort tem_abort proc~atl_append_newsourcevars->proc~tem_abort

Called by

proc~~atl_append_newsourcevars~~CalledByGraph proc~atl_append_newsourcevars atl_append_newSourceVars proc~atl_initialize_sources atl_initialize_sources proc~atl_initialize_sources->proc~atl_append_newsourcevars 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

TypeVisibilityAttributesNameInitial
integer, private :: addedSourcePosition
integer, private :: iSource
integer, private :: nComponents
integer, private :: iState
integer, private :: poss_srcVarPos
integer, private :: nComp_data
logical, private :: wasAdded
character, private, allocatable:: inputVarNames(:)
character, private :: varname
procedure(tem_varSys_proc_point), private, pointer:: get_point=> null()
procedure(tem_varSys_proc_element), private, pointer:: get_element=> null()
procedure(tem_varSys_proc_setParams), private, pointer:: set_params=> Null()
procedure(tem_varSys_proc_getParams), private, pointer:: get_params=> Null()
procedure(tem_varSys_proc_setupIndices), private, pointer:: setup_indices=> NULL()
procedure(tem_varSys_proc_getValOfIndex), private, pointer:: get_ValOfIndex=> NULL()