compute_rhs_cubes_modg_2d Subroutine

  1. atl_compute_module.f90
  2. atl_compute_module
  3. compute_rhs_cubes_modg_2d

private subroutine compute_rhs_cubes_modg_2d(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 2D 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 projection_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_2d~~CallsGraph proc~compute_rhs_cubes_modg_2d compute_rhs_cubes_modg_2d proc~atl_modg_2d_heat_numflux atl_modg_2d_heat_numFlux proc~compute_rhs_cubes_modg_2d->proc~atl_modg_2d_heat_numflux proc~tem_stoptimer tem_stopTimer proc~compute_rhs_cubes_modg_2d->proc~tem_stoptimer proc~tem_abort tem_abort proc~compute_rhs_cubes_modg_2d->proc~tem_abort proc~atl_modg_2d_finetocoarseface atl_modg_2d_fineToCoarseFace proc~compute_rhs_cubes_modg_2d->proc~atl_modg_2d_finetocoarseface proc~atl_modg_2d_lineareuler_numflux atl_modg_2d_LinearEuler_numFlux proc~compute_rhs_cubes_modg_2d->proc~atl_modg_2d_lineareuler_numflux proc~atl_modg_2d_acoustic_numflux atl_modg_2d_acoustic_numFlux proc~compute_rhs_cubes_modg_2d->proc~atl_modg_2d_acoustic_numflux proc~atl_modg_2d_euler_numflux atl_modg_2d_euler_numFlux proc~compute_rhs_cubes_modg_2d->proc~atl_modg_2d_euler_numflux proc~atl_modg_2d_navierstokes_numflux atl_modg_2d_navierstokes_numFlux proc~compute_rhs_cubes_modg_2d->proc~atl_modg_2d_navierstokes_numflux proc~atl_modg_2d_project_numflux atl_modg_2d_project_NumFlux proc~compute_rhs_cubes_modg_2d->proc~atl_modg_2d_project_numflux proc~atl_modg_maxwell_2d_numflux atl_modg_maxwell_2d_numFlux proc~compute_rhs_cubes_modg_2d->proc~atl_modg_maxwell_2d_numflux proc~modg_2d_compute_project_physflux modg_2d_compute_project_physFlux proc~compute_rhs_cubes_modg_2d->proc~modg_2d_compute_project_physflux proc~tem_starttimer tem_startTimer proc~compute_rhs_cubes_modg_2d->proc~tem_starttimer proc~atl_update_sourcedata atl_update_sourcedata proc~compute_rhs_cubes_modg_2d->proc~atl_update_sourcedata proc~atl_modg_2d_filnvrstk_numflux atl_modg_2d_filNvrStk_numFlux proc~compute_rhs_cubes_modg_2d->proc~atl_modg_2d_filnvrstk_numflux proc~atl_modg_2d_project_source atl_modg_2d_project_source proc~compute_rhs_cubes_modg_2d->proc~atl_modg_2d_project_source

Called by

proc~~compute_rhs_cubes_modg_2d~~CalledByGraph proc~compute_rhs_cubes_modg_2d compute_rhs_cubes_modg_2d proc~compute_rhs_cubes compute_rhs_cubes proc~compute_rhs_cubes->proc~compute_rhs_cubes_modg_2d 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


Variables

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