ply_calcDiff_leg_x_vec Subroutine

  1. ply_leg_diff_module.f90
  2. ply_leg_diff_module
  3. ply_calcDiff_leg_x_vec

public subroutine ply_calcDiff_leg_x_vec(legCoeffs, legCoeffsDiff, mPd, nVars, elemLength)

Compute the derivative in X direction for 3D Legendre polynomial.

Arguments

TypeIntentOptionalAttributesName
real(kind=rk), intent(in) :: legCoeffs(:,:)
real(kind=rk), intent(inout) :: legCoeffsDiff(:,:)

Modal expansion of the derivative of legCoeffs in terms of Legendre modal coefficients. * First index is the number of modal coefficients. * Second index is the number of variable components
integer, intent(in) :: mPd
integer, intent(in) :: nVars

The number of varibales to differentiate
real(kind=rk), intent(in) :: elemLength

The physical length of the element to build the derivatives for.

Called by

proc~~ply_calcdiff_leg_x_vec~~CalledByGraph proc~ply_calcdiff_leg_x_vec ply_calcDiff_leg_x_vec proc~atl_op_gradientx_forelement atl_op_GradientX_forElement proc~atl_op_gradientx_forelement->proc~ply_calcdiff_leg_x_vec proc~ply_calcdiff_leg ply_calcDiff_leg proc~ply_calcdiff_leg->proc~ply_calcdiff_leg_x_vec proc~atl_modg_voltoface_grad_q atl_modg_volToFace_grad_Q proc~atl_modg_voltoface_grad_q->proc~ply_calcdiff_leg proc~atl_op_gradient_forelement atl_op_Gradient_forElement proc~atl_op_gradient_forelement->proc~ply_calcdiff_leg proc~modg_compute_project_physflux modg_compute_project_physFlux proc~modg_compute_project_physflux->proc~ply_calcdiff_leg proc~atl_modg_modalvoltomodalface atl_modg_modalVolToModalFace proc~atl_modg_modalvoltomodalface->proc~atl_modg_voltoface_grad_q proc~compute_rhs_cubes_modg compute_rhs_cubes_modg proc~compute_rhs_cubes_modg->proc~modg_compute_project_physflux proc~compute_rhs_cubes compute_rhs_cubes proc~compute_rhs_cubes->proc~compute_rhs_cubes_modg proc~preprocess_rhs_cubes preprocess_rhs_cubes proc~preprocess_rhs_cubes->proc~atl_modg_modalvoltomodalface

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iVar
integer, private :: dofPos
integer, private :: dofPosPrev
integer, private :: iDeg
integer, private :: iDeg1
integer, private :: iDeg2
integer, private :: iDeg3
real(kind=rk), private :: derivative((mpd+1)**2,mpd+1)