atl_modg_2d_fineToCoarseFace Subroutine

public subroutine atl_modg_2d_fineToCoarseFace(minLevel, maxLevel, currentLevel, mesh, facedata, scheme, nScalars)

difference between coarser and finer faces has to be 1).

Interpolates functions defined on finer faces to faces of the current level.\n \n faces on fine face on current level level ------------------------ ------------------------ | | | | | | 3 | 4 | | | | | | | | ------------------------ ---------->> | 5 | | | | | | | 1 | 2 | | | | | | | | ------------------------ ------------------------ \n This is accomplished with lower complexity (with respect to the polynomial degree) by a dimension by dimension approach: \n \n faces on fine face on current \n level level \n ------------------------ ------------------------ \n | | | | | \n | 3 | 4 | | | \n | | | | | \n ------------------------ ---------->> | 5 | \n | | | | | \n | 1 | 2 | | | \n | | | | | \n ------------------------ ------------------------ \n \ / \n \ / \n \ / \n \ / \n ------------------------ \n | | \n | b | \n | | \n ------------------------ \n | | \n | a | \n | | \n ------------------------ \n

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: minLevel

The minumum level of the mesh.
integer, intent(in) :: maxLevel

The maximum level of the mesh.
integer, intent(in) :: currentLevel

The current level (i.e. the coarse level).
type(atl_cube_elem_type), intent(in) :: mesh(minLevel:maxLevel)

The mesh representation.
type(atl_facedata_type), intent(inout) :: facedata(minLevel:maxLevel)

The face representations (finer faces are interpolated from coarser ones).
type(atl_scheme_type), intent(in) :: scheme(minLevel:maxLevel)

The schemes on the different levels.
integer, intent(in) :: nScalars

The number of scalar variables in your equation system.

Calls

proc~~atl_modg_2d_finetocoarseface~~CallsGraph proc~atl_modg_2d_finetocoarseface atl_modg_2d_fineToCoarseFace childposop childposop proc~atl_modg_2d_finetocoarseface->childposop elemposop elemposop proc~atl_modg_2d_finetocoarseface->elemposop fromfinerface fromfinerface proc~atl_modg_2d_finetocoarseface->fromfinerface nelems nelems proc~atl_modg_2d_finetocoarseface->nelems pnttid pnttid proc~atl_modg_2d_finetocoarseface->pnttid proc~modg_2d_semicoarseface modg_2d_semiCoarseFace proc~atl_modg_2d_finetocoarseface->proc~modg_2d_semicoarseface tem_startTimer tem_startTimer proc~atl_modg_2d_finetocoarseface->tem_startTimer tem_stopTimer tem_stopTimer proc~atl_modg_2d_finetocoarseface->tem_stopTimer

Called by

proc~~atl_modg_2d_finetocoarseface~~CalledByGraph proc~atl_modg_2d_finetocoarseface atl_modg_2d_fineToCoarseFace proc~compute_rhs_cubes_modg_2d compute_rhs_cubes_modg_2d proc~compute_rhs_cubes_modg_2d->proc~atl_modg_2d_finetocoarseface 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~global_corrector_substep global_corrector_substep proc~global_corrector_substep->interface~atl_compute_rhs proc~imexrk_substep imexrk_substep proc~imexrk_substep->interface~atl_compute_rhs proc~mesh_timestep_euler mesh_timestep_euler proc~mesh_timestep_euler->interface~atl_compute_rhs proc~rk2_substep rk2_substep proc~rk2_substep->interface~atl_compute_rhs proc~rk4_substep rk4_substep proc~rk4_substep->interface~atl_compute_rhs proc~rktaylor_substep rktaylor_substep proc~rktaylor_substep->interface~atl_compute_rhs