atl_primal_to_covolume_projection_1d Subroutine

  1. atl_covolume_projection_module.f90
  2. atl_covolume_projection_module
  3. atl_primal_to_covolume_projection_1d

public subroutine atl_primal_to_covolume_projection_1d(left, right, filter, scheme, maxPolyDeg, covolume)

This routine projects to elements (left and right) onto its co-volume element. The geometrical setup is as follows:

     left                 right

|---------------------||---------------------| \ / \ / | |/ |---------------------| co-volume

The transformation to the co-volume is carried out by a simple (but efficient) L2-projection.

Arguments

TypeIntentOptionalAttributesName
real(kind=rk), intent(in) :: left(:,:)
real(kind=rk), intent(in) :: right(:,:)
type(atl_covolume_type), intent(in) :: filter
type(atl_scheme_type), intent(in) :: scheme

The numerical schemes for the current level to get the modg basis
integer, intent(in) :: maxPolyDeg
real(kind=rk), intent(out) :: covolume(:,:)

Called by

proc~~atl_primal_to_covolume_projection_1d~~CalledByGraph proc~atl_primal_to_covolume_projection_1d atl_primal_to_covolume_projection_1d proc~atl_covolume_tocovolume_1d atl_covolume_tocovolume_1d proc~atl_covolume_tocovolume_1d->proc~atl_primal_to_covolume_projection_1d proc~atl_covolume_1d atl_covolume_1d proc~atl_covolume_1d->proc~atl_covolume_tocovolume_1d proc~atl_stabilize atl_stabilize proc~atl_stabilize->proc~atl_covolume_1d proc~mesh_timestep_rktaylor mesh_timestep_rktaylor proc~mesh_timestep_rktaylor->proc~atl_stabilize proc~mesh_timestep_euler mesh_timestep_euler proc~mesh_timestep_euler->proc~atl_stabilize none~substep substep none~substep->proc~atl_stabilize proc~mesh_timestep_imexrk mesh_timestep_imexrk proc~mesh_timestep_imexrk->proc~atl_stabilize proc~mesh_timestep_ssprk2 mesh_timestep_ssprk2 proc~mesh_timestep_ssprk2->proc~atl_stabilize program~atl_harvesting atl_harvesting program~atl_harvesting->proc~atl_stabilize

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
integer, private :: dof
integer, private :: dof_primary
real(kind=rk), private :: dofAbs
real(kind=rk), private :: damping
real(kind=rk), private :: cut
integer, private :: mpd1
logical, private :: use_damping