compute_rhs_cubes_modg Subroutine

private subroutine compute_rhs_cubes_modg(minLevel, maxLevel, currentLevel, mesh_list, kerneldata_list, statedata_list, facedata_list, source, penalizationdata_list, scheme_list, poly_proj_pos, poly_proj_list, equation, material_list, general, computePenalization)

Uses

Computes the right hand side for cubical elements and MODG scheme.

Arguments

TypeIntentOptionalAttributesName
integer, intent(in) :: minLevel

The minimum level of the mesh.

integer, intent(in) :: maxLevel

The maximum level of the mesh.

integer, intent(in) :: currentLevel

The level of the mesh you are computing the rhs for.

type(atl_cube_elem_type), intent(inout) :: mesh_list(minLevel:maxLevel)

List of mesh parts. For each level we have one.

type(atl_kerneldata_type), intent(inout) :: kerneldata_list(minLevel:maxLevel)

List of kerneldatas. For each level we have one

type(atl_statedata_type), intent(inout) :: statedata_list(minLevel:maxLevel)

List of states you want to calc the rhs for. For each level we have one.

type(atl_facedata_type), intent(inout) :: facedata_list(minLevel:maxLevel)

List of facedatas. For each level we have one

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

Levelwise list of sources

type(atl_penalizationData_type), intent(inout) :: penalizationdata_list(minLevel:maxLevel)

Levelwise list of penalization data

type(atl_scheme_type), intent(inout) :: scheme_list(minLevel:maxLevel)

List of schemes, for each level.

integer, intent(in) :: poly_proj_pos(minLevel:maxLevel)

List of levelwise position of projection method in unique list

type(ply_poly_project_type), intent(inout) :: poly_proj_list(:)

unique list for projection methods

type(atl_Equations_type), intent(in) :: equation

The equation you are operating with.

type(atl_material_type), intent(inout) :: material_list(minlevel:maxlevel)

Information about the material parameters of the equation.

type(tem_general_type), intent(inout) :: general

General treelm settings

logical, intent(in), optional :: computePenalization

Flag to indicate whether penalization terms should be computed or not.

This is used to switch off the application of penalizing terms from the convective computation and instead compute it in an implicit update, see the atl_imexrk_module. Default is .true.!


Calls

proc~~compute_rhs_cubes_modg~~CallsGraph proc~compute_rhs_cubes_modg compute_rhs_cubes_modg proc~atl_modg_heat_numflux atl_modg_heat_numFlux proc~compute_rhs_cubes_modg->proc~atl_modg_heat_numflux proc~atl_modg_project_source atl_modg_project_source proc~compute_rhs_cubes_modg->proc~atl_modg_project_source proc~atl_modg_project_numflux atl_modg_project_NumFlux proc~compute_rhs_cubes_modg->proc~atl_modg_project_numflux proc~atl_modg_euler_numflux atl_modg_euler_numFlux proc~compute_rhs_cubes_modg->proc~atl_modg_euler_numflux proc~atl_modg_maxwell_numflux atl_modg_maxwell_numFlux proc~compute_rhs_cubes_modg->proc~atl_modg_maxwell_numflux proc~atl_modg_lineareuler_numflux atl_modg_LinearEuler_numFlux proc~compute_rhs_cubes_modg->proc~atl_modg_lineareuler_numflux proc~tem_stoptimer tem_stopTimer proc~compute_rhs_cubes_modg->proc~tem_stoptimer proc~tem_abort tem_abort proc~compute_rhs_cubes_modg->proc~tem_abort proc~modg_compute_project_physflux modg_compute_project_physFlux proc~compute_rhs_cubes_modg->proc~modg_compute_project_physflux proc~atl_modg_navierstokes_numflux atl_modg_navierstokes_numFlux proc~compute_rhs_cubes_modg->proc~atl_modg_navierstokes_numflux proc~atl_modg_acoustic_numflux atl_modg_acoustic_numFlux proc~compute_rhs_cubes_modg->proc~atl_modg_acoustic_numflux proc~atl_modg_finetocoarseface atl_modg_fineToCoarseFace proc~compute_rhs_cubes_modg->proc~atl_modg_finetocoarseface proc~atl_modg_maxwelldivcor_numflux atl_modg_maxwellDivCor_numFlux proc~compute_rhs_cubes_modg->proc~atl_modg_maxwelldivcor_numflux proc~tem_starttimer tem_startTimer proc~compute_rhs_cubes_modg->proc~tem_starttimer proc~atl_update_sourcedata atl_update_sourcedata proc~compute_rhs_cubes_modg->proc~atl_update_sourcedata proc~atl_modg_filnvrstk_numflux atl_modg_filNvrStk_numFlux proc~compute_rhs_cubes_modg->proc~atl_modg_filnvrstk_numflux

Called by

proc~~compute_rhs_cubes_modg~~CalledByGraph proc~compute_rhs_cubes_modg compute_rhs_cubes_modg proc~compute_rhs_cubes compute_rhs_cubes proc~compute_rhs_cubes->proc~compute_rhs_cubes_modg interface~atl_compute_rhs atl_compute_rhs interface~atl_compute_rhs->proc~compute_rhs_cubes proc~rktaylor_substep rktaylor_substep proc~rktaylor_substep->interface~atl_compute_rhs proc~rktaylor_substep->proc~rktaylor_substep proc~rk2_substep rk2_substep proc~rk2_substep->interface~atl_compute_rhs proc~rk2_substep->proc~rk2_substep proc~rk4_substep rk4_substep proc~rk4_substep->interface~atl_compute_rhs proc~rk4_substep->proc~rk4_substep proc~imexrk_substep imexrk_substep proc~imexrk_substep->interface~atl_compute_rhs proc~imexrk_substep->proc~imexrk_substep proc~mesh_timestep_euler mesh_timestep_euler proc~mesh_timestep_euler->interface~atl_compute_rhs proc~mesh_timestep_euler->proc~mesh_timestep_euler proc~global_corrector_substep global_corrector_substep proc~global_corrector_substep->interface~atl_compute_rhs proc~mesh_timestep_rktaylor mesh_timestep_rktaylor proc~mesh_timestep_rktaylor->proc~rktaylor_substep proc~mesh_timestep_predcor_cerk4 mesh_timestep_predcor_cerk4 proc~mesh_timestep_predcor_cerk4->proc~global_corrector_substep none~substep substep none~substep->proc~rk4_substep proc~mesh_timestep_imexrk mesh_timestep_imexrk proc~mesh_timestep_imexrk->proc~imexrk_substep proc~mesh_timestep_ssprk2 mesh_timestep_ssprk2 proc~mesh_timestep_ssprk2->proc~rk2_substep

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iDir
integer, private :: iFace
integer, private :: dirVec(3,3)
type(atl_physflux_pointer_type), private :: eval(2)
type(atl_penalization_pointer_type), private :: apply(2)
logical, private :: usePenalization