ply_init_modg_multilevelCoeffs Subroutine

public subroutine ply_init_modg_multilevelCoeffs(nPoints, nFunc, integral)

Integral of combination of all anzatz functions for projection onto finer element

Arguments

TypeIntentOptionalAttributesName
integer, intent(in) :: nPoints
integer, intent(in) :: nFunc
type(ply_modg_refine_type), intent(out) :: integral

Calls

proc~~ply_init_modg_multilevelcoeffs~~CallsGraph proc~ply_init_modg_multilevelcoeffs ply_init_modg_multilevelCoeffs proc~ply_legendre_1d ply_legendre_1D proc~ply_init_modg_multilevelcoeffs->proc~ply_legendre_1d proc~ply_gausslegpoints ply_gaussLegPoints proc~ply_init_modg_multilevelcoeffs->proc~ply_gausslegpoints

Called by

proc~~ply_init_modg_multilevelcoeffs~~CalledByGraph proc~ply_init_modg_multilevelcoeffs ply_init_modg_multilevelCoeffs proc~atl_init_spacebasis atl_init_spacebasis proc~atl_init_spacebasis->proc~ply_init_modg_multilevelcoeffs proc~atl_initialize atl_initialize proc~atl_initialize->proc~atl_init_spacebasis proc~atl_initialize_program atl_initialize_program proc~atl_initialize_program->proc~atl_initialize program~atl_harvesting atl_harvesting program~atl_harvesting->proc~atl_initialize program~ateles ateles program~ateles->proc~atl_initialize_program

Contents


Variables

TypeVisibilityAttributesNameInitial
real(kind=rk), private, allocatable:: GaussPoints(:)

points and weights for gauss-legendre quadrature

real(kind=rk), private :: tempLeft(nPoints)
real(kind=rk), private :: tempRight(nPoints)
real(kind=rk), private :: sumLeft

Gaussian weights

real(kind=rk), private :: sumRight

Gaussian weights

real(kind=rk), private, allocatable:: w(:)

legendre polynomial values [-1,1]

real(kind=rk), private :: legendre_standard(nFunc,nPoints)

legendre polynomila values left shift

real(kind=rk), private :: legendre_left(nFunc,nPoints)

legendre polynomila values right shift

real(kind=rk), private :: legendre_right(nFunc,nPoints)
integer, private :: iFunc
integer, private :: jFunc