ply_initQLegProjCoeff Subroutine

private subroutine ply_initQLegProjCoeff(dofType, nDofs, ndims, nChilds, nChildDofs, projection)

Routine to initialize the projection coefficients for a usage in the subsampling routine to project degrees of freedoms of a parent cell to the degrees of freedoms of a child cell if the degrees of freedoms are Q-Legendre polynomials.


integer, intent(in) :: dofType

The type of degrees of freedom we have in our cells.

integer, intent(in) :: nDofs

The number of degrees of freedom for the parent cells.

integer, intent(in) :: ndims

The number of dimensions in the polynomial representation.

integer, intent(in) :: nChilds

The number of child cells.

integer, intent(in) :: nChildDofs

The number of degrees of freedom for the child cells.

type(ply_ProjCoeff_type), intent(out) :: projection

The subsampling coefficients that will be initialized by this routine.


proc~~ply_initqlegprojcoeff~~CallsGraph proc~ply_initqlegprojcoeff ply_initQLegProjCoeff proc~ply_qlegonedimcoeff ply_QLegOneDimCoeff proc~ply_initqlegprojcoeff->proc~ply_qlegonedimcoeff proc~tem_abort tem_abort proc~ply_initqlegprojcoeff->proc~tem_abort proc~ply_doftoqpoly ply_dofToQPoly proc~ply_initqlegprojcoeff->proc~ply_doftoqpoly proc~ply_legval ply_legVal proc~ply_qlegonedimcoeff->proc~ply_legval proc~ply_gauleg ply_gauleg proc~ply_qlegonedimcoeff->proc~ply_gauleg proc~ply_qlegsqnorm ply_QLegSqNorm proc~ply_qlegonedimcoeff->proc~ply_qlegsqnorm

Called by

proc~~ply_initqlegprojcoeff~~CalledByGraph proc~ply_initqlegprojcoeff ply_initQLegProjCoeff proc~ply_qpolyprojection ply_QPolyProjection proc~ply_qpolyprojection->proc~ply_initqlegprojcoeff



integer, private :: iParentDof
integer, private :: iChildDof
integer, private :: iChild
integer, private :: xShift
integer, private :: yShift
integer, private :: zShift
integer, private :: xParentAnsFunc
integer, private :: yParentAnsFunc
integer, private :: zParentAnsFunc
integer, private :: xChildAnsFunc
integer, private :: yChildAnsFunc
integer, private :: zChildAnsFunc
real(kind=rk), private, allocatable:: projCoeffOneDim(:,:,:)
real(kind=rk), private :: dimexp