atl_equation_evaluate_source_nodal Subroutine

public subroutine atl_equation_evaluate_source_nodal(fun, varSys, currentLevel, nDim, time, eval_rhs, state, poly_proj, polyProjBody, sourceData, consts)

Arguments

TypeIntentOptionalAttributesName
class(atl_source_op_type), intent(in) :: fun

Description of method to update source

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

variable system

integer, intent(in) :: currentLevel

The current Level information

integer, intent(in) :: nDim

The dimension information

type(tem_time_type), intent(in) :: time

Point in time at which to evaluate the variable.

procedure(atl_compute_source_interface), pointer:: eval_rhs

The pointer to the equation specific RHS evaluation

real(kind=rk), intent(in) :: state(:,:,:)
type(ply_poly_project_type), intent(inout) :: poly_proj

Parameters for projection

type(ply_prj_body_type) :: polyProjBody

the data needed for the projection method

real(kind=rk), intent(inout) :: sourceData(:,:,:)
real(kind=rk), intent(in), optional :: consts(:)

Calls

proc~~atl_equation_evaluate_source_nodal~~CallsGraph proc~atl_equation_evaluate_source_nodal atl_equation_evaluate_source_nodal proc~ply_convert2oversample ply_convert2oversample proc~atl_equation_evaluate_source_nodal->proc~ply_convert2oversample interface~ply_poly_project_n2m ply_poly_project_n2m proc~atl_equation_evaluate_source_nodal->interface~ply_poly_project_n2m interface~ply_poly_project_m2n ply_poly_project_m2n proc~atl_equation_evaluate_source_nodal->interface~ply_poly_project_m2n proc~ply_convertfromoversample ply_convertFromOversample proc~atl_equation_evaluate_source_nodal->proc~ply_convertfromoversample proc~ply_convert2oversample_2d ply_convert2oversample_2d proc~ply_convert2oversample->proc~ply_convert2oversample_2d proc~ply_convert2oversample_3d ply_convert2oversample_3d proc~ply_convert2oversample->proc~ply_convert2oversample_3d proc~ply_convert2oversample_1d ply_convert2oversample_1d proc~ply_convert2oversample->proc~ply_convert2oversample_1d proc~ply_poly_project_n2m_multivar ply_poly_project_n2m_multiVar interface~ply_poly_project_n2m->proc~ply_poly_project_n2m_multivar proc~ply_poly_project_m2n_multivar ply_poly_project_m2n_multiVar interface~ply_poly_project_m2n->proc~ply_poly_project_m2n_multivar proc~ply_convertfromoversample_3d ply_convertFromOversample_3d proc~ply_convertfromoversample->proc~ply_convertfromoversample_3d proc~ply_convertfromoversample_1d ply_convertFromOversample_1d proc~ply_convertfromoversample->proc~ply_convertfromoversample_1d proc~ply_convertfromoversample_2d ply_convertFromOversample_2d proc~ply_convertfromoversample->proc~ply_convertfromoversample_2d proc~ply_fxt_n2m_1d ply_fxt_n2m_1D proc~ply_poly_project_n2m_multivar->proc~ply_fxt_n2m_1d interface~ply_pnttoleg_2d ply_pntToLeg_2D proc~ply_poly_project_n2m_multivar->interface~ply_pnttoleg_2d proc~ply_l2p_trafo_2d ply_l2p_trafo_2D proc~ply_poly_project_n2m_multivar->proc~ply_l2p_trafo_2d proc~ply_fxt_n2m_3d ply_fxt_n2m_3D proc~ply_poly_project_n2m_multivar->proc~ply_fxt_n2m_3d proc~ply_fxt_n2m_2d ply_fxt_n2m_2D proc~ply_poly_project_n2m_multivar->proc~ply_fxt_n2m_2d proc~ply_l2p_trafo_1d ply_l2p_trafo_1D proc~ply_poly_project_n2m_multivar->proc~ply_l2p_trafo_1d proc~ply_l2p_trafo_3d ply_l2p_trafo_3D proc~ply_poly_project_n2m_multivar->proc~ply_l2p_trafo_3d interface~ply_pnttoleg_3d ply_pntToLeg_3D proc~ply_poly_project_n2m_multivar->interface~ply_pnttoleg_3d proc~ply_fxt_m2n_3d ply_fxt_m2n_3D proc~ply_poly_project_m2n_multivar->proc~ply_fxt_m2n_3d interface~ply_legtopnt_2d ply_legToPnt_2D proc~ply_poly_project_m2n_multivar->interface~ply_legtopnt_2d proc~ply_fxt_m2n_1d ply_fxt_m2n_1D proc~ply_poly_project_m2n_multivar->proc~ply_fxt_m2n_1d proc~ply_poly_project_m2n_multivar->proc~ply_l2p_trafo_2d proc~ply_fxt_m2n_2d ply_fxt_m2n_2D proc~ply_poly_project_m2n_multivar->proc~ply_fxt_m2n_2d proc~ply_poly_project_m2n_multivar->proc~ply_l2p_trafo_1d proc~ply_poly_project_m2n_multivar->proc~ply_l2p_trafo_3d interface~ply_legtopnt_3d ply_LegTopnt_3D proc~ply_poly_project_m2n_multivar->interface~ply_legtopnt_3d

Called by

proc~~atl_equation_evaluate_source_nodal~~CalledByGraph proc~atl_equation_evaluate_source_nodal atl_equation_evaluate_source_nodal proc~atl_eval_source_spongelayer_2d atl_eval_source_spongeLayer_2d proc~atl_eval_source_spongelayer_2d->proc~atl_equation_evaluate_source_nodal proc~eval_source_pml_2d eval_source_pml_2d proc~eval_source_pml_2d->proc~atl_equation_evaluate_source_nodal proc~eval_source_gravitation eval_source_gravitation proc~eval_source_gravitation->proc~atl_equation_evaluate_source_nodal proc~eval_source_gravitation_2d eval_source_gravitation_2d proc~eval_source_gravitation_2d->proc~atl_equation_evaluate_source_nodal proc~atl_eval_source_spongelayer atl_eval_source_spongeLayer proc~atl_eval_source_spongelayer->proc~atl_equation_evaluate_source_nodal

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iElem
integer, private :: nComps
integer, private :: nDofs
integer, private :: nElems
integer, private :: nQuadPoints
integer, private :: nOverSampDofs
integer, private :: posInTotal
integer, private :: idx_start
integer, private :: idx_end
integer, private :: iPoint
integer, private :: iComp
real(kind=rk), private, allocatable:: constants(:)
real(kind=rk), private, allocatable:: source(:)
real(kind=rk), private, allocatable:: sourceNodal(:,:)
real(kind=rk), private, allocatable:: rhsModal(:,:)
real(kind=rk), private, allocatable:: rhs(:,:)
real(kind=rk), private, allocatable:: stateModal(:,:)
real(kind=rk), private, allocatable:: rhsNodal(:,:)
real(kind=rk), private, allocatable:: stateNodal(:,:)